diff lwasm/pass1.c @ 418:4b137a8cf32a

Implemented "branch points"
author lost@l-w.ca
date Tue, 10 Aug 2010 23:08:30 -0600
parents cac204676434
children
line wrap: on
line diff
--- a/lwasm/pass1.c	Tue Aug 10 23:08:07 2010 -0600
+++ b/lwasm/pass1.c	Tue Aug 10 23:08:30 2010 -0600
@@ -98,6 +98,7 @@
 		cl -> dshow = -1;
 		cl -> dsize = 0;
 		cl -> dptr = NULL;
+		cl -> isbrpt = 0;
 		as -> cl = cl;
 		if (!as -> line_tail)
 		{
@@ -209,7 +210,9 @@
 					/* do nothing */ ;
 			}
 		}
-		if (sym)
+		if (sym && strcmp(sym, "!") == 0)
+			cl -> isbrpt = 1;
+		else if (sym)
 			cl -> sym = lw_strdup(sym);
 		cl -> symset = 0;