[project @ 2000-06-01 08:51:05 by simonmar]

Test for declaring an infix constructor using prefix notation, eg.

	data T a b = (:^:) a b

diff --git a/ghc/tests/reader/should_compile/read028.hs b/ghc/tests/reader/should_compile/read028.hs
new file mode 100644 (file)
index 0000000..1f193a4
--- /dev/null
+++ b/ghc/tests/reader/should_compile/read028.hs
@@ -0,0 +1,3 @@
+module ShouldCompile where
+
+data T a b = (:^:) a b