diff parser_old_c.rhope @ 142:7bbdc034e347

Fix some bugs. Get basic network code working (epoll listener + accept connections). Start porting webserver.
author Mike Pavone <pavone@retrodev.com>
date Sun, 21 Nov 2010 16:33:17 -0500
parents a68e6828d896
children e769b2e0facc
line wrap: on
line diff
--- a/parser_old_c.rhope	Sat Nov 20 17:48:22 2010 -0500
+++ b/parser_old_c.rhope	Sun Nov 21 16:33:17 2010 -0500
@@ -1056,7 +1056,8 @@
 				value,after <- Parse Number[name, params]
 			}{
 				delims <- [[[[[[[("\n")]Append[[params]Block Begin >>]]Append[[params]Block End >>]]Append[[params]Empty Block >>]]Append[[params]Arg End >>]]Append[[params]List Delim >>]]Append[[params]List End >>]]Append[[params]List Begin >>]
-				afterdelim,raw before,delim,nodelim <- [name]Get Comment DString[delims, params]
+				afterdelim,raw before,delim,nodelim <- [name]Get Comment DString[delims, params] {} {} {}
+				{ delim <- "" }
 
 				before <- Trim[raw before, "\r\n\t "]
 				If[[delim] = [[params]List Begin >>]]
@@ -1435,9 +1436,12 @@
 			}
 			Val[valstring]
 			{
+				Print[["Parsing initial value: "]Append[valstring]]
 				value <- [Named Pipe or Literal[Trim[~, "\r\n\t "], params]]Value >>
 				next store <- [store]Vars <<[ [[store]Vars >>]Set[varname, value] ]
 			}
+		}{
+			Print[["Expected assignment operator in global var block, found "]Append[trimmed]]
 		}
 	}{
 		out <- store