@@ -0,0 +1,9 @@
1+diff -ru orig/test/test.hs new/test/test.hs
2+--- orig/test/test.hs 2014-01-29 09:09:40.578369753 +0200
3++++ new/test/test.hs 2014-01-29 09:09:40.000000000 +0200
5+ <$> replicateM (abs n) randomIO
6+ dest <- runResourceT $ do
7+ C.sourceList (P.map S.pack ss) =$= bzip2 =$= bunzip2 $$ B.take (10^9)
8+- return $ dest == L.pack (concat ss)
9++ return $ dest == L.pack (P.concat ss)