test/Golden/Machine/G11.expected.txt

   1 pushValue (\x_0 -> \x_1 -> GHC.Show.show x_0)
   2   minReads=(Right 1)
   3   mayRaise=[ExceptionFailure]
   4   freeRegs=[]
   5 pushValue (\x_0 -> x_0)
   6   minReads=(Right 1)
   7   mayRaise=[ExceptionFailure]
   8   freeRegs=[]
   9 newRegister reg
  10   minReads=(Right 1)
  11   mayRaise=[ExceptionFailure]
  12   freeRegs=[]
  13 iter loop
  14   minReads=(Right 1)
  15   mayRaise=[ExceptionFailure]
  16   freeRegs=[reg]
  17 | <ok>
  18 | | pushValue (\x_0 -> (GHC.Types.:) 'a')
  19 | |   minReads=(Right 1)
  20 | |   mayRaise=[ExceptionFailure]
  21 | |   freeRegs=[reg]
  22 | | read ((GHC.Classes.==) 'a')
  23 | |   minReads=(Right 1)
  24 | |   mayRaise=[ExceptionFailure]
  25 | |   freeRegs=[reg]
  26 | | lift2Value (\x_0 -> \x_1 -> x_0 x_1)
  27 | |   minReads=(Right 0)
  28 | |   mayRaise=[]
  29 | |   freeRegs=[reg]
  30 | | pushValue (\x_0 -> \x_1 -> \x_2 -> x_1 (x_0 x_2))
  31 | |   minReads=(Right 0)
  32 | |   mayRaise=[]
  33 | |   freeRegs=[reg]
  34 | | lift2Value (\x_0 -> \x_1 -> x_1 x_0)
  35 | |   minReads=(Right 0)
  36 | |   mayRaise=[]
  37 | |   freeRegs=[reg]
  38 | | readRegister reg
  39 | |   minReads=(Right 0)
  40 | |   mayRaise=[]
  41 | |   freeRegs=[reg]
  42 | | lift2Value (\x_0 -> \x_1 -> x_0 x_1)
  43 | |   minReads=(Right 0)
  44 | |   mayRaise=[]
  45 | |   freeRegs=[reg]
  46 | | writeRegister reg
  47 | |   minReads=(Right 0)
  48 | |   mayRaise=[]
  49 | |   freeRegs=[reg]
  50 | | jump loop
  51 | |   minReads=(Right 0)
  52 | |   mayRaise=[]
  53 | |   freeRegs=[]
  54 | <ko>
  55 | | pushInput
  56 | |   minReads=(Right 1)
  57 | |   mayRaise=[ExceptionFailure]
  58 | |   freeRegs=[reg]
  59 | | lift2Value (\(Data.Text.Internal.Text _ i_0 _) (Data.Text.Internal.Text _
  60 | |                                                                j_1
  61 | |                                                                _) -> i_0 GHC.Classes.== j_1)
  62 | |   minReads=(Right 1)
  63 | |   mayRaise=[ExceptionFailure]
  64 | |   freeRegs=[reg]
  65 | | choicesBranch
  66 | |   minReads=(Right 1)
  67 | |   mayRaise=[ExceptionFailure]
  68 | |   freeRegs=[reg]
  69 | | | <branch (\x_0 -> x_0)>
  70 | | | | readRegister reg
  71 | | | |   minReads=(Right 1)
  72 | | | |   mayRaise=[ExceptionFailure]
  73 | | | |   freeRegs=[reg]
  74 | | | | pushValue GHC.Types.[]
  75 | | | |   minReads=(Right 1)
  76 | | | |   mayRaise=[ExceptionFailure]
  77 | | | |   freeRegs=[]
  78 | | | | lift2Value (\x_0 -> \x_1 -> x_0 x_1)
  79 | | | |   minReads=(Right 1)
  80 | | | |   mayRaise=[ExceptionFailure]
  81 | | | |   freeRegs=[]
  82 | | | | lift2Value (\x_0 -> \x_1 -> x_0 x_1)
  83 | | | |   minReads=(Right 1)
  84 | | | |   mayRaise=[ExceptionFailure]
  85 | | | |   freeRegs=[]
  86 | | | | read ((GHC.Classes.==) 'b')
  87 | | | |   minReads=(Right 1)
  88 | | | |   mayRaise=[ExceptionFailure]
  89 | | | |   freeRegs=[]
  90 | | | | lift2Value (\x_0 -> \x_1 -> x_0 x_1)
  91 | | | |   minReads=(Right 0)
  92 | | | |   mayRaise=[]
  93 | | | |   freeRegs=[]
  94 | | | | ret
  95 | | | |   minReads=(Right 0)
  96 | | | |   mayRaise=[]
  97 | | | |   freeRegs=[]
  98 | | | <default>
  99 | | | | fail []
 100 | | | |   minReads=(Left ExceptionFailure)
 101 | | | |   mayRaise=[ExceptionFailure]
 102 | | | |   freeRegs=[]