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