1 pushValue GHC.Show.show
3 mayRaise=[ExceptionFailure]
6 pushValue (\x_0 -> x_0)
8 mayRaise=[ExceptionFailure]
13 mayRaise=[ExceptionFailure]
18 mayRaise=[ExceptionFailure]
22 | | pushValue (\x_0 -> (GHC.Types.:) 'a')
24 | | mayRaise=[ExceptionFailure]
27 | | comment "satisfy ((GHC.Classes.==) 'a')"
29 | | mayRaise=[ExceptionFailure]
32 | | read ((GHC.Classes.==) 'a')
34 | | mayRaise=[ExceptionFailure]
37 | | lift2Value (\x_0 -> \x_1 -> x_0 x_1)
42 | | pushValue (\x_0 -> \x_1 -> \x_2 -> x_1 (x_0 x_2))
47 | | lift2Value (\x_0 -> \x_1 -> x_1 x_0)
57 | | lift2Value (\x_0 -> \x_1 -> x_0 x_1)
73 | | comment "raiseAgainIfConsumed"
75 | | mayRaise=[ExceptionFailure]
80 | | mayRaise=[ExceptionFailure]
83 | | lift2Value (\(Data.Text.Internal.Text _ i_0 _) (Data.Text.Internal.Text _
85 | | _) -> i_0 GHC.Classes.== j_1)
87 | | mayRaise=[ExceptionFailure]
92 | | mayRaise=[ExceptionFailure]
95 | | | <branch (\x_0 -> x_0)>
96 | | | | readRegister reg
99 | | | | alwaysRaise=[]
100 | | | | freeRegs=[reg]
101 | | | | pushValue GHC.Types.[]
104 | | | | alwaysRaise=[]
106 | | | | lift2Value (\x_0 -> \x_1 -> x_0 x_1)
109 | | | | alwaysRaise=[]
111 | | | | lift2Value (\x_0 -> \x_1 -> x_0 x_1)
114 | | | | alwaysRaise=[]
119 | | | | alwaysRaise=[]
124 | | | | mayRaise=[ExceptionFailure]
125 | | | | alwaysRaise=[ExceptionFailure]