1 files changed, 11 insertions, 0 deletions
diff --git a/testsuite/tests/concurrent/prog003/Collection.hs b/testsuite/tests/concurrent/prog003/Collection.hs
new file mode 100644
index 0000000000..73a71f6714
--- /dev/null
+++ b/testsuite/tests/concurrent/prog003/Collection.hs
@@ -0,0 +1,11 @@
+{-# LANGUAGE MultiParamTypeClasses, FunctionalDependencies #-}
+module Collection where
+
+
+class Show e => Col c e | c -> e where
+   newCol :: IO c
+   insertCol :: c -> e -> IO ()
+   deleteCol :: c -> e -> IO Bool
+   findCol :: c -> e -> IO Bool
+   printCol :: c -> IO ()
+   cntCol :: c -> IO Int