From 958d64d77572c47d249965d7146ac17a23de806d Mon Sep 17 00:00:00 2001
From: Simon Hengel <sol@typeful.net>
Date: Mon, 15 Oct 2012 10:34:28 +0200
Subject: Move HTML tests to directory /html-test/

---
 html-test/tests/Bug8.hs | 14 ++++++++++++++
 1 file changed, 14 insertions(+)
 create mode 100644 html-test/tests/Bug8.hs

(limited to 'html-test/tests/Bug8.hs')

diff --git a/html-test/tests/Bug8.hs b/html-test/tests/Bug8.hs
new file mode 100644
index 00000000..18df63c8
--- /dev/null
+++ b/html-test/tests/Bug8.hs
@@ -0,0 +1,14 @@
+module Bug8 where
+
+infix -->
+infix --->
+
+data Typ = Type (String,[Typ])
+         | TFree (String, [String])
+
+x --> y = Type("fun",[s,t])
+(--->) = flip $ foldr (-->)
+
+s = undefined
+t = undefined
+main = undefined
-- 
cgit v1.2.3