More occurs tests

ezyang · ezyang · commit 9704120bf184 · 2014-10-02T12:05:45.000-07:00
Signed-off-by: Edward Z. Yang &lt;ezyang@cs.stanford.edu&gt;
diff --git a/should_fail/occurs2.hs b/should_fail/occurs2.hs
@@ -0,0 +1 @@
+f (x:xs) = \b -> if b then x else xs
diff --git a/should_fail/occurs3.hs b/should_fail/occurs3.hs
@@ -0,0 +1 @@
+f x = (x, f x)
