]> Git — Sourcephile - haskell/symantic-parser.git/blob - tests/Golden/Machine/G7.expected.txt
impl: add `programWriter`
[haskell/symantic-parser.git] / tests / Golden / Machine / G7.expected.txt
1 pushValue GHC.Show.show
2 minReads=2
3 mayRaise=[ExceptionFailure]
4 alwaysRaise=[]
5 freeRegs=[]
6 join join
7 minReads=0
8 mayRaise=[]
9 alwaysRaise=[]
10 freeRegs=[]
11 | lift2Value (\u_0 -> \u_1 -> u_0 u_1)
12 | minReads=0
13 | mayRaise=[]
14 | alwaysRaise=[]
15 | freeRegs=[]
16 | ret
17 | minReads=0
18 | mayRaise=[]
19 | alwaysRaise=[]
20 | freeRegs=[]
21 catch ExceptionFailure
22 minReads=2
23 mayRaise=[ExceptionFailure]
24 alwaysRaise=[]
25 freeRegs=[]
26 | <catchScope>
27 | | catch ExceptionFailure
28 | | minReads=2
29 | | mayRaise=[ExceptionFailure]
30 | | alwaysRaise=[]
31 | | freeRegs=[]
32 | | | <catchScope>
33 | | | | pushValue (\u_0 -> \u_1 -> (GHC.Types.:) 'a' ((GHC.Types.:) 'a' GHC.Types.[]))
34 | | | | minReads=2
35 | | | | mayRaise=[ExceptionFailure]
36 | | | | alwaysRaise=[]
37 | | | | freeRegs=[]
38 | | | | comment "satisfy ((GHC.Classes.==) 'a')"
39 | | | | minReads=2
40 | | | | mayRaise=[ExceptionFailure]
41 | | | | alwaysRaise=[]
42 | | | | freeRegs=[]
43 | | | | read ((GHC.Classes.==) 'a')
44 | | | | minReads=2
45 | | | | mayRaise=[ExceptionFailure]
46 | | | | alwaysRaise=[]
47 | | | | freeRegs=[]
48 | | | | lift2Value (\u_0 -> \u_1 -> u_0 u_1)
49 | | | | minReads=1
50 | | | | mayRaise=[ExceptionFailure]
51 | | | | alwaysRaise=[]
52 | | | | freeRegs=[]
53 | | | | comment "satisfy ((GHC.Classes.==) 'a')"
54 | | | | minReads=1
55 | | | | mayRaise=[ExceptionFailure]
56 | | | | alwaysRaise=[]
57 | | | | freeRegs=[]
58 | | | | read ((GHC.Classes.==) 'a')
59 | | | | minReads=1
60 | | | | mayRaise=[ExceptionFailure]
61 | | | | alwaysRaise=[]
62 | | | | freeRegs=[]
63 | | | | lift2Value (\u_0 -> \u_1 -> u_0 u_1)
64 | | | | minReads=0
65 | | | | mayRaise=[]
66 | | | | alwaysRaise=[]
67 | | | | freeRegs=[]
68 | | | | commit ExceptionFailure
69 | | | | minReads=0
70 | | | | mayRaise=[]
71 | | | | alwaysRaise=[]
72 | | | | freeRegs=[]
73 | | | | commit ExceptionFailure
74 | | | | minReads=0
75 | | | | mayRaise=[]
76 | | | | alwaysRaise=[]
77 | | | | freeRegs=[]
78 | | | | refJoin join
79 | | | | minReads=0
80 | | | | mayRaise=[]
81 | | | | alwaysRaise=[]
82 | | | | freeRegs=[]
83 | | | <onException ExceptionFailure>
84 | | | | loadInput
85 | | | | minReads=0
86 | | | | mayRaise=[ExceptionFailure]
87 | | | | alwaysRaise=[ExceptionFailure]
88 | | | | freeRegs=[]
89 | | | | fail []
90 | | | | minReads=0
91 | | | | mayRaise=[ExceptionFailure]
92 | | | | alwaysRaise=[ExceptionFailure]
93 | | | | freeRegs=[]
94 | <onException ExceptionFailure>
95 | | comment "raiseAgainIfConsumed"
96 | | minReads=2
97 | | mayRaise=[ExceptionFailure]
98 | | alwaysRaise=[]
99 | | freeRegs=[]
100 | | saveInput
101 | | minReads=2
102 | | mayRaise=[ExceptionFailure]
103 | | alwaysRaise=[]
104 | | freeRegs=[]
105 | | lift2Value ((GHC.Classes.==) @GHC.Types.Int)
106 | | minReads=2
107 | | mayRaise=[ExceptionFailure]
108 | | alwaysRaise=[]
109 | | freeRegs=[]
110 | | choicesBranch
111 | | minReads=2
112 | | mayRaise=[ExceptionFailure]
113 | | alwaysRaise=[]
114 | | freeRegs=[]
115 | | | <branch (\u_0 -> u_0)>
116 | | | | catch ExceptionFailure
117 | | | | minReads=2
118 | | | | mayRaise=[ExceptionFailure]
119 | | | | alwaysRaise=[]
120 | | | | freeRegs=[]
121 | | | | | <catchScope>
122 | | | | | | pushValue (\u_0 -> \u_1 -> (GHC.Types.:) 'a' ((GHC.Types.:) 'b' GHC.Types.[]))
123 | | | | | | minReads=2
124 | | | | | | mayRaise=[ExceptionFailure]
125 | | | | | | alwaysRaise=[]
126 | | | | | | freeRegs=[]
127 | | | | | | comment "satisfy ((GHC.Classes.==) 'a')"
128 | | | | | | minReads=2
129 | | | | | | mayRaise=[ExceptionFailure]
130 | | | | | | alwaysRaise=[]
131 | | | | | | freeRegs=[]
132 | | | | | | read ((GHC.Classes.==) 'a')
133 | | | | | | minReads=2
134 | | | | | | mayRaise=[ExceptionFailure]
135 | | | | | | alwaysRaise=[]
136 | | | | | | freeRegs=[]
137 | | | | | | lift2Value (\u_0 -> \u_1 -> u_0 u_1)
138 | | | | | | minReads=1
139 | | | | | | mayRaise=[ExceptionFailure]
140 | | | | | | alwaysRaise=[]
141 | | | | | | freeRegs=[]
142 | | | | | | comment "satisfy ((GHC.Classes.==) 'b')"
143 | | | | | | minReads=1
144 | | | | | | mayRaise=[ExceptionFailure]
145 | | | | | | alwaysRaise=[]
146 | | | | | | freeRegs=[]
147 | | | | | | read ((GHC.Classes.==) 'b')
148 | | | | | | minReads=1
149 | | | | | | mayRaise=[ExceptionFailure]
150 | | | | | | alwaysRaise=[]
151 | | | | | | freeRegs=[]
152 | | | | | | lift2Value (\u_0 -> \u_1 -> u_0 u_1)
153 | | | | | | minReads=0
154 | | | | | | mayRaise=[]
155 | | | | | | alwaysRaise=[]
156 | | | | | | freeRegs=[]
157 | | | | | | commit ExceptionFailure
158 | | | | | | minReads=0
159 | | | | | | mayRaise=[]
160 | | | | | | alwaysRaise=[]
161 | | | | | | freeRegs=[]
162 | | | | | | refJoin join
163 | | | | | | minReads=0
164 | | | | | | mayRaise=[]
165 | | | | | | alwaysRaise=[]
166 | | | | | | freeRegs=[]
167 | | | | | <onException ExceptionFailure>
168 | | | | | | loadInput
169 | | | | | | minReads=0
170 | | | | | | mayRaise=[ExceptionFailure]
171 | | | | | | alwaysRaise=[ExceptionFailure]
172 | | | | | | freeRegs=[]
173 | | | | | | fail []
174 | | | | | | minReads=0
175 | | | | | | mayRaise=[ExceptionFailure]
176 | | | | | | alwaysRaise=[ExceptionFailure]
177 | | | | | | freeRegs=[]
178 | | | <default>
179 | | | | fail []
180 | | | | minReads=0
181 | | | | mayRaise=[ExceptionFailure]
182 | | | | alwaysRaise=[ExceptionFailure]
183 | | | | freeRegs=[]