6502 mode: fix clearing of its RAM space with each .6502 invocation. Also fixed chptr...

[rmac] / token.c

diff --git a/token.c b/token.c
index 9083c9903c002ba2711aa495d3ba0255515897c9..1ef99cf572fb0cfa9ca7b28b938333ab228e41f5 100644 (file)
--- a/token.c
+++ b/token.c
@@ -1161,6 +1161,7 @@ if (debug) printf("TokenizeLine: Calling fpop() from SRC_IREPT...\n");
                // Handle multiple-character tokens
                if (c & MULTX)
                {
+            stringtype = 0;
                        switch (*ln++)
                        {
                        case '!':               // ! or !=
@@ -1174,6 +1175,11 @@ if (debug) printf("TokenizeLine: Calling fpop() from SRC_IREPT...\n");
 
                                continue;
                        case '\'':              // 'string'
+                if (m6502)
+                {
+                    stringtype = A8INT; // hardcoded for now, maybe this will change in the future
+                }
+                // Fall through
                        case '\"':              // "string"
                                c1 = ln[-1];
                                *tk++ = STRING;