tests/Golden/Machine/G10.expected.txt

   1 pushValue GHC.Show.show
   2   minReads=1
   3   mayRaise=[ExceptionFailure]
   4   alwaysRaise=[]
   5   freeRegs=[]
   6 join join
   7   minReads=0
   8   mayRaise=[]
   9   alwaysRaise=[]
  10   freeRegs=[]
  11 | lift2Value (\u_0 -> \u_1 -> u_0 u_1)
  12 |   minReads=0
  13 |   mayRaise=[]
  14 |   alwaysRaise=[]
  15 |   freeRegs=[]
  16 | ret
  17 |   minReads=0
  18 |   mayRaise=[]
  19 |   alwaysRaise=[]
  20 |   freeRegs=[]
  21 catch ExceptionFailure
  22   minReads=1
  23   mayRaise=[ExceptionFailure]
  24   alwaysRaise=[]
  25   freeRegs=[]
  26 | <catchScope>
  27 | | pushValue (\u_0 -> 'a')
  28 | |   minReads=1
  29 | |   mayRaise=[ExceptionFailure]
  30 | |   alwaysRaise=[]
  31 | |   freeRegs=[]
  32 | | comment "satisfy ((GHC.Classes.==) 'a')"
  33 | |   minReads=1
  34 | |   mayRaise=[ExceptionFailure]
  35 | |   alwaysRaise=[]
  36 | |   freeRegs=[]
  37 | | read ((GHC.Classes.==) 'a')
  38 | |   minReads=1
  39 | |   mayRaise=[ExceptionFailure]
  40 | |   alwaysRaise=[]
  41 | |   freeRegs=[]
  42 | | lift2Value (\u_0 -> \u_1 -> u_0 u_1)
  43 | |   minReads=0
  44 | |   mayRaise=[]
  45 | |   alwaysRaise=[]
  46 | |   freeRegs=[]
  47 | | commit ExceptionFailure
  48 | |   minReads=0
  49 | |   mayRaise=[]
  50 | |   alwaysRaise=[]
  51 | |   freeRegs=[]
  52 | | refJoin join
  53 | |   minReads=0
  54 | |   mayRaise=[]
  55 | |   alwaysRaise=[]
  56 | |   freeRegs=[]
  57 | <onException ExceptionFailure>
  58 | | comment "raiseAgainIfConsumed"
  59 | |   minReads=1
  60 | |   mayRaise=[ExceptionFailure]
  61 | |   alwaysRaise=[]
  62 | |   freeRegs=[]
  63 | | saveInput
  64 | |   minReads=1
  65 | |   mayRaise=[ExceptionFailure]
  66 | |   alwaysRaise=[]
  67 | |   freeRegs=[]
  68 | | lift2Value ((GHC.Classes.==) @GHC.Types.Int)
  69 | |   minReads=1
  70 | |   mayRaise=[ExceptionFailure]
  71 | |   alwaysRaise=[]
  72 | |   freeRegs=[]
  73 | | choicesBranch
  74 | |   minReads=1
  75 | |   mayRaise=[ExceptionFailure]
  76 | |   alwaysRaise=[]
  77 | |   freeRegs=[]
  78 | | | <branch (\u_0 -> u_0)>
  79 | | | | pushValue (\u_0 -> 'b')
  80 | | | |   minReads=1
  81 | | | |   mayRaise=[ExceptionFailure]
  82 | | | |   alwaysRaise=[]
  83 | | | |   freeRegs=[]
  84 | | | | comment "satisfy ((GHC.Classes.==) 'b')"
  85 | | | |   minReads=1
  86 | | | |   mayRaise=[ExceptionFailure]
  87 | | | |   alwaysRaise=[]
  88 | | | |   freeRegs=[]
  89 | | | | read ((GHC.Classes.==) 'b')
  90 | | | |   minReads=1
  91 | | | |   mayRaise=[ExceptionFailure]
  92 | | | |   alwaysRaise=[]
  93 | | | |   freeRegs=[]
  94 | | | | lift2Value (\u_0 -> \u_1 -> u_0 u_1)
  95 | | | |   minReads=0
  96 | | | |   mayRaise=[]
  97 | | | |   alwaysRaise=[]
  98 | | | |   freeRegs=[]
  99 | | | | refJoin join
 100 | | | |   minReads=0
 101 | | | |   mayRaise=[]
 102 | | | |   alwaysRaise=[]
 103 | | | |   freeRegs=[]
 104 | | | <default>
 105 | | | | fail []
 106 | | | |   minReads=0
 107 | | | |   mayRaise=[ExceptionFailure]
 108 | | | |   alwaysRaise=[ExceptionFailure]
 109 | | | |   freeRegs=[]