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