add more tests

tests/fixed.parsed

@@ -0,0 +1,11 @@
+LitAssn fixed c, [  p  b ]
+
+LitAssn fixed v, [  a  u ]
+
+Puts Cat(
+  Var(c)
+  Var(v)
+  Var(c)
+  Var(v)
+)
+

tests/hello.parsed

@@ -0,0 +1,2 @@
+Puts Str("Hello, world!")
+

tests/patterns.matzo

@@ -0,0 +1,14 @@
+(* simple variables *)
+f := {x => x};
+f := {_ => x};
+
+(* literals *)
+f := {"foo" => "!"};
+f := {Bar => "?"};
+f := {55 => "~"};
+
+(* tuples *)
+f := {<> => x};
+f := {<x> => x};
+f := {<x,y> => x};
+f := {<x,y,z> => x};

tests/patterns.parsed

@@ -0,0 +1,45 @@
+Assn  f Fun(
+  x =>
+    Var(x)
+)
+
+Assn  f Fun(
+  _ =>
+    Var(x)
+)
+
+Assn  f Fun(
+  Str("foo") =>
+    Str("!")
+)
+
+Assn  f Fun(
+  Bar =>
+    Str("?")
+)
+
+Assn  f Fun(
+  Num(55) =>
+    Str("~")
+)
+
+Assn  f Fun(
+  Tup( ) =>
+    Var(x)
+)
+
+Assn  f Fun(
+  Tup( x ) =>
+    Var(x)
+)
+
+Assn  f Fun(
+  Tup( x y ) =>
+    Var(x)
+)
+
+Assn  f Fun(
+  Tup( x y z ) =>
+    Var(x)
+)
+

tests/simple.parsed

@@ -0,0 +1,11 @@
+Puts Cat(
+  Chc(
+    Str("p")
+    Str("b")
+  )
+  Chc(
+    Str("a")
+    Str("u")
+  )
+)
+