diff lwasm/symbol.c @ 254:c7a41b4c89b3 2.x

Added struct support to LWASM
author lost
date Sat, 19 Dec 2009 06:38:43 +0000
parents a58f49a77441
children
line wrap: on
line diff
--- a/lwasm/symbol.c	Wed Dec 09 03:59:26 2009 +0000
+++ b/lwasm/symbol.c	Sat Dec 19 06:38:43 2009 +0000
@@ -62,7 +62,7 @@
 	// [a-zA-Z0-9._$?@] and any byte value larger than 0x7F
 	// although symbols should be restricted to the 7 bit range
 	// symbols must start with [a-zA-Z._]
-	if (!strchr(sym, '$'))
+	if ((flags & SYMBOL_NOCHECK) == 0 && !strchr(sym, '$'))
 	{
 		if (!strchr("ABCDEFGHIJKLMNOPQRSTUVWXYZabcdefghijklmnopqrstuvwxyz._@?", *sym))
 		{
@@ -79,7 +79,7 @@
 	
 	for (p = sym; *p; p++)
 	{
-		if (!strchr("ABCDEFGHIJKLMNOPQRSTUVWXYZabcdefghijklmnopqrstuvwxyz._$?@0123456789", *sym))
+		if ((flags & SYMBOL_NOCHECK == 0) && !strchr("ABCDEFGHIJKLMNOPQRSTUVWXYZabcdefghijklmnopqrstuvwxyz._$?@0123456789", *sym))
 		{
 			register_error(as, l, 1, "Bad symbol: %s", sym);
 			return -1;