[project @ 1998-12-02 13:17:09 by simonm]

[ghc-hetmet.git] / ghc / interpreter / test / static / s018.hs

diff --git a/ghc/interpreter/test/static/s018.hs b/ghc/interpreter/test/static/s018.hs
new file mode 100644 (file)
index 0000000..e439a56
--- /dev/null
+++ b/ghc/interpreter/test/static/s018.hs
@@ -0,0 +1,5 @@
+--!!! Correct class export
+module M(C(m1,m2,m3)) where
+class C a where
+  m1 :: a
+  m2, m3 :: a