end of line
[scilab.git] / scilab / modules / scicos / src / xml2modelica / stringLexer.ml
1 # 23 "stringLexer.mll"
2  
3
4 open StringParser
5
6 exception Illegal_character of char * int * int
7
8
9 # 10 "stringLexer.ml"
10 let __ocaml_lex_tables = {
11   Lexing.lex_base = 
12    "\000\000\249\255\001\000\000\000\000\000\000\000\000\000\002\000\
13     \000\000\255\255\001\000\254\255\000\000\002\000\002\000\253\255\
14     \000\000\003\000\252\255\008\000\004\000\004\000\251\255";
15   Lexing.lex_backtrk = 
16    "\005\000\255\255\005\000\007\000\255\255\255\255\255\255\255\255\
17     \255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\
18     \255\255\255\255\255\255\255\255\255\255\255\255\255\255";
19   Lexing.lex_default = 
20    "\002\000\000\000\002\000\255\255\255\255\255\255\255\255\255\255\
21     \255\255\000\000\255\255\000\000\255\255\255\255\255\255\000\000\
22     \255\255\255\255\000\000\255\255\255\255\255\255\000\000";
23   Lexing.lex_trans = 
24    "\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\
25     \000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\
26     \000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\
27     \000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\
28     \000\000\000\000\000\000\000\000\000\000\000\000\003\000\255\255\
29     \000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\
30     \000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\
31     \000\000\000\000\000\000\009\000\011\000\015\000\018\000\022\000\
32     \000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\
33     \000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\
34     \000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\
35     \000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\
36     \000\000\005\000\000\000\000\000\000\000\000\000\000\000\006\000\
37     \000\000\000\000\000\000\000\000\007\000\013\000\000\000\016\000\
38     \012\000\004\000\014\000\017\000\010\000\019\000\008\000\020\000\
39     \021\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\
40     \000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\
41     \000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\
42     \000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\
43     \000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\
44     \000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\
45     \000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\
46     \000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\
47     \000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\
48     \000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\
49     \000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\
50     \000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\
51     \000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\
52     \000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\
53     \000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\
54     \000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\
55     \000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\
56     \001\000\255\255\000\000\000\000\000\000\000\000\000\000\000\000\
57     \000\000";
58   Lexing.lex_check = 
59    "\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\
60     \255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\
61     \255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\
62     \255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\
63     \255\255\255\255\255\255\255\255\255\255\255\255\000\000\002\000\
64     \255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\
65     \255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\
66     \255\255\255\255\255\255\008\000\010\000\014\000\017\000\021\000\
67     \255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\
68     \255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\
69     \255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\
70     \255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\
71     \255\255\003\000\255\255\255\255\255\255\255\255\255\255\003\000\
72     \255\255\255\255\255\255\255\255\003\000\005\000\255\255\012\000\
73     \005\000\003\000\013\000\016\000\006\000\004\000\007\000\019\000\
74     \020\000\255\255\255\255\255\255\255\255\255\255\255\255\255\255\
75     \255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\
76     \255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\
77     \255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\
78     \255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\
79     \255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\
80     \255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\
81     \255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\
82     \255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\
83     \255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\
84     \255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\
85     \255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\
86     \255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\
87     \255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\
88     \255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\
89     \255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\
90     \255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\
91     \000\000\002\000\255\255\255\255\255\255\255\255\255\255\255\255\
92     \255\255";
93   Lexing.lex_base_code = 
94    "";
95   Lexing.lex_backtrk_code = 
96    "";
97   Lexing.lex_default_code = 
98    "";
99   Lexing.lex_trans_code = 
100    "";
101   Lexing.lex_check_code = 
102    "";
103   Lexing.lex_code = 
104    "";
105 }
106
107 let rec token lexbuf =
108     __ocaml_lex_token_rec lexbuf 0
109 and __ocaml_lex_token_rec lexbuf __ocaml_lex_state =
110   match Lexing.engine __ocaml_lex_tables __ocaml_lex_state lexbuf with
111       | 0 ->
112 # 32 "stringLexer.mll"
113             ( let _ = Lexing.lexeme lexbuf in STRING "<" )
114 # 115 "stringLexer.ml"
115
116   | 1 ->
117 # 33 "stringLexer.mll"
118             ( let _ = Lexing.lexeme lexbuf in STRING ">" )
119 # 120 "stringLexer.ml"
120
121   | 2 ->
122 # 34 "stringLexer.mll"
123              ( let _ = Lexing.lexeme lexbuf in STRING "&" )
124 # 125 "stringLexer.ml"
125
126   | 3 ->
127 # 35 "stringLexer.mll"
128               ( let _ = Lexing.lexeme lexbuf in STRING "'" )
129 # 130 "stringLexer.ml"
130
131   | 4 ->
132 # 36 "stringLexer.mll"
133               ( let _ = Lexing.lexeme lexbuf in STRING "\"" )
134 # 135 "stringLexer.ml"
135
136   | 5 ->
137 # 37 "stringLexer.mll"
138              ( let lxm = Lexing.lexeme lexbuf in STRING lxm )
139 # 140 "stringLexer.ml"
140
141   | 6 ->
142 # 38 "stringLexer.mll"
143          ( EOF )
144 # 145 "stringLexer.ml"
145
146   | 7 ->
147 # 39 "stringLexer.mll"
148        ( raise (
149            Illegal_character (
150              (Lexing.lexeme lexbuf).[0],
151               Lexing.lexeme_start lexbuf,
152               Lexing.lexeme_end lexbuf)) )
153 # 154 "stringLexer.ml"
154
155   | __ocaml_lex_state -> lexbuf.Lexing.refill_buff lexbuf; __ocaml_lex_token_rec lexbuf __ocaml_lex_state
156
157 ;;
158