]> Git — Sourcephile - haskell/symantic-parser.git/blob - test/Golden/Grammar/OptimizeGrammar/G5.expected.txt
machine: optimize ifThenElse on constant
[haskell/symantic-parser.git] / test / Golden / Grammar / OptimizeGrammar / G5.expected.txt
1 lets
2 + let <hidden>
3 | ` <|>
4 | + <*>
5 | | + <*>
6 | | | + pure (\x_0 -> \x_1 -> \x_2 -> (GHC.Types.:) x_0 (x_1 x_2))
7 | | | ` ref <hidden>
8 | | ` rec <hidden>
9 | ` pure (\x_0 -> x_0)
10 + let <hidden>
11 | ` try
12 | ` <*>
13 | + <*>
14 | | + <*>
15 | | | + <*>
16 | | | | + pure (\x_0 -> \x_1 -> \x_2 -> \x_3 -> (GHC.Types.:) 'a' ((GHC.Types.:) 'b' ((GHC.Types.:) 'c' ((GHC.Types.:) 'd' GHC.Types.[]))))
17 | | | | ` satisfy
18 | | | ` satisfy
19 | | ` satisfy
20 | ` satisfy
21 ` <*>
22 + <*>
23 | + <*>
24 | | + pure (\x_0 -> \x_1 -> \x_2 -> GHC.Show.show ((GHC.Types.:) x_0 (x_1 GHC.Types.[])))
25 | | ` ref <hidden>
26 | ` ref <hidden>
27 ` eof