diff options
author | B. Watson <urchlay@slackware.uk> | 2024-07-07 05:08:38 -0400 |
---|---|---|
committer | B. Watson <urchlay@slackware.uk> | 2024-07-07 05:08:38 -0400 |
commit | a37eb4f839452209480d12402b7e6967f6d05f4a (patch) | |
tree | 39269f8c03c7139725e7cc522a4aba508ce2510b | |
parent | d34148b6aa1948d42373c290cc168df015978de4 (diff) | |
download | bw-atari8-tools-a37eb4f839452209480d12402b7e6967f6d05f4a.tar.gz |
whichbas: more partial support for EXOR/BUMP( op.
-rw-r--r-- | whichbas.c | 7 |
1 files changed, 4 insertions, 3 deletions
@@ -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 |