diff options
| author | Simon Hengel <sol@typeful.net> | 2012-10-15 10:34:28 +0200 |
|---|---|---|
| committer | Simon Hengel <sol@typeful.net> | 2012-10-15 15:46:18 +0200 |
| commit | 958d64d77572c47d249965d7146ac17a23de806d (patch) | |
| tree | b3cf49a9c6202b50d618df9270e24d28f5ecae50 /html-test/tests/Bug8.hs | |
| parent | 943c5b7880cbfa8c90a0776dd539ae1e89f46d35 (diff) | |
Move HTML tests to directory /html-test/
Diffstat (limited to 'html-test/tests/Bug8.hs')
| -rw-r--r-- | html-test/tests/Bug8.hs | 14 |
1 files changed, 14 insertions, 0 deletions
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 |