diff --git a/System/Path.hs b/System/Path.hs
--- a/System/Path.hs
+++ b/System/Path.hs
@@ -885,9 +885,6 @@
   quickCheck prop_splitCombine
   putStrLn "Tests completed."
 
-vectorOf :: Gen a -> Int -> Gen [a]
-vectorOf gen n = sequence [ gen | i <- [1..n] ]
-
 -- test :: Testable a => a -> IO ()
 -- test = quickCheck
 
@@ -910,15 +907,16 @@
 
 qcFilePath :: Gen (FilePath ar)
 qcFilePath = do
-  numDirs <- arbitrary
-  pcs <- vectorOf qcDirComponent numDirs
+  (NonNegative numDirs) <- arbitrarySizedIntegral
+  pcs <- vectorOf numDirs qcDirComponent
   pc <- qcFileComponent
   return $ mkPathFromComponents (pcs ++ [pc])
 
+
 qcDirPath :: Gen (DirPath ar)
 qcDirPath = do
-  numDirs <- arbitrary
-  pcs <- vectorOf qcDirComponent numDirs
+  (NonNegative numDirs) <- arbitrarySizedIntegral
+  pcs <- vectorOf numDirs qcDirComponent
   pc <- qcDirComponent
   return $ mkPathFromComponents (pcs ++ [pc])
 
@@ -927,14 +925,11 @@
 
 instance Arbitrary PathComponent where
     arbitrary = oneof [qcFileComponent, qcDirComponent]
-    coarbitrary = error "No PathComponent coarbitrary"
 
 instance Arbitrary (Path ar File) where
     arbitrary = qcFilePath
-    coarbitrary = error "No (FilePath ar) coarbitrary"
 
 instance Arbitrary (Path ar Dir)  where
     arbitrary = qcDirPath
-    coarbitrary = error "No DirPath coarbitrary"
 
 
diff --git a/pathtype.cabal b/pathtype.cabal
--- a/pathtype.cabal
+++ b/pathtype.cabal
@@ -1,5 +1,5 @@
 Name:                pathtype
-Version:             0.0.2
+Version:             0.0.3
 Synopsis:            Type-safe replacement for System.FilePath etc
 Description:         This package provides type-safe access to filepath manipulations.
 		     .
@@ -90,7 +90,7 @@
   location: http://code.haskell.org/pathtype
 
 Library
-  Build-Depends:     base >= 4 && < 5, directory >= 1 && < 2, old-time >= 1.0 && < 2, QuickCheck >= 1.2 && < 2
+  Build-Depends:     base >= 4 && < 5, directory >= 1 && < 2, old-time >= 1.0 && < 2, QuickCheck >= 2.1.0.1 && < 3
   Exposed-modules:
     System.Path, System.Path.Directory, System.Path.IO
   Extensions:        EmptyDataDecls, PatternGuards, FlexibleInstances, Rank2Types, OverloadedStrings
