[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 7cbdfe533c58d9af427f42c97cb6bee892c49b5d
Author: John Goerzen <jgoerzen at complete.org>
Date:   Sun Dec 5 00:45:08 2004 +0100

    Checkpointing
    
    Keywords:
    
    
    (jgoerzen at complete.org--projects/missingh--head--0.7--patch-44)

diff --git a/ChangeLog b/ChangeLog
index 6a1e0f0..437470b 100644
--- a/ChangeLog
+++ b/ChangeLog
@@ -2,6 +2,18 @@
 # arch-tag: automatic-ChangeLog--jgoerzen at complete.org--projects/missingh--head--0.7
 #
 
+2004-12-04 17:45:08 GMT	John Goerzen <jgoerzen at complete.org>	patch-44
+
+    Summary:
+      Checkpointing
+    Revision:
+      missingh--head--0.7--patch-44
+
+
+    modified files:
+     ChangeLog testsrc/GZiptest.hs
+
+
 2004-12-04 17:07:49 GMT	John Goerzen <jgoerzen at complete.org>	patch-43
 
     Summary:
diff --git a/testsrc/GZiptest.hs b/testsrc/GZiptest.hs
index 66bb5c1..6f9d290 100644
--- a/testsrc/GZiptest.hs
+++ b/testsrc/GZiptest.hs
@@ -78,6 +78,9 @@ test_gunzip =
          f "t1.gz" ("Test 1", True)
         ,f "t1bad.gz" ("Test 1", False)
         ,f "t2.gz" ("Test 1Test 2", True)
+        ,mf "zeros.gz" True (\x -> case decompress x of
+                                Right (y, _) -> y == replicate 10485760 '\0'
+                                _ -> False)
         ]
 
 tests = TestList [TestLabel "inflate" (TestList test_inflate),

-- 
haskell-testpack