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

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

diff --git a/ghc/interpreter/test/static/s001.hs b/ghc/interpreter/test/static/s001.hs
new file mode 100644 (file)
index 0000000..22b4b61
--- /dev/null
+++ b/ghc/interpreter/test/static/s001.hs
@@ -0,0 +1,6 @@
+--!!! Testing error checking in qualified names (patterns)
+
+-- No qualified variables in patterns
+module TestQual1 where
+f (A.x : xs) = xs
+