fix for constants
This commit is contained in:
parent
beb142ed98
commit
5ff8baabfa
2 changed files with 2 additions and 2 deletions
|
@ -40,7 +40,7 @@ con_mult(sz) word sz; {
|
||||||
fatal("bad icon/ucon size");
|
fatal("bad icon/ucon size");
|
||||||
l = atol(str);
|
l = atol(str);
|
||||||
#ifdef ACK_ASS
|
#ifdef ACK_ASS
|
||||||
fprintf(codefile,".data2 %o, %o !%s\n",(int)(l>>16),(int)l, str);
|
fprintf(codefile,".data2 0%o, 0%o !%s\n",(int)(l>>16),(int)l, str);
|
||||||
#else
|
#else
|
||||||
fprintf(codefile,"\t%o;%o\n",(int)(l>>16),(int)l);
|
fprintf(codefile,"\t%o;%o\n",(int)(l>>16),(int)l);
|
||||||
#endif
|
#endif
|
||||||
|
|
|
@ -40,7 +40,7 @@ con_mult(sz) word sz; {
|
||||||
fatal("bad icon/ucon size");
|
fatal("bad icon/ucon size");
|
||||||
l = atol(str);
|
l = atol(str);
|
||||||
#ifdef ACK_ASS
|
#ifdef ACK_ASS
|
||||||
fprintf(codefile,".data2 %o, %o !%s\n",(int)(l>>16),(int)l, str);
|
fprintf(codefile,".data2 0%o, 0%o !%s\n",(int)(l>>16),(int)l, str);
|
||||||
#else
|
#else
|
||||||
fprintf(codefile,"\t%o;%o\n",(int)(l>>16),(int)l);
|
fprintf(codefile,"\t%o;%o\n",(int)(l>>16),(int)l);
|
||||||
#endif
|
#endif
|
||||||
|
|
Loading…
Reference in a new issue