aboutsummaryrefslogtreecommitdiff
path: root/whichbas.c
diff options
context:
space:
mode:
Diffstat (limited to 'whichbas.c')
-rw-r--r--whichbas.c8
1 files changed, 7 insertions, 1 deletions
diff --git a/whichbas.c b/whichbas.c
index 75867e1..e05fcd5 100644
--- a/whichbas.c
+++ b/whichbas.c
@@ -275,10 +275,16 @@ CALLBACK(handle_op) {
switch(tok) {
case 0x55: /* DPEEK (function) TB, USING (infix, not a function) in BXL/BXE */
- case 0x58: /* INSTR (function) or & (infix numeric) */
+ case 0x58: /* INSTR (function) or & (infix numeric) in BXE. Note that
+ BXL has this as another END token, which works like the
+ regular END, but cannot be entered in the editor so unlikely
+ to show up in a program (but we handle it here anyway) */
case 0x5b: /* HEX$ (func, takes 1 num arg) or FIND( (pseudo-func, 3 args */
if(nexttok == OP_FUNC_LPAR) {
remove_type(BT_BXL_BXE);
+ } else if(nexttok == OP_EOS || nexttok == OP_EOL) {
+ /* weird BXL END token */
+ remove_type(BT_TURBO | BT_BXE);
} else {
remove_type(BT_TURBO);
}