# 1 "lexer.mll" open Parser open Types # 7 "lexer.ml" let __ocaml_lex_tables = { Lexing.lex_base = "\000\000\217\255\218\255\001\000\222\255\223\255\224\255\225\255\ \017\000\002\000\001\000\233\255\000\000\236\255\000\000\238\255\ \000\000\001\000\000\000\018\000\000\000\000\000\247\255\023\000\ \249\255\250\255\251\255\252\255\253\255\254\255\255\255\003\000\ \001\000\013\000\248\255\231\255\230\255\014\000\016\000\015\000\ \246\255\014\000\245\255\024\000\019\000\024\000\244\255\019\000\ \240\255\002\000\001\000\001\000\028\000\002\000\015\000\003\000\ \234\255\040\000\024\000\025\000\038\000\029\000\033\000\228\255\ \044\000\045\000\227\255\032\000\243\255\051\000\039\000\034\000\ \032\000\041\000\241\255\037\000\057\000\057\000\048\000\057\000\ \239\255\060\000\044\000\050\000\048\000\058\000\042\000\064\000\ \237\255\235\255\220\255\065\000\065\000\063\000\049\000\229\255\ \219\255"; Lexing.lex_backtrk = "\255\255\255\255\255\255\034\000\255\255\255\255\255\255\255\255\ \029\000\255\255\023\000\255\255\255\255\255\255\255\255\255\255\ \255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\ \255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\ \255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\ \255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\ \255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\ \255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\ \255\255\255\255\255\255\255\255\255\255\255\255\255\255\013\000\ \255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\ \255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\ \255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\ \255\255"; Lexing.lex_default = "\255\255\000\000\000\000\255\255\000\000\000\000\000\000\000\000\ \255\255\255\255\255\255\000\000\255\255\000\000\255\255\000\000\ \255\255\255\255\255\255\255\255\255\255\255\255\000\000\255\255\ \000\000\000\000\000\000\000\000\000\000\000\000\000\000\255\255\ \255\255\255\255\000\000\000\000\000\000\255\255\255\255\255\255\ \000\000\255\255\000\000\255\255\255\255\255\255\000\000\255\255\ \000\000\255\255\255\255\255\255\255\255\255\255\255\255\255\255\ \000\000\255\255\255\255\255\255\255\255\255\255\255\255\000\000\ \255\255\255\255\000\000\255\255\000\000\255\255\255\255\255\255\ \255\255\255\255\000\000\255\255\255\255\255\255\255\255\255\255\ \000\000\255\255\255\255\255\255\255\255\255\255\255\255\255\255\ \000\000\000\000\000\000\255\255\255\255\255\255\255\255\000\000\ \000\000"; Lexing.lex_trans = "\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\ \000\000\030\000\030\000\000\000\000\000\000\000\000\000\000\000\ \000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\ \000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\ \030\000\024\000\000\000\013\000\000\000\015\000\000\000\000\000\ \006\000\005\000\027\000\029\000\004\000\028\000\007\000\026\000\ \008\000\008\000\008\000\008\000\008\000\008\000\008\000\008\000\ \008\000\008\000\003\000\090\000\010\000\000\000\011\000\096\000\ \022\000\008\000\008\000\008\000\008\000\008\000\008\000\008\000\ \008\000\008\000\008\000\000\000\000\000\000\000\000\000\000\000\ \000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\ \000\000\000\000\000\000\012\000\000\000\089\000\000\000\025\000\ \000\000\017\000\052\000\018\000\075\000\081\000\021\000\057\000\ \056\000\020\000\051\000\054\000\037\000\023\000\041\000\067\000\ \009\000\036\000\016\000\019\000\091\000\069\000\014\000\043\000\ \032\000\035\000\034\000\045\000\033\000\038\000\002\000\039\000\ \031\000\040\000\042\000\044\000\049\000\047\000\046\000\048\000\ \053\000\055\000\050\000\058\000\059\000\060\000\061\000\064\000\ \063\000\065\000\066\000\068\000\070\000\071\000\072\000\073\000\ \074\000\076\000\077\000\078\000\079\000\062\000\080\000\082\000\ \083\000\084\000\085\000\086\000\087\000\088\000\092\000\093\000\ \094\000\095\000\000\000\000\000\000\000\000\000\000\000\000\000\ \000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\ \000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\ \000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\ \000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\ \000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\ \000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\ \000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\ \000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\ \000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\ \000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\ \001\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\ \000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\ \000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\ \000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\ \000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\ \000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\ \000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\ \000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\ \000\000\000\000"; Lexing.lex_check = "\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\ \255\255\000\000\000\000\255\255\255\255\255\255\255\255\255\255\ \255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\ \255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\ \000\000\000\000\255\255\000\000\255\255\000\000\255\255\255\255\ \000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\ \000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\ \000\000\000\000\000\000\010\000\000\000\255\255\000\000\003\000\ \000\000\008\000\008\000\008\000\008\000\008\000\008\000\008\000\ \008\000\008\000\008\000\255\255\255\255\255\255\255\255\255\255\ \255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\ \255\255\255\255\255\255\000\000\255\255\012\000\255\255\000\000\ \255\255\000\000\051\000\000\000\016\000\014\000\000\000\049\000\ \055\000\000\000\050\000\053\000\021\000\000\000\020\000\018\000\ \000\000\031\000\000\000\000\000\009\000\017\000\000\000\019\000\ \023\000\032\000\033\000\019\000\023\000\037\000\000\000\038\000\ \023\000\039\000\041\000\019\000\043\000\044\000\045\000\047\000\ \052\000\054\000\043\000\057\000\058\000\059\000\060\000\061\000\ \062\000\064\000\065\000\067\000\069\000\070\000\071\000\072\000\ \073\000\075\000\076\000\077\000\078\000\060\000\079\000\081\000\ \082\000\083\000\084\000\085\000\086\000\087\000\091\000\092\000\ \093\000\094\000\255\255\255\255\255\255\255\255\255\255\255\255\ \255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\ \255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\ \255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\ \255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\ \255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\ \255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\ \255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\ \255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\ \255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\ \255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\ \000\000\255\255\255\255\255\255\255\255\255\255\255\255\255\255\ \255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\ \255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\ \255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\ \255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\ \255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\ \255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\ \255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\ \255\255\255\255"; Lexing.lex_base_code = ""; Lexing.lex_backtrk_code = ""; Lexing.lex_default_code = ""; Lexing.lex_trans_code = ""; Lexing.lex_check_code = ""; Lexing.lex_code = ""; } let rec token lexbuf = __ocaml_lex_token_rec lexbuf 0 and __ocaml_lex_token_rec lexbuf __ocaml_lex_state = match Lexing.engine __ocaml_lex_tables __ocaml_lex_state lexbuf with | 0 -> # 7 "lexer.mll" ( token lexbuf ) # 156 "lexer.ml" | 1 -> # 9 "lexer.mll" ( IDENT Add) # 161 "lexer.ml" | 2 -> # 10 "lexer.mll" ( IDENT Sub) # 166 "lexer.ml" | 3 -> # 11 "lexer.mll" ( IDENT Mul) # 171 "lexer.ml" | 4 -> # 12 "lexer.mll" ( IDENT Div) # 176 "lexer.ml" | 5 -> # 13 "lexer.mll" ( IDENT Pass) # 181 "lexer.ml" | 6 -> # 14 "lexer.mll" ( IDENT Stop) # 186 "lexer.ml" | 7 -> # 15 "lexer.mll" ( IDENT Mem) # 191 "lexer.ml" | 8 -> # 16 "lexer.mll" ( IDENT Delay) # 196 "lexer.ml" | 9 -> # 17 "lexer.mll" ( IDENT Floor) # 201 "lexer.ml" | 10 -> # 18 "lexer.mll" ( IDENT Int) # 206 "lexer.ml" | 11 -> # 19 "lexer.mll" ( IDENT Sin) # 211 "lexer.ml" | 12 -> # 20 "lexer.mll" ( IDENT Cos) # 216 "lexer.ml" | 13 -> # 21 "lexer.mll" ( IDENT Atan) # 221 "lexer.ml" | 14 -> # 22 "lexer.mll" ( IDENT Atan2) # 226 "lexer.ml" | 15 -> # 23 "lexer.mll" ( IDENT Sqrt) # 231 "lexer.ml" | 16 -> # 24 "lexer.mll" ( IDENT Rdtable) # 236 "lexer.ml" | 17 -> # 25 "lexer.mll" ( IDENT Mod) # 241 "lexer.ml" | 18 -> # 26 "lexer.mll" ( IDENT Vectorize) # 246 "lexer.ml" | 19 -> # 27 "lexer.mll" ( IDENT Vconcat) # 251 "lexer.ml" | 20 -> # 28 "lexer.mll" ( IDENT Vpick ) # 256 "lexer.ml" | 21 -> # 29 "lexer.mll" ( IDENT Serialize) # 261 "lexer.ml" | 22 -> # 30 "lexer.mll" ( IDENT Larger) # 266 "lexer.ml" | 23 -> # 31 "lexer.mll" ( IDENT Smaller) # 271 "lexer.ml" | 24 -> # 32 "lexer.mll" ( IDENT Max) # 276 "lexer.ml" | 25 -> # 33 "lexer.mll" ( IDENT Min) # 281 "lexer.ml" | 26 -> # 34 "lexer.mll" ( IDENT Prefix) # 286 "lexer.ml" | 27 -> # 35 "lexer.mll" ( IDENT Select2) # 291 "lexer.ml" | 28 -> # 36 "lexer.mll" ( IDENT Select3) # 296 "lexer.ml" | 29 -> let # 39 "lexer.mll" a # 302 "lexer.ml" = Lexing.sub_lexeme lexbuf lexbuf.Lexing.lex_start_pos lexbuf.Lexing.lex_curr_pos in # 39 "lexer.mll" ( CONST a ) # 306 "lexer.ml" | 30 -> # 40 "lexer.mll" ( POINT ) # 311 "lexer.ml" | 31 -> # 43 "lexer.mll" ( LPAR ) # 316 "lexer.ml" | 32 -> # 44 "lexer.mll" ( RPAR ) # 321 "lexer.ml" | 33 -> # 45 "lexer.mll" ( PAR ) # 326 "lexer.ml" | 34 -> # 46 "lexer.mll" ( SEQ ) # 331 "lexer.ml" | 35 -> # 47 "lexer.mll" ( SPLIT ) # 336 "lexer.ml" | 36 -> # 48 "lexer.mll" ( MERGE ) # 341 "lexer.ml" | 37 -> # 49 "lexer.mll" ( REC ) # 346 "lexer.ml" | 38 -> # 50 "lexer.mll" ( EOF ) # 351 "lexer.ml" | __ocaml_lex_state -> lexbuf.Lexing.refill_buff lexbuf; __ocaml_lex_token_rec lexbuf __ocaml_lex_state ;;