From 98f3c16ecdcea547046b320316f4e79aa200dde4 Mon Sep 17 00:00:00 2001
From: "B. Watson" <urchlay@slackware.uk>
Date: Sun, 7 Jul 2024 03:50:58 -0400
Subject: bas.c: fix OP_HEXCONST brain damage.

---
 bas.c | 5 +++++
 1 file changed, 5 insertions(+)

diff --git a/bas.c b/bas.c
index 4bad870..c729e19 100644
--- a/bas.c
+++ b/bas.c
@@ -351,6 +351,11 @@ void walk_code(unsigned int startlineno, unsigned int endlineno) {
 					tok = program[pos];
 					switch(tok) {
 						case OP_NUMCONST:
+							CALL(on_exp_token);
+							pos++;
+							CALL(on_num_const);
+							pos += 6;
+							break;
 						case OP_HEXCONST:
 							if(allow_hex_const) {
 								CALL(on_exp_token);
-- 
cgit v1.2.3