tests/Golden/Machine/G16.expected.txt

   1 pushValue (\x_0 -> \x_1 -> GHC.Show.show x_0)
   2   minReads=2
   3   mayRaise=[ExceptionFailure]
   4   alwaysRaise=[]
   5   freeRegs=[]
   6 join join
   7   minReads=1
   8   mayRaise=[ExceptionFailure]
   9   alwaysRaise=[]
  10   freeRegs=[]
  11 | lift2Value (\x_0 -> \x_1 -> x_0 x_1)
  12 |   minReads=1
  13 |   mayRaise=[ExceptionFailure]
  14 |   alwaysRaise=[]
  15 |   freeRegs=[]
  16 | comment "satisfy ((GHC.Classes.==) 'd')"
  17 |   minReads=1
  18 |   mayRaise=[ExceptionFailure]
  19 |   alwaysRaise=[]
  20 |   freeRegs=[]
  21 | read ((GHC.Classes.==) 'd')
  22 |   minReads=1
  23 |   mayRaise=[ExceptionFailure]
  24 |   alwaysRaise=[]
  25 |   freeRegs=[]
  26 | lift2Value (\x_0 -> \x_1 -> x_0 x_1)
  27 |   minReads=0
  28 |   mayRaise=[]
  29 |   alwaysRaise=[]
  30 |   freeRegs=[]
  31 | ret
  32 |   minReads=0
  33 |   mayRaise=[]
  34 |   alwaysRaise=[]
  35 |   freeRegs=[]
  36 catch ExceptionFailure
  37   minReads=2
  38   mayRaise=[ExceptionFailure]
  39   alwaysRaise=[]
  40   freeRegs=[]
  41 | <catchScope>
  42 | | pushValue (\x_0 -> 'a')
  43 | |   minReads=2
  44 | |   mayRaise=[ExceptionFailure]
  45 | |   alwaysRaise=[]
  46 | |   freeRegs=[]
  47 | | comment "satisfy ((GHC.Classes.==) 'a')"
  48 | |   minReads=2
  49 | |   mayRaise=[ExceptionFailure]
  50 | |   alwaysRaise=[]
  51 | |   freeRegs=[]
  52 | | read ((GHC.Classes.==) 'a')
  53 | |   minReads=2
  54 | |   mayRaise=[ExceptionFailure]
  55 | |   alwaysRaise=[]
  56 | |   freeRegs=[]
  57 | | lift2Value (\x_0 -> \x_1 -> x_0 x_1)
  58 | |   minReads=1
  59 | |   mayRaise=[ExceptionFailure]
  60 | |   alwaysRaise=[]
  61 | |   freeRegs=[]
  62 | | commit ExceptionFailure
  63 | |   minReads=1
  64 | |   mayRaise=[ExceptionFailure]
  65 | |   alwaysRaise=[]
  66 | |   freeRegs=[]
  67 | | refJoin join
  68 | |   minReads=1
  69 | |   mayRaise=[ExceptionFailure]
  70 | |   alwaysRaise=[]
  71 | |   freeRegs=[]
  72 | <onException ExceptionFailure>
  73 | | comment "raiseAgainIfConsumed"
  74 | |   minReads=2
  75 | |   mayRaise=[ExceptionFailure]
  76 | |   alwaysRaise=[]
  77 | |   freeRegs=[]
  78 | | saveInput
  79 | |   minReads=2
  80 | |   mayRaise=[ExceptionFailure]
  81 | |   alwaysRaise=[]
  82 | |   freeRegs=[]
  83 | | lift2Value (\(Data.Text.Internal.Text _ i_0 _) (Data.Text.Internal.Text _
  84 | |                                                                j_1
  85 | |                                                                _) -> i_0 GHC.Classes.== j_1)
  86 | |   minReads=2
  87 | |   mayRaise=[ExceptionFailure]
  88 | |   alwaysRaise=[]
  89 | |   freeRegs=[]
  90 | | choicesBranch
  91 | |   minReads=2
  92 | |   mayRaise=[ExceptionFailure]
  93 | |   alwaysRaise=[]
  94 | |   freeRegs=[]
  95 | | | <branch (\x_0 -> x_0)>
  96 | | | | catch ExceptionFailure
  97 | | | |   minReads=2
  98 | | | |   mayRaise=[ExceptionFailure]
  99 | | | |   alwaysRaise=[]
 100 | | | |   freeRegs=[]
 101 | | | | | <catchScope>
 102 | | | | | | pushValue (\x_0 -> 'b')
 103 | | | | | |   minReads=2
 104 | | | | | |   mayRaise=[ExceptionFailure]
 105 | | | | | |   alwaysRaise=[]
 106 | | | | | |   freeRegs=[]
 107 | | | | | | comment "satisfy ((GHC.Classes.==) 'b')"
 108 | | | | | |   minReads=2
 109 | | | | | |   mayRaise=[ExceptionFailure]
 110 | | | | | |   alwaysRaise=[]
 111 | | | | | |   freeRegs=[]
 112 | | | | | | read ((GHC.Classes.==) 'b')
 113 | | | | | |   minReads=2
 114 | | | | | |   mayRaise=[ExceptionFailure]
 115 | | | | | |   alwaysRaise=[]
 116 | | | | | |   freeRegs=[]
 117 | | | | | | lift2Value (\x_0 -> \x_1 -> x_0 x_1)
 118 | | | | | |   minReads=1
 119 | | | | | |   mayRaise=[ExceptionFailure]
 120 | | | | | |   alwaysRaise=[]
 121 | | | | | |   freeRegs=[]
 122 | | | | | | commit ExceptionFailure
 123 | | | | | |   minReads=1
 124 | | | | | |   mayRaise=[ExceptionFailure]
 125 | | | | | |   alwaysRaise=[]
 126 | | | | | |   freeRegs=[]
 127 | | | | | | refJoin join
 128 | | | | | |   minReads=1
 129 | | | | | |   mayRaise=[ExceptionFailure]
 130 | | | | | |   alwaysRaise=[]
 131 | | | | | |   freeRegs=[]
 132 | | | | | <onException ExceptionFailure>
 133 | | | | | | comment "raiseAgainIfConsumed"
 134 | | | | | |   minReads=2
 135 | | | | | |   mayRaise=[ExceptionFailure]
 136 | | | | | |   alwaysRaise=[]
 137 | | | | | |   freeRegs=[]
 138 | | | | | | saveInput
 139 | | | | | |   minReads=2
 140 | | | | | |   mayRaise=[ExceptionFailure]
 141 | | | | | |   alwaysRaise=[]
 142 | | | | | |   freeRegs=[]
 143 | | | | | | lift2Value (\(Data.Text.Internal.Text _ i_0 _) (Data.Text.Internal.Text _
 144 | | | | | |                                                                j_1
 145 | | | | | |                                                                _) -> i_0 GHC.Classes.== j_1)
 146 | | | | | |   minReads=2
 147 | | | | | |   mayRaise=[ExceptionFailure]
 148 | | | | | |   alwaysRaise=[]
 149 | | | | | |   freeRegs=[]
 150 | | | | | | choicesBranch
 151 | | | | | |   minReads=2
 152 | | | | | |   mayRaise=[ExceptionFailure]
 153 | | | | | |   alwaysRaise=[]
 154 | | | | | |   freeRegs=[]
 155 | | | | | | | <branch (\x_0 -> x_0)>
 156 | | | | | | | | pushValue (\x_0 -> 'c')
 157 | | | | | | | |   minReads=2
 158 | | | | | | | |   mayRaise=[ExceptionFailure]
 159 | | | | | | | |   alwaysRaise=[]
 160 | | | | | | | |   freeRegs=[]
 161 | | | | | | | | comment "satisfy ((GHC.Classes.==) 'c')"
 162 | | | | | | | |   minReads=2
 163 | | | | | | | |   mayRaise=[ExceptionFailure]
 164 | | | | | | | |   alwaysRaise=[]
 165 | | | | | | | |   freeRegs=[]
 166 | | | | | | | | read ((GHC.Classes.==) 'c')
 167 | | | | | | | |   minReads=2
 168 | | | | | | | |   mayRaise=[ExceptionFailure]
 169 | | | | | | | |   alwaysRaise=[]
 170 | | | | | | | |   freeRegs=[]
 171 | | | | | | | | lift2Value (\x_0 -> \x_1 -> x_0 x_1)
 172 | | | | | | | |   minReads=1
 173 | | | | | | | |   mayRaise=[ExceptionFailure]
 174 | | | | | | | |   alwaysRaise=[]
 175 | | | | | | | |   freeRegs=[]
 176 | | | | | | | | refJoin join
 177 | | | | | | | |   minReads=1
 178 | | | | | | | |   mayRaise=[ExceptionFailure]
 179 | | | | | | | |   alwaysRaise=[]
 180 | | | | | | | |   freeRegs=[]
 181 | | | | | | | <default>
 182 | | | | | | | | fail []
 183 | | | | | | | |   minReads=0
 184 | | | | | | | |   mayRaise=[ExceptionFailure]
 185 | | | | | | | |   alwaysRaise=[ExceptionFailure]
 186 | | | | | | | |   freeRegs=[]
 187 | | | <default>
 188 | | | | fail []
 189 | | | |   minReads=0
 190 | | | |   mayRaise=[ExceptionFailure]
 191 | | | |   alwaysRaise=[ExceptionFailure]
 192 | | | |   freeRegs=[]