diff options
| -rw-r--r-- | whichbas.c | 14 |
1 files changed, 0 insertions, 14 deletions
@@ -735,20 +735,6 @@ CALLBACK(handle_op) { remove_type(BT_BXL_BXE); } else if(is_numeric_op(last_op_tok) || is_numeric_op(nexttok)) { remove_type(BT_TURBO); -#if 0 - } 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_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 - a parenthesized expression. - TODO: determine exactly what all it *can* be followed by, check for that. - */ - remove_type(BT_TURBO); -#endif } break; |