aboutsummaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorB. Watson <urchlay@slackware.uk>2024-07-07 05:08:38 -0400
committerB. Watson <urchlay@slackware.uk>2024-07-07 05:08:38 -0400
commita37eb4f839452209480d12402b7e6967f6d05f4a (patch)
tree39269f8c03c7139725e7cc522a4aba508ce2510b
parentd34148b6aa1948d42373c290cc168df015978de4 (diff)
downloadbw-atari8-tools-a37eb4f839452209480d12402b7e6967f6d05f4a.tar.gz
whichbas: more partial support for EXOR/BUMP( op.
-rw-r--r--whichbas.c7
1 files 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