aboutsummaryrefslogtreecommitdiff
diff options
context:
space:
mode:
-rw-r--r--whichbas.c4
1 files changed, 2 insertions, 2 deletions
diff --git a/whichbas.c b/whichbas.c
index 6d7fbf4..46353bc 100644
--- a/whichbas.c
+++ b/whichbas.c
@@ -482,8 +482,8 @@ CALLBACK(handle_op) {
} else if(last_op_tok == OP_STR_ASSIGN) {
/* catches A$=INKEY$, for what that's worth. */
remove_type(BT_BXL_BXE);
- } else if(last_op_tok == OP_NUMCONST || last_op_tok == OP_HEXCONST || last_op_tok == OP_STRCONST || last_op_tok >= 0x80) {
- /* INKEY$ can't directly follow a constant or a variable. */
+ } else if(last_op_tok == OP_GRP_RPAR || last_op_tok == OP_NUMCONST || last_op_tok == OP_HEXCONST || last_op_tok == OP_STRCONST || last_op_tok >= 0x80) {
+ /* INKEY$ can't directly follow a constant, a variable, or a right-paren. */
remove_type(BT_TURBO);
} else if(nexttok == OP_NUMCONST || nexttok == OP_HEXCONST || nexttok >= 0x80 || nexttok == OP_GRP_LPAR) {
/* INKEY$ may not be followed by a numeric constant or a variable of any kind, or