listbas: support all 256 variable names in Turbo BASIC.

1 files changed, 5 insertions, 0 deletions

diff --git a/bas.c b/bas.c
index cf03f38..e5df296 100644
--- a/bas.c
+++ b/bas.c
@@ -394,6 +394,11 @@ void walk_code(unsigned int startlineno, unsigned int endlineno) {
 				while(pos < end) {     /* loop over operators */
 					tok = program[pos];
 					switch(tok) {
+						case 0: /* Turbo variables numbered >= $80 */
+							CALL(on_exp_token);
+							/* on_exp_token callback better know what to do with $00! */
+							pos += 2;
+							break;
 						case OP_NUMCONST:
 							CALL(on_exp_token);
 							pos++;