comparison a09.c @ 24:7104ad38bed3

fix
author Shinji KONO <kono@ie.u-ryukyu.ac.jp>
date Tue, 10 Jul 2018 10:49:07 +0900
parents bb6a2a9f59f1
children c4e3abe97e2c
comparison
equal deleted inserted replaced
23:5217f23f2f9e 24:7104ad38bed3
1135 while (*srcptr==',') { // there are some more 1135 while (*srcptr==',') { // there are some more
1136 srcptr++; 1136 srcptr++;
1137 putword(scanexpr(0)); 1137 putword(scanexpr(0));
1138 skipspace(); 1138 skipspace();
1139 } 1139 }
1140 if(pass==2) {
1141 outbuffer();
1142 }
1143 loccounter+=codeptr;
1144 codeptr=0;
1145 prevloc = loccounter+1;
1146 oldlc = loccounter = 0;
1140 } 1147 }
1141 1148
1142 void os9end() 1149 void os9end()
1143 { 1150 {
1144 crc = crc ^ 0xffffff; 1151 crc = crc ^ 0xffffff;
1159 1166
1160 switch(co) { 1167 switch(co) {
1161 case 0:/* RMB */ 1168 case 0:/* RMB */
1162 // in OS9 mode, this generates no data 1169 // in OS9 mode, this generates no data
1163 // loccounter will be reset after any code to the current code generation 1170 // loccounter will be reset after any code to the current code generation
1164 if (os9 && !prevloc) prevloc = loccounter+1;
1165 setlabel(lp); 1171 setlabel(lp);
1166 operand=scanexpr(0); 1172 operand=scanexpr(0);
1167 if(unknown)error|=4; 1173 if(unknown)error|=4;
1168 loccounter+=operand; 1174 loccounter+=operand;
1169 if(generating&&pass==2) { 1175 if(generating&&pass==2) {