qbe

commit 07c46bc6f905f3a70a043d633a7ec4b879f4db15
parent 46f99ac5b7bfda79dcd59b89257b8f9465c5a55a
Author: Quentin Carbonneaux <quentin.carbonneaux@yale.edu>
Date:   Sun,  1 Nov 2015 09:15:27 -0500

support dots in idents for k0ga

Diffstat:
M
lisc/parse.c
 | 
4
++--

1 file changed, 2 insertions(+), 2 deletions(-)
diff --git a/lisc/parse.c b/lisc/parse.c
@@ -217,7 +217,7 @@ lex()
 	t = TXXX;
 	if (0)
 Alpha:		c = fgetc(inf);
-	if (!isalpha(c))
+	if (!isalpha(c) && c != '.')
 		err("lexing failure");
 	i = 0;
 	do {
@@ -225,7 +225,7 @@ Alpha:		c = fgetc(inf);
 			err("identifier too long");
 		tok[i++] = c;
 		c = fgetc(inf);
-	} while (isalpha(c) || isdigit(c));
+	} while (isalpha(c) || c == '.' || isdigit(c));
 	tok[i] = 0;
 	ungetc(c, inf);
 	if (t != TXXX) {