ack/util/ceg/ce_back/obj_back/common.c

#include <out.h>
#include <em.h>
#include "back.h"

common(n)
arith n;
{
	extern int Label, label_waiting;
	register struct outname *nm = &symbol_table[Label];

	if (label_waiting && (nm->on_type & S_EXT)) {
		nm->on_type |= S_COM | (S_MIN+SEGBSS);
		if (n > nm->on_valu) {
			nm->on_valu = n;
		}
		label_waiting = 0;
		return;
	}
	switchseg(SEGBSS);
	dump_label();
	bss(n);
}