1 pushValue GHC.Show.show
3 mayRaise=[ExceptionFailure]
11 | lift2Value (\u_0 -> \u_1 -> u_0 u_1)
21 catch ExceptionFailure
23 mayRaise=[ExceptionFailure]
27 | | pushValue (\u_0 -> \u_1 -> (GHC.Types.:) 'a' ((GHC.Types.:) 'a' GHC.Types.[]))
29 | | mayRaise=[ExceptionFailure]
32 | | comment "satisfy ((GHC.Classes.==) 'a')"
34 | | mayRaise=[ExceptionFailure]
37 | | read ((GHC.Classes.==) 'a')
39 | | mayRaise=[ExceptionFailure]
42 | | lift2Value (\u_0 -> \u_1 -> u_0 u_1)
44 | | mayRaise=[ExceptionFailure]
47 | | comment "satisfy ((GHC.Classes.==) 'a')"
49 | | mayRaise=[ExceptionFailure]
52 | | read ((GHC.Classes.==) 'a')
54 | | mayRaise=[ExceptionFailure]
57 | | lift2Value (\u_0 -> \u_1 -> u_0 u_1)
62 | | commit ExceptionFailure
72 | <onException ExceptionFailure>
73 | | comment "raiseAgainIfConsumed"
75 | | mayRaise=[ExceptionFailure]
80 | | mayRaise=[ExceptionFailure]
83 | | lift2Value ((GHC.Classes.==) @GHC.Types.Int)
85 | | mayRaise=[ExceptionFailure]
90 | | mayRaise=[ExceptionFailure]
93 | | | <branch (\u_0 -> u_0)>
94 | | | | pushValue (\u_0 -> \u_1 -> (GHC.Types.:) 'a' ((GHC.Types.:) 'b' GHC.Types.[]))
96 | | | | mayRaise=[ExceptionFailure]
97 | | | | alwaysRaise=[]
99 | | | | comment "satisfy ((GHC.Classes.==) 'a')"
101 | | | | mayRaise=[ExceptionFailure]
102 | | | | alwaysRaise=[]
104 | | | | read ((GHC.Classes.==) 'a')
106 | | | | mayRaise=[ExceptionFailure]
107 | | | | alwaysRaise=[]
109 | | | | lift2Value (\u_0 -> \u_1 -> u_0 u_1)
111 | | | | mayRaise=[ExceptionFailure]
112 | | | | alwaysRaise=[]
114 | | | | comment "satisfy ((GHC.Classes.==) 'b')"
116 | | | | mayRaise=[ExceptionFailure]
117 | | | | alwaysRaise=[]
119 | | | | read ((GHC.Classes.==) 'b')
121 | | | | mayRaise=[ExceptionFailure]
122 | | | | alwaysRaise=[]
124 | | | | lift2Value (\u_0 -> \u_1 -> u_0 u_1)
127 | | | | alwaysRaise=[]
132 | | | | alwaysRaise=[]
137 | | | | mayRaise=[ExceptionFailure]
138 | | | | alwaysRaise=[ExceptionFailure]