[Pkg-haskell-commits] [SCM] haskell-testpack branch, master, updated. debian/1.0.2-1-4-gb0d6b36

[John Goerzen]

The following commit has been merged in the master branch:
commit 4b89b9b0ddb6fb5820b0e6d73726859f7db35c25
Author: John Goerzen <jgoerzen at complete.org>
Date:   Fri Oct 20 01:34:52 2006 +0100

    Remove AnyDBM FiniteMap test

diff --git a/testsrc/AnyDBMtest.hs b/testsrc/AnyDBMtest.hs
index 7258b61..30a9890 100644
--- a/testsrc/AnyDBMtest.hs
+++ b/testsrc/AnyDBMtest.hs
@@ -23,7 +23,6 @@ import MissingH.IO.HVFS
 import MissingH.IO.HVFS.InstanceHelpers
 import MissingH.AnyDBM
 import MissingH.AnyDBM.StringDBM
-import MissingH.AnyDBM.FiniteMapDBM
 import MissingH.AnyDBM.MapDBM
 import System.Directory
 import MissingH.IO.HVFS.Utils
@@ -104,8 +103,6 @@ generic_persist_test initfunc openfunc =
 test_hashtable = generic_test (return ())
                   (\_ -> ((new (==) hashString)::IO (HashTable String String)))
 
-test_finitemap = generic_test (return ())
-                  (\_ -> newFiniteMapDBM)
 test_mapdbm = generic_test (return ())
                   (\_ -> newMapDBM)
 test_stringdbm = generic_persist_test (return SystemFS)
@@ -116,6 +113,5 @@ test_stringdbm = generic_persist_test (return SystemFS)
 
 tests = TestList [TestLabel "HashTable" (TestList test_hashtable),
                   TestLabel "StringDBM" (TestList test_stringdbm),
-                  TestLabel "FiniteMap" (TestList test_finitemap),
                   TestLabel "MapDBM" (TestList test_mapdbm)
                  ]

-- 
haskell-testpack