ealoop:
/* printf("ealoop token = 0x%08x\n", token); */
if (token == TSEMICOLON)
+ {
+#if TRANSLATE
+ if (xbufp >= xbuf + 0xff0)
+ abort();
+ xbufp += sprintf(xbufp, "\n");
+#endif
continue;
+ }
if (token == TNEWLINE) {
line++;
continue;
if (token == TSTRING)
p0opl17();
else
+ {
+#if TRANSLATE
+ if (xbufp >= xbuf + 0xff0)
+ abort();
+ xbufp += sprintf(xbufp, ".dw ");
+#endif
p0xpr();
+ }
return;
}
/* opl16 */
case FDOTBYTE:
+#if TRANSLATE
+ if (xstartp >= xbuf + 0xff0)
+ abort();
+ xbufp = xstartp + sprintf(xstartp, ".db");
+#endif
p0opl16();
return;
#if 1 /* modifications for dec syntax */
case FDOTWORD:
+#if TRANSLATE
+ if (xstartp >= xbuf + 0xff0)
+ abort();
+ xbufp = xstartp + sprintf(xstartp, ".dw");
+#endif
p0opldotword();
return;
#endif