+++ /dev/null
-<html><head>
-<link rel="stylesheet" href="style.css" type="text/css">
-<meta content="text/html; charset=iso-8859-1" http-equiv="Content-Type">
-<link rel="Start" href="index.html">
-<link title="Index of types" rel=Appendix href="index_types.html">
-<link title="Index of exceptions" rel=Appendix href="index_exceptions.html">
-<link title="Index of values" rel=Appendix href="index_values.html">
-<link title="Index of modules" rel=Appendix href="index_modules.html">
-<link title="Types" rel="Chapter" href="Types.html">
-<link title="Parser" rel="Chapter" href="Parser.html">
-<link title="Lexer" rel="Chapter" href="Lexer.html">
-<link title="Value" rel="Chapter" href="Value.html">
-<link title="Signal" rel="Chapter" href="Signal.html">
-<link title="Faustexp" rel="Chapter" href="Faustexp.html">
-<link title="Interpreter" rel="Chapter" href="Interpreter.html">
-<link title="Preprocess" rel="Chapter" href="Preprocess.html">
-<link title="Main" rel="Chapter" href="Main.html"><title>Parser.yyact</title>
-</head>
-<body>
-<code class="code"><span class="keyword">let</span> yyact = [|<br>
- (<span class="keyword">fun</span> _ <span class="keywordsign">-></span> failwith <span class="string">"parser"</span>)<br>
-; (<span class="keyword">fun</span> __caml_parser_env <span class="keywordsign">-></span><br>
- <span class="keyword">let</span> _1 = (<span class="constructor">Parsing</span>.peek_val __caml_parser_env 1 : <span class="keywordsign">'</span>faust_exp) <span class="keyword">in</span><br>
- <span class="constructor">Obj</span>.repr(<br>
-# 16 "parser.mly"<br>
- ( _1 )<br>
-# 167 "parser.ml"<br>
- : <span class="constructor">Types</span>.faust_exp))<br>
-; (<span class="keyword">fun</span> __caml_parser_env <span class="keywordsign">-></span><br>
- <span class="keyword">let</span> _1 = (<span class="constructor">Parsing</span>.peek_val __caml_parser_env 0 : string) <span class="keyword">in</span><br>
- <span class="constructor">Obj</span>.repr(<br>
-# 17 "parser.mly"<br>
- ( <span class="constructor">Const</span>(<span class="constructor">N</span> (int_of_string _1)) )<br>
-# 174 "parser.ml"<br>
- : <span class="keywordsign">'</span>faust_exp))<br>
-; (<span class="keyword">fun</span> __caml_parser_env <span class="keywordsign">-></span><br>
- <span class="keyword">let</span> _1 = (<span class="constructor">Parsing</span>.peek_val __caml_parser_env 1 : string) <span class="keyword">in</span><br>
- <span class="constructor">Obj</span>.repr(<br>
-# 18 "parser.mly"<br>
- ( <span class="constructor">Const</span>(<span class="constructor">R</span> (float_of_string _1)) )<br>
-# 181 "parser.ml"<br>
- : <span class="keywordsign">'</span>faust_exp))<br>
-; (<span class="keyword">fun</span> __caml_parser_env <span class="keywordsign">-></span><br>
- <span class="keyword">let</span> _1 = (<span class="constructor">Parsing</span>.peek_val __caml_parser_env 2 : string) <span class="keyword">in</span><br>
- <span class="keyword">let</span> _3 = (<span class="constructor">Parsing</span>.peek_val __caml_parser_env 0 : string) <span class="keyword">in</span><br>
- <span class="constructor">Obj</span>.repr(<br>
-# 19 "parser.mly"<br>
- ( <span class="constructor">Const</span>(<span class="constructor">R</span> (float_of_string (_1 ^ <span class="string">"."</span> ^ _3))) )<br>
-# 189 "parser.ml"<br>
- : <span class="keywordsign">'</span>faust_exp))<br>
-; (<span class="keyword">fun</span> __caml_parser_env <span class="keywordsign">-></span><br>
- <span class="keyword">let</span> _1 = (<span class="constructor">Parsing</span>.peek_val __caml_parser_env 0 : string) <span class="keyword">in</span><br>
- <span class="constructor">Obj</span>.repr(<br>
-# 20 "parser.mly"<br>
- ( <span class="constructor">Ident</span>(symbol_of_string _1) )<br>
-# 196 "parser.ml"<br>
- : <span class="keywordsign">'</span>faust_exp))<br>
-; (<span class="keyword">fun</span> __caml_parser_env <span class="keywordsign">-></span><br>
- <span class="keyword">let</span> _2 = (<span class="constructor">Parsing</span>.peek_val __caml_parser_env 1 : <span class="keywordsign">'</span>faust_exp) <span class="keyword">in</span><br>
- <span class="constructor">Obj</span>.repr(<br>
-# 21 "parser.mly"<br>
- ( _2 )<br>
-# 203 "parser.ml"<br>
- : <span class="keywordsign">'</span>faust_exp))<br>
-; (<span class="keyword">fun</span> __caml_parser_env <span class="keywordsign">-></span><br>
- <span class="keyword">let</span> _1 = (<span class="constructor">Parsing</span>.peek_val __caml_parser_env 2 : <span class="keywordsign">'</span>faust_exp) <span class="keyword">in</span><br>
- <span class="keyword">let</span> _3 = (<span class="constructor">Parsing</span>.peek_val __caml_parser_env 0 : <span class="keywordsign">'</span>faust_exp) <span class="keyword">in</span><br>
- <span class="constructor">Obj</span>.repr(<br>
-# 22 "parser.mly"<br>
- ( <span class="constructor">Par</span>(_1,_3) )<br>
-# 211 "parser.ml"<br>
- : <span class="keywordsign">'</span>faust_exp))<br>
-; (<span class="keyword">fun</span> __caml_parser_env <span class="keywordsign">-></span><br>
- <span class="keyword">let</span> _1 = (<span class="constructor">Parsing</span>.peek_val __caml_parser_env 2 : <span class="keywordsign">'</span>faust_exp) <span class="keyword">in</span><br>
- <span class="keyword">let</span> _3 = (<span class="constructor">Parsing</span>.peek_val __caml_parser_env 0 : <span class="keywordsign">'</span>faust_exp) <span class="keyword">in</span><br>
- <span class="constructor">Obj</span>.repr(<br>
-# 23 "parser.mly"<br>
- ( <span class="constructor">Split</span>(_1,_3) )<br>
-# 219 "parser.ml"<br>
- : <span class="keywordsign">'</span>faust_exp))<br>
-; (<span class="keyword">fun</span> __caml_parser_env <span class="keywordsign">-></span><br>
- <span class="keyword">let</span> _1 = (<span class="constructor">Parsing</span>.peek_val __caml_parser_env 2 : <span class="keywordsign">'</span>faust_exp) <span class="keyword">in</span><br>
- <span class="keyword">let</span> _3 = (<span class="constructor">Parsing</span>.peek_val __caml_parser_env 0 : <span class="keywordsign">'</span>faust_exp) <span class="keyword">in</span><br>
- <span class="constructor">Obj</span>.repr(<br>
-# 24 "parser.mly"<br>
- ( <span class="constructor">Merge</span>(_1,_3) )<br>
-# 227 "parser.ml"<br>
- : <span class="keywordsign">'</span>faust_exp))<br>
-; (<span class="keyword">fun</span> __caml_parser_env <span class="keywordsign">-></span><br>
- <span class="keyword">let</span> _1 = (<span class="constructor">Parsing</span>.peek_val __caml_parser_env 2 : <span class="keywordsign">'</span>faust_exp) <span class="keyword">in</span><br>
- <span class="keyword">let</span> _3 = (<span class="constructor">Parsing</span>.peek_val __caml_parser_env 0 : <span class="keywordsign">'</span>faust_exp) <span class="keyword">in</span><br>
- <span class="constructor">Obj</span>.repr(<br>
-# 25 "parser.mly"<br>
- ( <span class="constructor">Seq</span>(_1,_3) )<br>
-# 235 "parser.ml"<br>
- : <span class="keywordsign">'</span>faust_exp))<br>
-; (<span class="keyword">fun</span> __caml_parser_env <span class="keywordsign">-></span><br>
- <span class="keyword">let</span> _1 = (<span class="constructor">Parsing</span>.peek_val __caml_parser_env 2 : <span class="keywordsign">'</span>faust_exp) <span class="keyword">in</span><br>
- <span class="keyword">let</span> _3 = (<span class="constructor">Parsing</span>.peek_val __caml_parser_env 0 : <span class="keywordsign">'</span>faust_exp) <span class="keyword">in</span><br>
- <span class="constructor">Obj</span>.repr(<br>
-# 26 "parser.mly"<br>
- ( <span class="constructor">Rec</span>(_1,_3) )<br>
-# 243 "parser.ml"<br>
- : <span class="keywordsign">'</span>faust_exp))<br>
-<span class="comment">(* Entry main *)</span><br>
-; (<span class="keyword">fun</span> __caml_parser_env <span class="keywordsign">-></span> raise (<span class="constructor">Parsing</span>.<span class="constructor">YYexit</span> (<span class="constructor">Parsing</span>.peek_val __caml_parser_env 0)))<br>
-|]</code></body></html>
\ No newline at end of file