qbe

commit a40982bb2a9572c242dfdc4192d552ed8f805da5
parent 7c92b5a0c44b8faf9e5425b17caa4610da0e6902
Author: Quentin Carbonneaux <quentin.carbonneaux@yale.edu>
Date:   Fri,  3 Jul 2015 15:11:15 -0400

add comments

Diffstat:
M
lisc/lisc.h
 | 
2
+-
M
lisc/parse.c
 | 
9
+++++++++

2 files changed, 10 insertions(+), 1 deletion(-)
diff --git a/lisc/lisc.h b/lisc/lisc.h
@@ -50,7 +50,7 @@ enum {
 	OSub,
 	ODiv,
 	OMod,
-	OConst,
+	OCopy,
 
 	/* reserved instructions */
 	OX86Div,
diff --git a/lisc/parse.c b/lisc/parse.c
@@ -22,6 +22,7 @@ enum PState {
 
 enum Token {
 	TXXX,
+	TCopy,
 	TAdd,
 	TSub,
 	TDiv,
@@ -93,6 +94,7 @@ lex()
 		char *str;
 		Token tok;
 	} tmap[] = {
+		{ "copy", TCopy },
 		{ "add", TAdd },
 		{ "sub", TSub },
 		{ "div", TDiv },
@@ -121,6 +123,9 @@ lex()
 		return TRParen;
 	case '=':
 		return TEq;
+	case '#':
+		while (fgetc(inf) != '\n')
+			;
 	case '\n':
 		lnum++;
 		return TNL;
@@ -352,6 +357,10 @@ parseline(PState ps)
 	r = varref(tokval.str);
 	expect(TEq);
 	switch (next()) {
+	case TCopy:
+		op = OCopy;
+		j = 1;
+		break;
 	case TAdd:
 		op = OAdd;
 		j = 2;