Mercurial > hg-old > index.cgi
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;