9286637b98386f523e3eefb3c4dbd21eccdf3444
[Faustine.git] / interpretor / preprocessor / faust-0.9.47mr3 / compiler / parser / faustlexer.l
1 /* -*- Mode: C++; tab-width: 4; c-basic-offset: 4 -*- */
2
3 /* Scanner for the Faust language */
4
5 %{
6 #include "tree.hh"
7 #include "faustparser.hpp"
8 #define YY_NO_UNISTD_H 1
9 extern int isatty (int );
10 %}
11
12 DIGIT [0-9]
13 ID [a-zA-Z][_a-zA-Z0-9]*
14 LETTER [a-zA-Z]
15 NUMBER ({DIGIT}+"."{DIGIT}*|"."{DIGIT}+|{DIGIT}+)
16 WSPACE [ \t\n]
17 TMACRO \\{ID}(\[(\ *({ID}|{NUMBER}),?\ *)\])?(\{(\ *({ID}|{NUMBER}),?\ *)*\})*
18
19 %option yylineno
20 %x comment
21 %x doc
22 %x lst
23
24
25 %%
26
27
28 "/*" BEGIN(comment);
29 <comment>[^*\x0a\x0d]* /* eat anything that's not a '*' */
30 <comment>"*"+[^*/\x0a\x0d]* /* eat up '*'s not followed by '/'s */
31 <comment>\x0a\x0d /* no need to increment yylineno here */
32 <comment>\x0a /* no need to increment yylineno here */
33 <comment>\x0d /* no need to increment yylineno here */
34 <comment>"*"+"/" BEGIN(INITIAL);
35
36 "<mdoc>" { BEGIN(doc); return BDOC; }
37 <doc>. return DOCCHAR; /* char by char, may be slow ?? */
38 <doc>\n return DOCCHAR; /* keep newline chars */
39 <doc>"<notice/>" return NOTICE; /* autoclosing tag */
40 <doc>"<notice />" return NOTICE; /* autoclosing tag */
41 <doc>"<listing" { BEGIN(lst); return BLST; } /* autoclosing tag */
42 <doc>"<equation>" { BEGIN(INITIAL); return BEQN; }
43 "</equation>" { BEGIN(doc); return EEQN; }
44 <doc>"<diagram>" { BEGIN(INITIAL); return BDGM; }
45 "</diagram>" { BEGIN(doc); return EDGM; }
46 <doc>"<metadata>" { BEGIN(INITIAL); return BMETADATA; }
47 "</metadata>" { BEGIN(doc); return EMETADATA; }
48 <doc>"</mdoc>" { BEGIN(INITIAL); return EDOC; }
49
50 <lst>"true" return LSTTRUE;
51 <lst>"false" return LSTFALSE;
52 <lst>"dependencies" return LSTDEPENDENCIES;
53 <lst>"mdoctags" return LSTMDOCTAGS;
54 <lst>"distributed" return LSTDISTRIBUTED;
55 <lst>"=" return LSTEQ;
56 <lst>"\"" return LSTQ;
57 <lst>"/>" { BEGIN(doc); return ELST; }
58
59
60 {DIGIT}+ return INT;
61
62
63 {DIGIT}+"."{DIGIT}* return FLOAT;
64 {DIGIT}+"."{DIGIT}*e[-+]?{DIGIT}+ return FLOAT;
65 {DIGIT}+e[-+]?{DIGIT}+ return FLOAT;
66 "."{DIGIT}+ return FLOAT;
67 "."{DIGIT}+e[-+]?{DIGIT}+ return FLOAT;
68
69
70 ":" return SEQ;
71 "," return PAR;
72 "<:" return SPLIT;
73 "+>" return MIX;
74 ":>" return MIX;
75 "~" return REC;
76
77 "+" return ADD;
78 "-" return SUB;
79 "*" return MUL;
80 "/" return DIV;
81 "%" return MOD;
82 "@" return FDELAY;
83 "'" return DELAY1;
84
85 "&" return AND;
86 "|" return OR;
87 "xor" return XOR;
88
89 "<<" return LSH;
90 ">>" return RSH;
91
92 "<" return LT;
93 "<=" return LE;
94 ">" return GT;
95 ">=" return GE;
96 "==" return EQ;
97 "!=" return NE;
98
99 "_" return WIRE;
100 "!" return CUT;
101
102 ";" return ENDDEF;
103 "=" return DEF;
104 "(" return LPAR;
105 ")" return RPAR;
106 "{" return LBRAQ;
107 "}" return RBRAQ;
108 "[" return LCROC;
109 "]" return RCROC;
110
111 "\\" return LAMBDA;
112 "." return DOT;
113 "with" return WITH;
114
115 "mem" return MEM;
116 "prefix" return PREFIX;
117
118 "int" return INTCAST;
119 "float" return FLOATCAST;
120
121 "rdtable" return RDTBL;
122 "rwtable" return RWTBL;
123
124 "select2" return SELECT2;
125 "select3" return SELECT3;
126
127 "ffunction" return FFUNCTION;
128 "fconstant" return FCONSTANT;
129 "fvariable" return FVARIABLE;
130
131 "button" return BUTTON;
132 "checkbox" return CHECKBOX;
133 "vslider" return VSLIDER;
134 "hslider" return HSLIDER;
135 "nentry" return NENTRY;
136 "vgroup" return VGROUP;
137 "hgroup" return HGROUP;
138 "tgroup" return TGROUP;
139 "vbargraph" return VBARGRAPH;
140 "hbargraph" return HBARGRAPH;
141 "attach" return ATTACH;
142
143 "acos" return ACOS;
144 "asin" return ASIN;
145 "atan" return ATAN;
146 "atan2" return ATAN2;
147
148 "cos" return COS;
149 "sin" return SIN;
150 "tan" return TAN;
151
152 "exp" return EXP;
153 "log" return LOG;
154 "log10" return LOG10;
155 "^" return POWOP;
156 "pow" return POWFUN;
157 "sqrt" return SQRT;
158
159 "abs" return ABS;
160 "min" return MIN;
161 "max" return MAX;
162
163 "fmod" return FMOD;
164 "remainder" return REMAINDER;
165
166 "floor" return FLOOR;
167 "ceil" return CEIL;
168 "rint" return RINT;
169
170 "seq" return ISEQ;
171 "par" return IPAR;
172 "sum" return ISUM;
173 "prod" return IPROD;
174
175 "import" return IMPORT;
176 "component" return COMPONENT;
177 "library" return LIBRARY;
178 "environment" return ENVIRONMENT;
179
180 "declare" return DECLARE;
181
182 "serialize" return SERIALIZE;
183 "vectorize" return VECTORIZE;
184 "#" return HASH;
185 "rate" return RATE;
186
187 "up" return UPSAMPLE;
188 "down" return DOWNSAMPLE;
189
190 "case" return CASE;
191 "=>" return ARROW;
192
193 _{ID} return IDENT;
194 {ID} return IDENT;
195
196 "\""[^\"]*"\"" return STRING;
197
198 "<"{LETTER}*"."{LETTER}">" return FSTRING;
199 "<"{LETTER}*">" return FSTRING;
200
201
202 "//"[^\x0a\x0d]* /* eat up one-line comments */
203
204 [ \t\x0a\x0d]+ /* eat up whitespace */
205
206 <<EOF>> yyterminate();
207
208 . printf("extra text is : %s\n", yytext); return EXTRA;
209
210
211 %%
212 int yywrap() { return 1; }
213