X-Git-Url: https://scm.cri.ensmp.fr/git/Faustine.git/blobdiff_plain/fc2ec49c325b99370170789886b4be4f43e16d68..b8e89a384896a4f8ce3e1990a10c88e7164af55c:/documentation/code_VALParser.yyact.html diff --git a/documentation/code_VALParser.yyact.html b/documentation/code_VALParser.yyact.html deleted file mode 100644 index e222b8a..0000000 --- a/documentation/code_VALParser.yyact.html +++ /dev/null @@ -1,107 +0,0 @@ - - - - - - - - - - - - - - - - -Parser.yyact - - -let yyact = [|
-  (fun _ -> failwith "parser")
-; (fun __caml_parser_env ->
-    let _1 = (Parsing.peek_val __caml_parser_env 1 : 'faust_exp) in
-    Obj.repr(
-# 16 "parser.mly"
-                                      ( _1 )
-# 167 "parser.ml"
-               : Types.faust_exp))
-; (fun __caml_parser_env ->
-    let _1 = (Parsing.peek_val __caml_parser_env 0 : string) in
-    Obj.repr(
-# 17 "parser.mly"
-                                      ( Const(N (int_of_string _1)) )
-# 174 "parser.ml"
-               : 'faust_exp))
-; (fun __caml_parser_env ->
-    let _1 = (Parsing.peek_val __caml_parser_env 1 : string) in
-    Obj.repr(
-# 18 "parser.mly"
-                                      ( Const(R (float_of_string _1)) )
-# 181 "parser.ml"
-               : 'faust_exp))
-; (fun __caml_parser_env ->
-    let _1 = (Parsing.peek_val __caml_parser_env 2 : string) in
-    let _3 = (Parsing.peek_val __caml_parser_env 0 : string) in
-    Obj.repr(
-# 19 "parser.mly"
-                                      ( Const(R (float_of_string (_1 ^ "." ^ _3))) )
-# 189 "parser.ml"
-               : 'faust_exp))
-; (fun __caml_parser_env ->
-    let _1 = (Parsing.peek_val __caml_parser_env 0 : string) in
-    Obj.repr(
-# 20 "parser.mly"
-                                      ( Ident(symbol_of_string _1) )
-# 196 "parser.ml"
-               : 'faust_exp))
-; (fun __caml_parser_env ->
-    let _2 = (Parsing.peek_val __caml_parser_env 1 : 'faust_exp) in
-    Obj.repr(
-# 21 "parser.mly"
-                                      ( _2 )
-# 203 "parser.ml"
-               : 'faust_exp))
-; (fun __caml_parser_env ->
-    let _1 = (Parsing.peek_val __caml_parser_env 2 : 'faust_exp) in
-    let _3 = (Parsing.peek_val __caml_parser_env 0 : 'faust_exp) in
-    Obj.repr(
-# 22 "parser.mly"
-                                      ( Par(_1,_3) )
-# 211 "parser.ml"
-               : 'faust_exp))
-; (fun __caml_parser_env ->
-    let _1 = (Parsing.peek_val __caml_parser_env 2 : 'faust_exp) in
-    let _3 = (Parsing.peek_val __caml_parser_env 0 : 'faust_exp) in
-    Obj.repr(
-# 23 "parser.mly"
-                                      ( Split(_1,_3) )
-# 219 "parser.ml"
-               : 'faust_exp))
-; (fun __caml_parser_env ->
-    let _1 = (Parsing.peek_val __caml_parser_env 2 : 'faust_exp) in
-    let _3 = (Parsing.peek_val __caml_parser_env 0 : 'faust_exp) in
-    Obj.repr(
-# 24 "parser.mly"
-                                      ( Merge(_1,_3) )
-# 227 "parser.ml"
-               : 'faust_exp))
-; (fun __caml_parser_env ->
-    let _1 = (Parsing.peek_val __caml_parser_env 2 : 'faust_exp) in
-    let _3 = (Parsing.peek_val __caml_parser_env 0 : 'faust_exp) in
-    Obj.repr(
-# 25 "parser.mly"
-                                      ( Seq(_1,_3) )
-# 235 "parser.ml"
-               : 'faust_exp))
-; (fun __caml_parser_env ->
-    let _1 = (Parsing.peek_val __caml_parser_env 2 : 'faust_exp) in
-    let _3 = (Parsing.peek_val __caml_parser_env 0 : 'faust_exp) in
-    Obj.repr(
-# 26 "parser.mly"
-                                      ( Rec(_1,_3) )
-# 243 "parser.ml"
-               : 'faust_exp))
-(* Entry main *)
-; (fun __caml_parser_env -> raise (Parsing.YYexit (Parsing.peek_val __caml_parser_env 0)))
-|]
\ No newline at end of file