X-Git-Url: http://shamusworld.gotdns.org/cgi-bin/gitweb.cgi?p=rmac;a=blobdiff_plain;f=token.c;h=1ef99cf572fb0cfa9ca7b28b938333ab228e41f5;hp=8726eb4b9ee256ed536f9eff6ae061bb48d27dc0;hb=2161b198b7b333147c89ef0346d8e9bb6ab9ffd9;hpb=60f204cb9e3905100da0d89f14bb40db764acd9e diff --git a/token.c b/token.c index 8726eb4..1ef99cf 100644 --- a/token.c +++ b/token.c @@ -10,6 +10,7 @@ #include "error.h" #include "macro.h" #include "procln.h" +#include "sect.h" #include "symbol.h" #define DECL_KW // Declare keyword arrays @@ -1160,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 != @@ -1173,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;