machine: map exceptionStack by label

[haskell/symantic-parser.git] / test / Golden / Grammar / boom.opt.dump

diff --git a/test/Golden/Grammar/boom.opt.dump b/test/Golden/Grammar/boom.opt.dump
index 2407cc8406ab49623e20f0f047f9c9e786286d49..da927908052b0a935310d7344395d5e56fdddef1 100644 (file)
--- a/test/Golden/Grammar/boom.opt.dump
+++ b/test/Golden/Grammar/boom.opt.dump
@@ -2,29 +2,35 @@
 + <*>
 | + <*>
 | | + <*>
-| | | + pure ((.) ((flip ($)) (const id)) . ((.) (.) . ((.) (.) . ((.) (const id) . const id))))
-| | | ` def let_3
-| | |   ` <*>
-| | |     + <*>
-| | |     | + pure (const id)
-| | |     | ` def let_5
-| | |     |   ` <*>
-| | |     |     + <*>
-| | |     |     | + pure (const id)
-| | |     |     | ` rec let_3
-| | |     |     ` rec let_5
-| | |     ` rec let_3
-| | ` def let_1
-| |   ` pure ()
-| ` def let_2
+| | | + <*>
+| | | | + <*>
+| | | | | + pure (\u1 -> (\u2 -> (\u3 -> (\u4 -> (\u5 -> (\u6 -> (u4 u5) u6))))))
+| | | | | ` def <hidden>
+| | | | |   ` pure (\u1 -> (\u2 -> u2))
+| | | | ` def <hidden>
+| | | |   ` <*>
+| | | |     + <*>
+| | | |     | + def <hidden>
+| | | |     | | ` pure (\u1 -> (\u2 -> u2))
+| | | |     | ` def <hidden>
+| | | |     |   ` <*>
+| | | |     |     + <*>
+| | | |     |     | + pure (\u1 -> (\u2 -> u2))
+| | | |     |     | ` rec <hidden>
+| | | |     |     ` rec <hidden>
+| | | |     ` rec <hidden>
+| | | ` def <hidden>
+| | |   ` pure Term
+| | ` ref <hidden>
+| ` def <hidden>
 |   ` <*>
 |     + <*>
-|     | + pure (const id)
-|     | ` def let_4
+|     | + ref <hidden>
+|     | ` def <hidden>
 |     |   ` <*>
 |     |     + <*>
-|     |     | + pure (const id)
-|     |     | ` rec let_2
-|     |     ` rec let_4
-|     ` rec let_2
-` ref let_1
+|     |     | + pure (\u1 -> (\u2 -> u2))
+|     |     | ` rec <hidden>
+|     |     ` rec <hidden>
+|     ` rec <hidden>
+` ref <hidden>