test/Golden/Machine/G5.expected.txt

   1 let <hidden>
   2   minReads=(Right 0)
   3   mayRaise=[ExceptionFailure]
   4 | catch ExceptionFailure
   5 |   minReads=(Right 0)
   6 |   mayRaise=[ExceptionFailure]
   7 | | <ok>
   8 | | | pushValue (\x_0 -> \x_1 -> \x_2 -> x_0 (x_1 x_2))
   9 | | |   minReads=(Right 4)
  10 | | |   mayRaise=[ExceptionFailure]
  11 | | | pushValue (GHC.Types.:)
  12 | | |   minReads=(Right 4)
  13 | | |   mayRaise=[ExceptionFailure]
  14 | | | call <hidden>
  15 | | |   minReads=(Right 4)
  16 | | |   mayRaise=[ExceptionFailure]
  17 | | | lift2Value (\x_0 -> \x_1 -> x_0 x_1)
  18 | | |   minReads=(Right 0)
  19 | | |   mayRaise=[ExceptionFailure]
  20 | | | lift2Value (\x_0 -> \x_1 -> x_0 x_1)
  21 | | |   minReads=(Right 0)
  22 | | |   mayRaise=[ExceptionFailure]
  23 | | | call <hidden>
  24 | | |   minReads=(Right 0)
  25 | | |   mayRaise=[ExceptionFailure]
  26 | | | lift2Value (\x_0 -> \x_1 -> x_0 x_1)
  27 | | |   minReads=(Right 0)
  28 | | |   mayRaise=[]
  29 | | | commit ExceptionFailure
  30 | | |   minReads=(Right 0)
  31 | | |   mayRaise=[]
  32 | | | ret
  33 | | |   minReads=(Right 0)
  34 | | |   mayRaise=[]
  35 | | <ko>
  36 | | | pushInput
  37 | | |   minReads=(Right 0)
  38 | | |   mayRaise=[ExceptionFailure]
  39 | | | lift2Value (\(Data.Text.Internal.Text _ i_0 _) (Data.Text.Internal.Text _
  40 | | |                                                                j_1
  41 | | |                                                                _) -> i_0 GHC.Classes.== j_1)
  42 | | |   minReads=(Right 0)
  43 | | |   mayRaise=[ExceptionFailure]
  44 | | | choicesBranch [\x_0 -> x_0]
  45 | | |   minReads=(Right 0)
  46 | | |   mayRaise=[ExceptionFailure]
  47 | | | | <branch>
  48 | | | | | pushValue (\x_0 -> x_0)
  49 | | | | |   minReads=(Right 0)
  50 | | | | |   mayRaise=[]
  51 | | | | | ret
  52 | | | | |   minReads=(Right 0)
  53 | | | | |   mayRaise=[]
  54 | | | | <default>
  55 | | | | | fail []
  56 | | | | |   minReads=(Left ExceptionFailure)
  57 | | | | |   mayRaise=[ExceptionFailure]
  58 let <hidden>
  59   minReads=(Right 4)
  60   mayRaise=[ExceptionFailure]
  61 | catch ExceptionFailure
  62 |   minReads=(Right 4)
  63 |   mayRaise=[ExceptionFailure]
  64 | | <ok>
  65 | | | pushValue (GHC.Types.:)
  66 | | |   minReads=(Right 4)
  67 | | |   mayRaise=[ExceptionFailure]
  68 | | | pushValue (\x_0 -> \x_1 -> x_0)
  69 | | |   minReads=(Right 4)
  70 | | |   mayRaise=[ExceptionFailure]
  71 | | | pushValue 'a'
  72 | | |   minReads=(Right 4)
  73 | | |   mayRaise=[ExceptionFailure]
  74 | | | lift2Value (\x_0 -> \x_1 -> x_0 x_1)
  75 | | |   minReads=(Right 4)
  76 | | |   mayRaise=[ExceptionFailure]
  77 | | | read ((GHC.Classes.==) 'a')
  78 | | |   minReads=(Right 4)
  79 | | |   mayRaise=[ExceptionFailure]
  80 | | | lift2Value (\x_0 -> \x_1 -> x_0 x_1)
  81 | | |   minReads=(Right 3)
  82 | | |   mayRaise=[ExceptionFailure]
  83 | | | lift2Value (\x_0 -> \x_1 -> x_0 x_1)
  84 | | |   minReads=(Right 3)
  85 | | |   mayRaise=[ExceptionFailure]
  86 | | | pushValue (GHC.Types.:)
  87 | | |   minReads=(Right 3)
  88 | | |   mayRaise=[ExceptionFailure]
  89 | | | pushValue (\x_0 -> \x_1 -> x_0)
  90 | | |   minReads=(Right 3)
  91 | | |   mayRaise=[ExceptionFailure]
  92 | | | pushValue 'b'
  93 | | |   minReads=(Right 3)
  94 | | |   mayRaise=[ExceptionFailure]
  95 | | | lift2Value (\x_0 -> \x_1 -> x_0 x_1)
  96 | | |   minReads=(Right 3)
  97 | | |   mayRaise=[ExceptionFailure]
  98 | | | read ((GHC.Classes.==) 'b')
  99 | | |   minReads=(Right 3)
 100 | | |   mayRaise=[ExceptionFailure]
 101 | | | lift2Value (\x_0 -> \x_1 -> x_0 x_1)
 102 | | |   minReads=(Right 2)
 103 | | |   mayRaise=[ExceptionFailure]
 104 | | | lift2Value (\x_0 -> \x_1 -> x_0 x_1)
 105 | | |   minReads=(Right 2)
 106 | | |   mayRaise=[ExceptionFailure]
 107 | | | pushValue (GHC.Types.:)
 108 | | |   minReads=(Right 2)
 109 | | |   mayRaise=[ExceptionFailure]
 110 | | | pushValue (\x_0 -> \x_1 -> x_0)
 111 | | |   minReads=(Right 2)
 112 | | |   mayRaise=[ExceptionFailure]
 113 | | | pushValue 'c'
 114 | | |   minReads=(Right 2)
 115 | | |   mayRaise=[ExceptionFailure]
 116 | | | lift2Value (\x_0 -> \x_1 -> x_0 x_1)
 117 | | |   minReads=(Right 2)
 118 | | |   mayRaise=[ExceptionFailure]
 119 | | | read ((GHC.Classes.==) 'c')
 120 | | |   minReads=(Right 2)
 121 | | |   mayRaise=[ExceptionFailure]
 122 | | | lift2Value (\x_0 -> \x_1 -> x_0 x_1)
 123 | | |   minReads=(Right 1)
 124 | | |   mayRaise=[ExceptionFailure]
 125 | | | lift2Value (\x_0 -> \x_1 -> x_0 x_1)
 126 | | |   minReads=(Right 1)
 127 | | |   mayRaise=[ExceptionFailure]
 128 | | | pushValue (GHC.Types.:)
 129 | | |   minReads=(Right 1)
 130 | | |   mayRaise=[ExceptionFailure]
 131 | | | pushValue (\x_0 -> \x_1 -> x_0)
 132 | | |   minReads=(Right 1)
 133 | | |   mayRaise=[ExceptionFailure]
 134 | | | pushValue 'd'
 135 | | |   minReads=(Right 1)
 136 | | |   mayRaise=[ExceptionFailure]
 137 | | | lift2Value (\x_0 -> \x_1 -> x_0 x_1)
 138 | | |   minReads=(Right 1)
 139 | | |   mayRaise=[ExceptionFailure]
 140 | | | read ((GHC.Classes.==) 'd')
 141 | | |   minReads=(Right 1)
 142 | | |   mayRaise=[ExceptionFailure]
 143 | | | lift2Value (\x_0 -> \x_1 -> x_0 x_1)
 144 | | |   minReads=(Right 0)
 145 | | |   mayRaise=[]
 146 | | | lift2Value (\x_0 -> \x_1 -> x_0 x_1)
 147 | | |   minReads=(Right 0)
 148 | | |   mayRaise=[]
 149 | | | pushValue GHC.Types.[]
 150 | | |   minReads=(Right 0)
 151 | | |   mayRaise=[]
 152 | | | lift2Value (\x_0 -> \x_1 -> x_0 x_1)
 153 | | |   minReads=(Right 0)
 154 | | |   mayRaise=[]
 155 | | | lift2Value (\x_0 -> \x_1 -> x_0 x_1)
 156 | | |   minReads=(Right 0)
 157 | | |   mayRaise=[]
 158 | | | lift2Value (\x_0 -> \x_1 -> x_0 x_1)
 159 | | |   minReads=(Right 0)
 160 | | |   mayRaise=[]
 161 | | | lift2Value (\x_0 -> \x_1 -> x_0 x_1)
 162 | | |   minReads=(Right 0)
 163 | | |   mayRaise=[]
 164 | | | commit ExceptionFailure
 165 | | |   minReads=(Right 0)
 166 | | |   mayRaise=[]
 167 | | | ret
 168 | | |   minReads=(Right 0)
 169 | | |   mayRaise=[]
 170 | | <ko>
 171 | | | loadInput
 172 | | |   minReads=(Left ExceptionFailure)
 173 | | |   mayRaise=[ExceptionFailure]
 174 | | | fail []
 175 | | |   minReads=(Left ExceptionFailure)
 176 | | |   mayRaise=[ExceptionFailure]
 177 pushValue GHC.Show.show
 178   minReads=(Right 4)
 179   mayRaise=[ExceptionFailure]
 180 pushValue (\x_0 -> \x_1 -> x_0)
 181   minReads=(Right 4)
 182   mayRaise=[ExceptionFailure]
 183 pushValue (GHC.Types.:)
 184   minReads=(Right 4)
 185   mayRaise=[ExceptionFailure]
 186 call <hidden>
 187   minReads=(Right 4)
 188   mayRaise=[ExceptionFailure]
 189 lift2Value (\x_0 -> \x_1 -> x_0 x_1)
 190   minReads=(Right 0)
 191   mayRaise=[ExceptionFailure]
 192 call <hidden>
 193   minReads=(Right 0)
 194   mayRaise=[ExceptionFailure]
 195 pushValue GHC.Types.[]
 196   minReads=(Right 0)
 197   mayRaise=[ExceptionFailure]
 198 lift2Value (\x_0 -> \x_1 -> x_0 x_1)
 199   minReads=(Right 0)
 200   mayRaise=[ExceptionFailure]
 201 lift2Value (\x_0 -> \x_1 -> x_0 x_1)
 202   minReads=(Right 0)
 203   mayRaise=[ExceptionFailure]
 204 lift2Value (\x_0 -> \x_1 -> x_0 x_1)
 205   minReads=(Right 0)
 206   mayRaise=[ExceptionFailure]
 207 join <hidden>
 208   minReads=(Right 0)
 209   mayRaise=[]
 210 | lift2Value (\x_0 -> \x_1 -> x_0 x_1)
 211 |   minReads=(Right 0)
 212 |   mayRaise=[]
 213 | lift2Value (\x_0 -> \x_1 -> x_0 x_1)
 214 |   minReads=(Right 0)
 215 |   mayRaise=[]
 216 | ret
 217 |   minReads=(Right 0)
 218 |   mayRaise=[]
 219 catch ExceptionFailure
 220   minReads=(Right 0)
 221   mayRaise=[ExceptionFailure]
 222 | <ok>
 223 | | catch ExceptionFailure
 224 | |   minReads=(Right 0)
 225 | |   mayRaise=[]
 226 | | | <ok>
 227 | | | | pushInput
 228 | | | |   minReads=(Left ExceptionFailure)
 229 | | | |   mayRaise=[ExceptionFailure]
 230 | | | | read ((\x_0 -> \x_1 -> x_0) GHC.Types.True)
 231 | | | |   minReads=(Left ExceptionFailure)
 232 | | | |   mayRaise=[ExceptionFailure]
 233 | | | | popValue
 234 | | | |   minReads=(Left ExceptionFailure)
 235 | | | |   mayRaise=[ExceptionFailure]
 236 | | | | commit ExceptionFailure
 237 | | | |   minReads=(Left ExceptionFailure)
 238 | | | |   mayRaise=[ExceptionFailure]
 239 | | | | loadInput
 240 | | | |   minReads=(Left ExceptionFailure)
 241 | | | |   mayRaise=[ExceptionFailure]
 242 | | | | fail []
 243 | | | |   minReads=(Left ExceptionFailure)
 244 | | | |   mayRaise=[ExceptionFailure]
 245 | | | <ko>
 246 | | | | loadInput
 247 | | | |   minReads=(Right 0)
 248 | | | |   mayRaise=[]
 249 | | | | pushValue GHC.Tuple.()
 250 | | | |   minReads=(Right 0)
 251 | | | |   mayRaise=[]
 252 | | | | commit ExceptionFailure
 253 | | | |   minReads=(Right 0)
 254 | | | |   mayRaise=[]
 255 | | | | refJoin <hidden>
 256 | | | |   minReads=(Right 0)
 257 | | | |   mayRaise=[]
 258 | <ko>
 259 | | pushInput
 260 | |   minReads=(Left ExceptionFailure)
 261 | |   mayRaise=[ExceptionFailure]
 262 | | lift2Value (\(Data.Text.Internal.Text _ i_0 _) (Data.Text.Internal.Text _
 263 | |                                                                j_1
 264 | |                                                                _) -> i_0 GHC.Classes.== j_1)
 265 | |   minReads=(Left ExceptionFailure)
 266 | |   mayRaise=[ExceptionFailure]
 267 | | choicesBranch [\x_0 -> x_0]
 268 | |   minReads=(Left ExceptionFailure)
 269 | |   mayRaise=[ExceptionFailure]
 270 | | | <branch>
 271 | | | | fail [FailureEnd]
 272 | | | |   minReads=(Left ExceptionFailure)
 273 | | | |   mayRaise=[ExceptionFailure]
 274 | | | <default>
 275 | | | | fail []
 276 | | | |   minReads=(Left ExceptionFailure)
 277 | | | |   mayRaise=[ExceptionFailure]