aboutsummaryrefslogtreecommitdiff
diff options
context:
space:
mode:
-rw-r--r--whichbas.c9
1 files changed, 9 insertions, 0 deletions
diff --git a/whichbas.c b/whichbas.c
index 8bd6d9a..8f44998 100644
--- a/whichbas.c
+++ b/whichbas.c
@@ -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 */