]> Git — Sourcephile - haskell/symantic-parser.git/blob - tests/Golden/Grammar/OptimizeGrammar/G5.expected.txt
!fixup impl: move `liftTypedString` to `Language.Haskell.TH.Show`
[haskell/symantic-parser.git] / tests / Golden / Grammar / OptimizeGrammar / G5.expected.txt
1 lets
2 + let name
3 | ` try
4 | ` <*>
5 | + <*>
6 | | + <*>
7 | | | + <*>
8 | | | | + pure (\u_0 -> \u_1 -> \u_2 -> \u_3 -> (GHC.Types.:) 'a' ((GHC.Types.:) 'b' ((GHC.Types.:) 'c' ((GHC.Types.:) 'd' GHC.Types.[]))))
9 | | | | ` satisfy ((GHC.Classes.==) 'a')
10 | | | ` satisfy ((GHC.Classes.==) 'b')
11 | | ` satisfy ((GHC.Classes.==) 'c')
12 | ` satisfy ((GHC.Classes.==) 'd')
13 ` <*>
14 + <*>
15 | + <*>
16 | | + pure (\u_0 -> \u_1 -> \u_2 -> GHC.Show.show ((GHC.Types.:) u_0 u_1))
17 | | ` ref name
18 | ` chainPre
19 | + <*>
20 | | + pure (GHC.Types.:)
21 | | ` ref name
22 | ` pure GHC.Types.[]
23 ` eof