d0p1/ack
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity

Added common() routine

Browse source
This commit is contained in:
ceriel 1988-10-20 13:01:04 +00:00
parent 666367e328
commit a281cc38a4
1 changed files with 16 additions and 1 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

17
util/ceg/ce_back/as_back/bss.c
View file

@ -3,5 +3,20 @@
bss( n) bss( n)
arith n; arith n;
{ {
fprint( codefile, BSS_FMT, (arith) n); fprint( codefile, BSS_FMT, (long) n);
}
common(n)
arith n;
{
extern int saved;
extern char labeltje[];
if (saved) {
fprint( codefile, COMM_FMT, labeltje, (long) n);
saved = 0;
return;
}
switchseg(SEGBSS);
bss(n);
} }