summaryrefslogtreecommitdiff
path: root/ghc/compiler/tests/reader/read002.hs
diff options
context:
space:
mode:
Diffstat (limited to 'ghc/compiler/tests/reader/read002.hs')
-rw-r--r--ghc/compiler/tests/reader/read002.hs13
1 files changed, 13 insertions, 0 deletions
diff --git a/ghc/compiler/tests/reader/read002.hs b/ghc/compiler/tests/reader/read002.hs
new file mode 100644
index 0000000000..9cc2153956
--- /dev/null
+++ b/ghc/compiler/tests/reader/read002.hs
@@ -0,0 +1,13 @@
+--!!! tests fixity reading and printing
+
+infixl 1 `f`
+infixr 2 \\\
+infix 3 :==>
+infix 4 `MkFoo`
+
+data Foo = MkFoo Int | Float :==> Double
+
+x `f` y = x
+
+(\\\) :: (Eq a) => [a] -> [a] -> [a]
+(\\\) xs ys = xs