diff --git a/src/ludus/parser.clj b/src/ludus/parser.clj
index 1df1094..9b1612e 100644
--- a/src/ludus/parser.clj
+++ b/src/ludus/parser.clj
@@ -1225,12 +1225,16 @@
     (parse-script)))
 
 (do
-  (def source "
+  (def my-source "
 data Foo {foo, bar}
+data Bar as {
+    Bar
+    Baz
+}
 
 ")
 
-  (::ast (parse (scanner/scan source))))
+  (::ast (parse (scanner/scan my-source))))
 
 (comment "
 	Further thoughts/still to do: