diff options
-rw-r--r-- | whichbas.c | 9 |
1 files changed, 9 insertions, 0 deletions
@@ -284,7 +284,16 @@ CALLBACK(handle_op) { } /* 5a: EXOR (infix num op) or BUMP( (pseudo-function, no OP_FUNC_LPAR) */ + /* 5b: HEX$ (func, takes 1 num arg) or FIND( (pseudo-func, 3 args */ + if(tok == 0x5b) { + if(nexttok == OP_FUNC_LPAR) { + remove_type(BT_BXL_BXE); + } else { + /* BXL/BXE token FIND( includes the (, there's no OP_FUNC_LPAR */ + remove_type(BT_TURBO); + } + } if(tok == 0x5c) { /* DEC (function, takes str) in TB, HEX$ (function, takes num) in BXL/BXE */ |