X-Git-Url: http://shamusworld.gotdns.org/cgi-bin/gitweb.cgi?p=rmac;a=blobdiff_plain;f=token.c;h=1ef99cf572fb0cfa9ca7b28b938333ab228e41f5;hp=9083c9903c002ba2711aa495d3ba0255515897c9;hb=2161b198b7b333147c89ef0346d8e9bb6ab9ffd9;hpb=ff2052bcaa1428a33a202822a81a6f9b8e567ef4

diff --git a/token.c b/token.c
index 9083c99..1ef99cf 100644
--- 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;