X-Git-Url: http://shamusworld.gotdns.org/cgi-bin/gitweb.cgi?p=rmac;a=blobdiff_plain;f=token.c;h=1cd9ebadc5df82706d94a683cdc5e02570fc5d24;hp=ca38406e5707dd07c44abed620dad9b5f5bcdeb9;hb=c74d8ef6f193cb2be876c920c5cb7f599dd5418a;hpb=d1fe92e22362ab81cdf10f09b4847261f3b9899a

diff --git a/token.c b/token.c
index ca38406..1cd9eba 100644
--- a/token.c
+++ b/token.c
@@ -617,7 +617,7 @@ overflow:
 //
 char * GetNextMacroLine(void)
 {
-	unsigned source_addr;
+//	unsigned source_addr;
 
 	IMACRO * imacro = cur_inobj->inobj.imacro;
 //	LONG * strp = imacro->im_nextln;
@@ -1547,7 +1547,11 @@ int d_goto(WORD unused)
 			// Compare names (sleazo string compare)
 			// This string compare is not right. Doesn't check for lengths.
 			// (actually it does, but in a crappy, unclear way.)
-#warning "!!! Bad string comparison !!!"
+#ifndef _MSC_VER
+			#warning "!!! Bad string comparison !!!"
+#else
+			#pragma WARNING(!!!! Bad string comparison !!!)
+#endif
 			s1 = sym;
 //			s2 = (char *)(defln + 1) + 1;
 			s2 = defln->line;