]> Git — Sourcephile - haskell/symantic-parser.git/blob - test/Golden/Machine/G10.expected.txt
fix: use a global polyfix for defLet and defRef
[haskell/symantic-parser.git] / test / Golden / Machine / G10.expected.txt
1 catchException "fail"
2 minReads=(Right 1)
3 mayRaise=[]
4 | <ok>
5 | | pushValue (\u1 -> (\u2 -> u1))
6 | | minReads=(Right 1)
7 | | mayRaise=["fail"]
8 | | pushValue 'a'
9 | | minReads=(Right 1)
10 | | mayRaise=["fail"]
11 | | lift2Value (\u1 -> (\u2 -> u1 u2))
12 | | minReads=(Right 1)
13 | | mayRaise=["fail"]
14 | | read ('a' ==)
15 | | minReads=(Right 1)
16 | | mayRaise=["fail"]
17 | | lift2Value (\u1 -> (\u2 -> u1 u2))
18 | | minReads=(Right 0)
19 | | mayRaise=[]
20 | | popException "fail"
21 | | minReads=(Right 0)
22 | | mayRaise=[]
23 | | ret
24 | | minReads=(Right 0)
25 | | mayRaise=[]
26 | <ko>
27 | | pushInput
28 | | minReads=(Right 1)
29 | | mayRaise=["fail"]
30 | | lift2Value Term
31 | | minReads=(Right 1)
32 | | mayRaise=["fail"]
33 | | choicesBranch [(\u1 -> u1)]
34 | | minReads=(Right 1)
35 | | mayRaise=["fail"]
36 | | | <branch>
37 | | | | pushValue (\u1 -> (\u2 -> u1))
38 | | | | minReads=(Right 1)
39 | | | | mayRaise=["fail"]
40 | | | | pushValue 'b'
41 | | | | minReads=(Right 1)
42 | | | | mayRaise=["fail"]
43 | | | | lift2Value (\u1 -> (\u2 -> u1 u2))
44 | | | | minReads=(Right 1)
45 | | | | mayRaise=["fail"]
46 | | | | read ('b' ==)
47 | | | | minReads=(Right 1)
48 | | | | mayRaise=["fail"]
49 | | | | lift2Value (\u1 -> (\u2 -> u1 u2))
50 | | | | minReads=(Right 0)
51 | | | | mayRaise=[]
52 | | | | ret
53 | | | | minReads=(Right 0)
54 | | | | mayRaise=[]
55 | | | <default>
56 | | | | raiseException "fail"
57 | | | | minReads=(Left "fail")
58 | | | | mayRaise=["fail"]