diff options
-rw-r--r-- | whichbas.c | 3 |
1 files changed, 3 insertions, 0 deletions
@@ -343,6 +343,9 @@ CALLBACK(handle_op) { if(nexttok == OP_STRCONST || nexttok >= 0x80) { /* %0 %1 %2 can't be followed by a string constant *or* a variable */ remove_type(BT_TURBO); + } else { + /* whereas LEFT$ RIGHT$ MID$ can't be followed by anything else */ + remove_type(BT_BXL_BXE); } } if(verbose) fprintf(stderr, " bas_type now %02x\n", bas_type); |