Mercurial > hg > Members > kono > os9 > sbc09
diff os9/mc09/mc.c @ 105:6eef99bb4771
fix runtime
author | Shinji KONO <kono@ie.u-ryukyu.ac.jp> |
---|---|
date | Sat, 29 Dec 2018 12:25:26 +0900 |
parents | 096b3fc7aa66 |
children | 6566b9f47f4a |
line wrap: on
line diff
--- a/os9/mc09/mc.c Fri Dec 28 17:43:55 2018 +0900 +++ b/os9/mc09/mc.c Sat Dec 29 12:25:26 2018 +0900 @@ -212,7 +212,8 @@ if (!chk) { if ( (obuf = fopen(ccout,"w")) == NULL ) error(FILERR); else { - printf("\tmod _eom,_name,_tylg,_atrv,_start,_GLOBALS\n"); /* os9 module header */ + /* we'l resize data area later */ + printf("\tmod _eom,_name,_tylg,_atrv,_start,16384\n"); /* os9 module header */ printf("_name fcs /%s/\n\tfcb 0\n",modname); } } @@ -1865,9 +1866,9 @@ s=(char *)cadr(e1); lb=fwdlabel(); if ((l = caddr(e1)) < 128) - printf("\tLEAX\t2,PC\n\tBRA\t_%d\n",lb); + printf("\tLEAX\t*+5,PCR\n\tBRA\t_%d\n",lb); else - printf("\tLEAX\t3,PC\n\tLBRA\t_%d\n",lb); + printf("\tLEAX\t*+6,PCR\n\tLBRA\t_%d\n",lb); do { printf("\tFCB\t%d",*s++); for (i=8; --l && --i;) printf(",%d",*s++);