]> Git — Sourcephile - haskell/symantic-parser.git/blob - test/Golden/Machine/G11.expected.txt
grammar: add precedence to showCode
[haskell/symantic-parser.git] / test / Golden / Machine / G11.expected.txt
1 let <hidden>
2 minReads=(Right 0)
3 mayRaise=[ExceptionFailure]
4 | catch ExceptionFailure
5 | minReads=(Right 0)
6 | mayRaise=[ExceptionFailure]
7 | | <ok>
8 | | | pushValue (\x_0 -> \x_1 -> \x_2 -> x_0 (x_1 x_2))
9 | | | minReads=(Right 1)
10 | | | mayRaise=[ExceptionFailure]
11 | | | pushValue (GHC.Types.:)
12 | | | minReads=(Right 1)
13 | | | mayRaise=[ExceptionFailure]
14 | | | pushValue (\x_0 -> \x_1 -> x_0)
15 | | | minReads=(Right 1)
16 | | | mayRaise=[ExceptionFailure]
17 | | | pushValue 'a'
18 | | | minReads=(Right 1)
19 | | | mayRaise=[ExceptionFailure]
20 | | | lift2Value (\x_0 -> \x_1 -> x_0 x_1)
21 | | | minReads=(Right 1)
22 | | | mayRaise=[ExceptionFailure]
23 | | | read ((GHC.Classes.==) 'a')
24 | | | minReads=(Right 1)
25 | | | mayRaise=[ExceptionFailure]
26 | | | lift2Value (\x_0 -> \x_1 -> x_0 x_1)
27 | | | minReads=(Right 0)
28 | | | mayRaise=[ExceptionFailure]
29 | | | lift2Value (\x_0 -> \x_1 -> x_0 x_1)
30 | | | minReads=(Right 0)
31 | | | mayRaise=[ExceptionFailure]
32 | | | lift2Value (\x_0 -> \x_1 -> x_0 x_1)
33 | | | minReads=(Right 0)
34 | | | mayRaise=[ExceptionFailure]
35 | | | call <hidden>
36 | | | minReads=(Right 0)
37 | | | mayRaise=[ExceptionFailure]
38 | | | lift2Value (\x_0 -> \x_1 -> x_0 x_1)
39 | | | minReads=(Right 0)
40 | | | mayRaise=[]
41 | | | commit ExceptionFailure
42 | | | minReads=(Right 0)
43 | | | mayRaise=[]
44 | | | ret
45 | | | minReads=(Right 0)
46 | | | mayRaise=[]
47 | | <ko>
48 | | | pushInput
49 | | | minReads=(Right 0)
50 | | | mayRaise=[ExceptionFailure]
51 | | | lift2Value (\(Data.Text.Internal.Text _ i_0 _) (Data.Text.Internal.Text _
52 | | | j_1
53 | | | _) -> i_0 GHC.Classes.== j_1)
54 | | | minReads=(Right 0)
55 | | | mayRaise=[ExceptionFailure]
56 | | | choicesBranch [\x_0 -> x_0]
57 | | | minReads=(Right 0)
58 | | | mayRaise=[ExceptionFailure]
59 | | | | <branch>
60 | | | | | pushValue (\x_0 -> x_0)
61 | | | | | minReads=(Right 0)
62 | | | | | mayRaise=[]
63 | | | | | ret
64 | | | | | minReads=(Right 0)
65 | | | | | mayRaise=[]
66 | | | | <default>
67 | | | | | fail []
68 | | | | | minReads=(Left ExceptionFailure)
69 | | | | | mayRaise=[ExceptionFailure]
70 pushValue GHC.Show.show
71 minReads=(Right 1)
72 mayRaise=[ExceptionFailure]
73 pushValue (\x_0 -> \x_1 -> x_0)
74 minReads=(Right 1)
75 mayRaise=[ExceptionFailure]
76 call <hidden>
77 minReads=(Right 1)
78 mayRaise=[ExceptionFailure]
79 pushValue GHC.Types.[]
80 minReads=(Right 1)
81 mayRaise=[ExceptionFailure]
82 lift2Value (\x_0 -> \x_1 -> x_0 x_1)
83 minReads=(Right 1)
84 mayRaise=[ExceptionFailure]
85 lift2Value (\x_0 -> \x_1 -> x_0 x_1)
86 minReads=(Right 1)
87 mayRaise=[ExceptionFailure]
88 pushValue (\x_0 -> \x_1 -> x_0)
89 minReads=(Right 1)
90 mayRaise=[ExceptionFailure]
91 pushValue 'b'
92 minReads=(Right 1)
93 mayRaise=[ExceptionFailure]
94 lift2Value (\x_0 -> \x_1 -> x_0 x_1)
95 minReads=(Right 1)
96 mayRaise=[ExceptionFailure]
97 read ((GHC.Classes.==) 'b')
98 minReads=(Right 1)
99 mayRaise=[ExceptionFailure]
100 lift2Value (\x_0 -> \x_1 -> x_0 x_1)
101 minReads=(Right 0)
102 mayRaise=[]
103 lift2Value (\x_0 -> \x_1 -> x_0 x_1)
104 minReads=(Right 0)
105 mayRaise=[]
106 lift2Value (\x_0 -> \x_1 -> x_0 x_1)
107 minReads=(Right 0)
108 mayRaise=[]
109 ret
110 minReads=(Right 0)
111 mayRaise=[]