Diff of /trunk/src/parser/diderot.lex

Parent Directory | Revision Log | Patch

	revision 49, Tue Apr 13 23:16:22 2010 UTC	revision 50, Wed Apr 14 21:49:50 2010 UTC
#	Line 123	Line 123
123	=> (mkFloat yysubstr);	=> (mkFloat yysubstr);
124	<INITIAL> {ws}          => (skip ());	<INITIAL> {ws}          => (skip ());
125
126		<INITIAL> "\""          => (YYBEGIN STRING; continue());
127
128	<INITIAL> .             => (lexErr(yypos, ["bad character `", String.toString yytext]);	<INITIAL> .             => (lexErr(yypos, ["bad character `", String.toString yytext]);
129	continue());	continue());
130
131	(***** Strings *****)	(***** Strings *****)
	<INITIAL> "\""          => (YYBEGIN STRING; continue());
132	<STRING>{esc}           => (addStr(valOf(String.fromString yytext)); continue());	<STRING>{esc}           => (addStr(valOf(String.fromString yytext)); continue());
133	<STRING>{sgood}+        => (addStr yytext; continue());	<STRING>{sgood}+        => (addStr yytext; continue());
134	<STRING> "\""           => (YYBEGIN INITIAL; mkString());	<STRING> "\""           => (YYBEGIN INITIAL; mkString());

---

Colored Diff Long Colored Diff Unidiff Context Diff Side by Side

Legend: Removed from v.49   changed lines   Added in v.50

---

root@smlnj-gforge.cs.uchicago.edu	ViewVC Help
Powered by ViewVC 1.0.0