test/Golden/Machine/string.dump

   1 catchFail
   2   <try>
   3   | push ((flip ($)) ((flip ($)) ((flip ($)) ((flip ($)) Haskell . (cons . const Haskell)) . ((.) . (cons . const Haskell))) . ((.) . ((.) . (cons . const Haskell)))) . ((.) . ((.) . ((.) . (cons . const Haskell)))))
   4   | read
   5   | lift ($)
   6   | read
   7   | lift ($)
   8   | read
   9   | lift ($)
  10   | read
  11   | lift ($)
  12   | popFail
  13   | ret
  14   <handler>
  15     loadInput
  16     fail