From c9d130ecc88ac8399f6cbdc29acaa9d9318441c5 Mon Sep 17 00:00:00 2001 From: "B. Watson" Date: Tue, 9 Jul 2024 03:18:20 -0400 Subject: whichbas: fix bug in FRAC/DPEEK logic. --- whichbas.c | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/whichbas.c b/whichbas.c index fb1d0c6..035afb5 100644 --- a/whichbas.c +++ b/whichbas.c @@ -526,7 +526,7 @@ CALLBACK(handle_op) { 1st arg is a constant or a numeric variable, but not if the 1st arg is an expression or an array element. */ int has2 = 0; - if(nexttok2 == OP_NUMCONST || nexttok == OP_HEXCONST) { + if(nexttok2 == OP_NUMCONST || nexttok2 == OP_HEXCONST) { if(program[pos + 9] == OP_ARR_COMMA) has2 = 1; } else if(nexttok2 >= 0x80 && program[pos + 3] == OP_ARR_COMMA) { -- cgit v1.2.3