whichbas: fix bug in FRAC/DPEEK logic.

1 files changed, 1 insertions, 1 deletions

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) {