]> Git — Sourcephile - haskell/symantic-parser.git/blob - tests/Golden/Machine/G10.expected.txt
tests: rename {test/ => tests/}
[haskell/symantic-parser.git] / tests / Golden / Machine / G10.expected.txt
1 pushValue GHC.Show.show
2 minReads=1
3 mayRaise=[ExceptionFailure]
4 alwaysRaise=[]
5 freeRegs=[]
6 join join
7 minReads=0
8 mayRaise=[]
9 alwaysRaise=[]
10 freeRegs=[]
11 | lift2Value (\x_0 -> \x_1 -> x_0 x_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=1
23 mayRaise=[ExceptionFailure]
24 alwaysRaise=[]
25 freeRegs=[]
26 | <catchScope>
27 | | pushValue (\x_0 -> 'a')
28 | | minReads=1
29 | | mayRaise=[ExceptionFailure]
30 | | alwaysRaise=[]
31 | | freeRegs=[]
32 | | comment "satisfy ((GHC.Classes.==) 'a')"
33 | | minReads=1
34 | | mayRaise=[ExceptionFailure]
35 | | alwaysRaise=[]
36 | | freeRegs=[]
37 | | read ((GHC.Classes.==) 'a')
38 | | minReads=1
39 | | mayRaise=[ExceptionFailure]
40 | | alwaysRaise=[]
41 | | freeRegs=[]
42 | | lift2Value (\x_0 -> \x_1 -> x_0 x_1)
43 | | minReads=0
44 | | mayRaise=[]
45 | | alwaysRaise=[]
46 | | freeRegs=[]
47 | | commit ExceptionFailure
48 | | minReads=0
49 | | mayRaise=[]
50 | | alwaysRaise=[]
51 | | freeRegs=[]
52 | | refJoin join
53 | | minReads=0
54 | | mayRaise=[]
55 | | alwaysRaise=[]
56 | | freeRegs=[]
57 | <onException ExceptionFailure>
58 | | comment "raiseAgainIfConsumed"
59 | | minReads=1
60 | | mayRaise=[ExceptionFailure]
61 | | alwaysRaise=[]
62 | | freeRegs=[]
63 | | saveInput
64 | | minReads=1
65 | | mayRaise=[ExceptionFailure]
66 | | alwaysRaise=[]
67 | | freeRegs=[]
68 | | lift2Value (\(Data.Text.Internal.Text _ i_0 _) (Data.Text.Internal.Text _
69 | | j_1
70 | | _) -> i_0 GHC.Classes.== j_1)
71 | | minReads=1
72 | | mayRaise=[ExceptionFailure]
73 | | alwaysRaise=[]
74 | | freeRegs=[]
75 | | choicesBranch
76 | | minReads=1
77 | | mayRaise=[ExceptionFailure]
78 | | alwaysRaise=[]
79 | | freeRegs=[]
80 | | | <branch (\x_0 -> x_0)>
81 | | | | pushValue (\x_0 -> 'b')
82 | | | | minReads=1
83 | | | | mayRaise=[ExceptionFailure]
84 | | | | alwaysRaise=[]
85 | | | | freeRegs=[]
86 | | | | comment "satisfy ((GHC.Classes.==) 'b')"
87 | | | | minReads=1
88 | | | | mayRaise=[ExceptionFailure]
89 | | | | alwaysRaise=[]
90 | | | | freeRegs=[]
91 | | | | read ((GHC.Classes.==) 'b')
92 | | | | minReads=1
93 | | | | mayRaise=[ExceptionFailure]
94 | | | | alwaysRaise=[]
95 | | | | freeRegs=[]
96 | | | | lift2Value (\x_0 -> \x_1 -> x_0 x_1)
97 | | | | minReads=0
98 | | | | mayRaise=[]
99 | | | | alwaysRaise=[]
100 | | | | freeRegs=[]
101 | | | | refJoin join
102 | | | | minReads=0
103 | | | | mayRaise=[]
104 | | | | alwaysRaise=[]
105 | | | | freeRegs=[]
106 | | | <default>
107 | | | | fail []
108 | | | | minReads=0
109 | | | | mayRaise=[ExceptionFailure]
110 | | | | alwaysRaise=[ExceptionFailure]
111 | | | | freeRegs=[]