From: thurston <thurston@052ea7fc-9027-0410-9066-f65837a77df0>
Date: Tue, 6 Feb 2007 21:09:33 +0000 (+0000)
Subject: Added missing write init.
X-Git-Tag: 2.0_alpha~399
X-Git-Url: http://review.tizen.org/git/?a=commitdiff_plain;h=c21d57215416bde552a8808ced1775cad4628531;p=external%2Fragel.git

Added missing write init.


git-svn-id: http://svn.complang.org/ragel/trunk@87 052ea7fc-9027-0410-9066-f65837a77df0
---

diff --git a/examples/pullscan.rl b/examples/pullscan.rl
index 79e3c49..110a72c 100644
--- a/examples/pullscan.rl
+++ b/examples/pullscan.rl
@@ -26,11 +26,17 @@ typedef struct _Scanner {
 } Scanner;
 
 
+%%{
+	machine Scanner;
+	write data;
+}%%
+
 void scan_init( Scanner *s, FILE *file )
 {
 	memset (s, '\0', sizeof(Scanner));
 	s->curline = 1;
 	s->file = file;
+	%% write init;
 }
 
 #define TK_NO_TOKEN (-1)
@@ -39,12 +45,6 @@ void scan_init( Scanner *s, FILE *file )
 #define TK_Identifier 130
 #define TK_Number 131
 
-
-%%{
-	machine Scanner;
-	write data;
-}%%
-
 #define ret_tok( _tok ) token = _tok; s->data = s->tokstart
 
 int scan( Scanner *s )
@@ -105,6 +105,8 @@ int scan( Scanner *s )
 			# Whitespace
 			[ \t\n];
 
+			'"' ( [^\\"] | '\\' any ) * '"';
+
 			# Number
 			digit+ => 
 				{ ret_tok( TK_Number ); fbreak; };