test/Golden/Machine/G12.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 (\u1 -> (\u2 -> (\u3 -> u1 (u2 u3))))
   9 | | |   minReads=(Right 1)
  10 | | |   mayRaise=[ExceptionFailure]
  11 | | | pushValue cons
  12 | | |   minReads=(Right 1)
  13 | | |   mayRaise=[ExceptionFailure]
  14 | | | read Term
  15 | | |   minReads=(Right 1)
  16 | | |   mayRaise=[ExceptionFailure]
  17 | | | lift2Value (\u1 -> (\u2 -> u1 u2))
  18 | | |   minReads=(Right 0)
  19 | | |   mayRaise=[ExceptionFailure]
  20 | | | lift2Value (\u1 -> (\u2 -> u1 u2))
  21 | | |   minReads=(Right 0)
  22 | | |   mayRaise=[ExceptionFailure]
  23 | | | call <hidden>
  24 | | |   minReads=(Right 0)
  25 | | |   mayRaise=[ExceptionFailure]
  26 | | | lift2Value (\u1 -> (\u2 -> u1 u2))
  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 Term
  40 | | |   minReads=(Right 0)
  41 | | |   mayRaise=[ExceptionFailure]
  42 | | | choicesBranch [(\u1 -> u1)]
  43 | | |   minReads=(Right 0)
  44 | | |   mayRaise=[ExceptionFailure]
  45 | | | | <branch>
  46 | | | | | pushValue (\u1 -> u1)
  47 | | | | |   minReads=(Right 0)
  48 | | | | |   mayRaise=[]
  49 | | | | | ret
  50 | | | | |   minReads=(Right 0)
  51 | | | | |   mayRaise=[]
  52 | | | | <default>
  53 | | | | | fail []
  54 | | | | |   minReads=(Left ExceptionFailure)
  55 | | | | |   mayRaise=[ExceptionFailure]
  56 pushValue Term
  57   minReads=(Right 0)
  58   mayRaise=[ExceptionFailure]
  59 pushValue (\u1 -> (\u2 -> u1))
  60   minReads=(Right 0)
  61   mayRaise=[ExceptionFailure]
  62 call <hidden>
  63   minReads=(Right 0)
  64   mayRaise=[ExceptionFailure]
  65 pushValue Term
  66   minReads=(Right 0)
  67   mayRaise=[ExceptionFailure]
  68 lift2Value (\u1 -> (\u2 -> u1 u2))
  69   minReads=(Right 0)
  70   mayRaise=[ExceptionFailure]
  71 lift2Value (\u1 -> (\u2 -> u1 u2))
  72   minReads=(Right 0)
  73   mayRaise=[ExceptionFailure]
  74 join <hidden>
  75   minReads=(Right 0)
  76   mayRaise=[]
  77 | lift2Value (\u1 -> (\u2 -> u1 u2))
  78 |   minReads=(Right 0)
  79 |   mayRaise=[]
  80 | lift2Value (\u1 -> (\u2 -> u1 u2))
  81 |   minReads=(Right 0)
  82 |   mayRaise=[]
  83 | ret
  84 |   minReads=(Right 0)
  85 |   mayRaise=[]
  86 catch ExceptionFailure
  87   minReads=(Right 0)
  88   mayRaise=[ExceptionFailure]
  89 | <ok>
  90 | | catch ExceptionFailure
  91 | |   minReads=(Right 0)
  92 | |   mayRaise=[]
  93 | | | <ok>
  94 | | | | pushInput
  95 | | | |   minReads=(Left ExceptionFailure)
  96 | | | |   mayRaise=[ExceptionFailure]
  97 | | | | read (\u1 -> Term)
  98 | | | |   minReads=(Left ExceptionFailure)
  99 | | | |   mayRaise=[ExceptionFailure]
 100 | | | | popValue
 101 | | | |   minReads=(Left ExceptionFailure)
 102 | | | |   mayRaise=[ExceptionFailure]
 103 | | | | commit ExceptionFailure
 104 | | | |   minReads=(Left ExceptionFailure)
 105 | | | |   mayRaise=[ExceptionFailure]
 106 | | | | loadInput
 107 | | | |   minReads=(Left ExceptionFailure)
 108 | | | |   mayRaise=[ExceptionFailure]
 109 | | | | fail []
 110 | | | |   minReads=(Left ExceptionFailure)
 111 | | | |   mayRaise=[ExceptionFailure]
 112 | | | <ko>
 113 | | | | loadInput
 114 | | | |   minReads=(Right 0)
 115 | | | |   mayRaise=[]
 116 | | | | pushValue Term
 117 | | | |   minReads=(Right 0)
 118 | | | |   mayRaise=[]
 119 | | | | commit ExceptionFailure
 120 | | | |   minReads=(Right 0)
 121 | | | |   mayRaise=[]
 122 | | | | refJoin <hidden>
 123 | | | |   minReads=(Right 0)
 124 | | | |   mayRaise=[]
 125 | <ko>
 126 | | pushInput
 127 | |   minReads=(Left ExceptionFailure)
 128 | |   mayRaise=[ExceptionFailure]
 129 | | lift2Value Term
 130 | |   minReads=(Left ExceptionFailure)
 131 | |   mayRaise=[ExceptionFailure]
 132 | | choicesBranch [(\u1 -> u1)]
 133 | |   minReads=(Left ExceptionFailure)
 134 | |   mayRaise=[ExceptionFailure]
 135 | | | <branch>
 136 | | | | fail [FailureEnd]
 137 | | | |   minReads=(Left ExceptionFailure)
 138 | | | |   mayRaise=[ExceptionFailure]
 139 | | | <default>
 140 | | | | fail []
 141 | | | |   minReads=(Left ExceptionFailure)
 142 | | | |   mayRaise=[ExceptionFailure]