tests/Golden/Machine/G8.expected.txt

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