]> Git — Sourcephile - haskell/symantic-parser.git/blob - test/Golden/Machine/G8.expected.txt
fix: use a global polyfix for defLet and defRef
[haskell/symantic-parser.git] / test / Golden / Machine / G8.expected.txt
1 let <hidden>
2 minReads=(Right 0)
3 mayRaise=[]
4 | catchException "fail"
5 | minReads=(Right 0)
6 | mayRaise=[]
7 | | <ok>
8 | | | pushValue (\u1 -> (\u2 -> (\u3 -> u1 (u2 u3))))
9 | | | minReads=(Right 1)
10 | | | mayRaise=["fail"]
11 | | | pushValue cons
12 | | | minReads=(Right 1)
13 | | | mayRaise=["fail"]
14 | | | pushValue (\u1 -> (\u2 -> u1))
15 | | | minReads=(Right 1)
16 | | | mayRaise=["fail"]
17 | | | pushValue 'r'
18 | | | minReads=(Right 1)
19 | | | mayRaise=["fail"]
20 | | | lift2Value (\u1 -> (\u2 -> u1 u2))
21 | | | minReads=(Right 1)
22 | | | mayRaise=["fail"]
23 | | | read ('r' ==)
24 | | | minReads=(Right 1)
25 | | | mayRaise=["fail"]
26 | | | lift2Value (\u1 -> (\u2 -> u1 u2))
27 | | | minReads=(Right 0)
28 | | | mayRaise=[]
29 | | | lift2Value (\u1 -> (\u2 -> u1 u2))
30 | | | minReads=(Right 0)
31 | | | mayRaise=[]
32 | | | lift2Value (\u1 -> (\u2 -> u1 u2))
33 | | | minReads=(Right 0)
34 | | | mayRaise=[]
35 | | | call <hidden>
36 | | | minReads=(Right 0)
37 | | | mayRaise=[]
38 | | | lift2Value (\u1 -> (\u2 -> u1 u2))
39 | | | minReads=(Right 0)
40 | | | mayRaise=[]
41 | | | popException "fail"
42 | | | minReads=(Right 0)
43 | | | mayRaise=[]
44 | | | ret
45 | | | minReads=(Right 0)
46 | | | mayRaise=[]
47 | | <ko>
48 | | | pushInput
49 | | | minReads=(Right 0)
50 | | | mayRaise=["fail"]
51 | | | lift2Value Term
52 | | | minReads=(Right 0)
53 | | | mayRaise=["fail"]
54 | | | choicesBranch [(\u1 -> u1)]
55 | | | minReads=(Right 0)
56 | | | mayRaise=["fail"]
57 | | | | <branch>
58 | | | | | pushValue (\u1 -> u1)
59 | | | | | minReads=(Right 0)
60 | | | | | mayRaise=[]
61 | | | | | ret
62 | | | | | minReads=(Right 0)
63 | | | | | mayRaise=[]
64 | | | | <default>
65 | | | | | raiseException "fail"
66 | | | | | minReads=(Left "fail")
67 | | | | | mayRaise=["fail"]
68 pushValue (\u1 -> (\u2 -> u1))
69 minReads=(Right 0)
70 mayRaise=[]
71 call <hidden>
72 minReads=(Right 0)
73 mayRaise=[]
74 pushValue Term
75 minReads=(Right 0)
76 mayRaise=[]
77 lift2Value (\u1 -> (\u2 -> u1 u2))
78 minReads=(Right 0)
79 mayRaise=[]
80 lift2Value (\u1 -> (\u2 -> u1 u2))
81 minReads=(Right 0)
82 mayRaise=[]
83 join <hidden>
84 minReads=(Right 0)
85 mayRaise=[]
86 | lift2Value (\u1 -> (\u2 -> u1 u2))
87 | minReads=(Right 0)
88 | mayRaise=[]
89 | ret
90 | minReads=(Right 0)
91 | mayRaise=[]
92 catchException "fail"
93 minReads=(Right 0)
94 mayRaise=[]
95 | <ok>
96 | | catchException "fail"
97 | | minReads=(Right 0)
98 | | mayRaise=[]
99 | | | <ok>
100 | | | | pushInput
101 | | | | minReads=(Left "fail")
102 | | | | mayRaise=["fail"]
103 | | | | read (\u1 -> Term)
104 | | | | minReads=(Left "fail")
105 | | | | mayRaise=["fail"]
106 | | | | popValue
107 | | | | minReads=(Left "fail")
108 | | | | mayRaise=["fail"]
109 | | | | popException "fail"
110 | | | | minReads=(Left "fail")
111 | | | | mayRaise=["fail"]
112 | | | | loadInput
113 | | | | minReads=(Left "fail")
114 | | | | mayRaise=["fail"]
115 | | | | raiseException "fail"
116 | | | | minReads=(Left "fail")
117 | | | | mayRaise=["fail"]
118 | | | <ko>
119 | | | | loadInput
120 | | | | minReads=(Right 0)
121 | | | | mayRaise=[]
122 | | | | pushValue Term
123 | | | | minReads=(Right 0)
124 | | | | mayRaise=[]
125 | | | | popException "fail"
126 | | | | minReads=(Right 0)
127 | | | | mayRaise=[]
128 | | | | refJoin <hidden>
129 | | | | minReads=(Right 0)
130 | | | | mayRaise=[]
131 | <ko>
132 | | pushInput
133 | | minReads=(Left "fail")
134 | | mayRaise=["fail"]
135 | | lift2Value Term
136 | | minReads=(Left "fail")
137 | | mayRaise=["fail"]
138 | | choicesBranch [(\u1 -> u1)]
139 | | minReads=(Left "fail")
140 | | mayRaise=["fail"]
141 | | | <branch>
142 | | | | raiseException "fail"
143 | | | | minReads=(Left "fail")
144 | | | | mayRaise=["fail"]
145 | | | <default>
146 | | | | raiseException "fail"
147 | | | | minReads=(Left "fail")
148 | | | | mayRaise=["fail"]