summaryrefslogtreecommitdiff
path: root/compiler/ilxGen/tests/test8.hs
diff options
context:
space:
mode:
Diffstat (limited to 'compiler/ilxGen/tests/test8.hs')
-rw-r--r--compiler/ilxGen/tests/test8.hs8
1 files changed, 8 insertions, 0 deletions
diff --git a/compiler/ilxGen/tests/test8.hs b/compiler/ilxGen/tests/test8.hs
new file mode 100644
index 0000000000..94a7e1f83d
--- /dev/null
+++ b/compiler/ilxGen/tests/test8.hs
@@ -0,0 +1,8 @@
+data Inf a = A (Inf a)
+
+hd (A x) = x
+
+choose (A (A x)) = "hello world\n"
+mk f = f (mk f)
+main = putStr (choose (hd (mk A)))
+