aboutsummaryrefslogtreecommitdiff
path: root/html-test/src/Bug8.hs
diff options
context:
space:
mode:
authorSimon Hengel <sol@typeful.net>2012-10-15 20:32:03 +0200
committerSimon Hengel <sol@typeful.net>2012-10-15 20:49:39 +0200
commit7e1fed4da8bb913d25f447afd1f1e485d428e37f (patch)
tree179a79201d11df7b27583f083d884753b1ee82e4 /html-test/src/Bug8.hs
parenta4fb9cb0a44101d858d69281a3ee0aa0dbf7ddda (diff)
Move source files for HTML tests to html-test/src
Diffstat (limited to 'html-test/src/Bug8.hs')
-rw-r--r--html-test/src/Bug8.hs14
1 files changed, 14 insertions, 0 deletions
diff --git a/html-test/src/Bug8.hs b/html-test/src/Bug8.hs
new file mode 100644
index 00000000..18df63c8
--- /dev/null
+++ b/html-test/src/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