machine: improve comments
[haskell/symantic-parser.git] / test / Golden / Grammar / ViewGrammar / G12.expected.txt
index 0f63f6d49a68192c933977e5af6a3d283c8af781..06d5666b87648534a6c1504052e85b245a95face 100644 (file)
@@ -1,11 +1,20 @@
-<*>
-+ <*>
-| + pure (\u1 -> (\u2 -> u1 Term))
+lets
++ let <hidden>
 | ` <|>
 |   + <*>
 |   | + <*>
-|   | | + pure (\u1 -> (\u2 -> (\u3 -> u1 : u2 u3)))
-|   | | ` satisfy
+|   | | + pure (\u1 -> (\u2 -> (\u3 -> u1 (u2 u3))))
+|   | | ` <*>
+|   | |   + pure cons
+|   | |   ` satisfy
 |   | ` rec <hidden>
 |   ` pure (\u1 -> u1)
-` eof
+` <*>
+  + pure Term
+  ` <*>
+    + <*>
+    | + pure (\u1 -> (\u2 -> u1))
+    | ` <*>
+    |   + ref <hidden>
+    |   ` pure Term
+    ` eof