From a37eb4f839452209480d12402b7e6967f6d05f4a Mon Sep 17 00:00:00 2001 From: "B. Watson" Date: Sun, 7 Jul 2024 05:08:38 -0400 Subject: whichbas: more partial support for EXOR/BUMP( op. --- whichbas.c | 7 ++++--- 1 file changed, 4 insertions(+), 3 deletions(-) diff --git a/whichbas.c b/whichbas.c index d4608ba..00fca8f 100644 --- a/whichbas.c +++ b/whichbas.c @@ -290,9 +290,10 @@ CALLBACK(handle_op) { /* partial: if the last token was a command, this *can't* be EXOR (it's infix). */ remove_type(BT_TURBO); - /* this won't quite work: */ - /* } else if(program[pos - 1] == OP_NUM_ASSIGN) { - remove_type(BT_TURBO); */ + } else if(last_cmd_pos == (pos - 2) && program[pos - 1] == OP_NUM_ASSIGN) + /* partial: if the last-but-one token was a command and the + last one was an assignment equals sign, this can't be infix. */ + remove_type(BT_TURBO); } else if(program[pos - 1] >= 0x80) { /* partial: if the last token was a variable, this can't be BUMP (it's a function, last token has to be a command -- cgit v1.2.3