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