diff --git a/test/PrintParse.hs b/test/PrintParse.hs
deleted file mode 100644
--- a/test/PrintParse.hs
+++ /dev/null
@@ -1,120 +0,0 @@
-{-# OPTIONS -fno-warn-orphans #-}
-{-# LANGUAGE FlexibleInstances #-}
-
-module PrintParse (tests) where
-
-import Distribution.TestSuite.Compat (prop, TestList, testList)
-import Test.QuickCheck
-  (Gen, Arbitrary (..), choose, oneof, frequency, elements)
-
-import Control.Applicative ((<$>), (<*>))
-import Data.ByteString.Char8 (ByteString, pack)
-import Text.LDAP.Data
-  (AttrType (..), AttrValue (..), Attribute, Component (..),
-   DN, List1)
-import Text.LDAP.Printer (LdapPrinter, runLdapPrinter)
-import qualified Text.LDAP.Printer as Printer
-import Text.LDAP.Parser (LdapParser, runLdapParser)
-import qualified Text.LDAP.Parser as Parser
-import Data.List.NonEmpty (NonEmpty ((:|)))
-
-
-list :: Gen a -> Int -> Gen [a]
-list g n = sequence [ g | _i <- [1..n] ]
-
-sequence1 :: Monad m => NonEmpty (m a) -> m (NonEmpty a)
-sequence1 (ma :| ms) = do
-  x   <- ma
-  xs  <- sequence ms
-  return $ x :| xs
-
-list1 :: Gen a -> Int -> Gen (List1 a)
-list1 g n = sequence1 $ do
-  _i <- 1 :| [2..n]
-  return g
-
-digit :: Gen Char
-digit =  choose ('0', '9')
-
-oidpe :: Gen ByteString
-oidpe =  (pack <$>) $ choose (1, 10) >>= list digit
-
-alpha :: Gen Char
-alpha =  oneof [choose ('A', 'Z'), choose ('a', 'z')]
-
-keychar :: Gen Char
-keychar =  elements $ '-' : ['0'..'9'] ++ ['A'..'Z'] ++ ['a'..'z']
-
-keystr :: Gen ByteString
-keystr =  (pack <$>) $ (:) <$> alpha <*> (choose (0, 40) >>= list keychar)
-
-bstring' :: Int -> Int -> Gen ByteString
-bstring' n m = (pack <$>) $ choose (n, m) >>= list (elements ['\0'..'\255'])
-
-bstring :: Int -> Gen ByteString
-bstring =  bstring' 0
-
-
-attrType :: Gen AttrType
-attrType =
-  oneof
-  [ AttrType <$> keystr
-  , AttrOid  <$> (choose (1, 8) >>= list1 oidpe)
-  ]
-
-attrValue :: Gen AttrValue
-attrValue =  AttrValue <$> bstring 0x200
-
-component :: Gen Component
-component =
-  frequency
-  [ (1, S <$> arbitrary)
-  , (3, L <$> (choose (2, 5) >>= list1 arbitrary))
-  ]
-
-
-isoProp :: Eq a => LdapPrinter a -> LdapParser a -> a -> Bool
-isoProp pr ps a = Right a == (runLdapParser ps . runLdapPrinter pr $ a)
-
-instance Arbitrary AttrType where
-  arbitrary = attrType
-
-instance Arbitrary AttrValue where
-  arbitrary = attrValue
-
-instance Arbitrary Component where
-  arbitrary = component
-
-instance Arbitrary DN where
-  arbitrary = choose (1, 30) >>= list1 arbitrary
-
-prop_attributeIso :: Attribute -> Bool
-prop_attributeIso =  isoProp Printer.attribute Parser.attribute
-
-prop_componentIso :: Component -> Bool
-prop_componentIso =  isoProp Printer.component Parser.component
-
-prop_dnIso :: DN -> Bool
-prop_dnIso =  isoProp Printer.dn Parser.dn
-
-prop_ldifAttrIso :: (AttrType, AttrValue) -> Bool
-prop_ldifAttrIso =
-  isoProp
-  (Printer.ldifAttr Printer.ldifEncodeAttrValue)
-  (Parser.ldifAttr  Parser.ldifDecodeAttrValue)
-
-prop_openLdapEntryIso :: (DN, [(AttrType, AttrValue)]) -> Bool
-prop_openLdapEntryIso =
-  isoProp
-  (Printer.openLdapEntry Printer.ldifEncodeAttrValue)
-  (Parser.openLdapEntry  Parser.ldifDecodeAttrValue)
-
-tests :: TestList
-tests =
-  testList
-  [ prop "attribute iso - print parse"      prop_attributeIso
-  , prop "component iso - print parse"      prop_componentIso
-  , prop "dn iso - print parse"             prop_dnIso
-  , prop "ldifAttr iso - print parse"       prop_ldifAttrIso
-  , prop "openLdapEntry iso - print parse"  prop_openLdapEntryIso
-  ]
diff --git a/test/printParse.hs b/test/printParse.hs
new file mode 100644
--- /dev/null
+++ b/test/printParse.hs
@@ -0,0 +1,120 @@
+{-# OPTIONS -fno-warn-orphans #-}
+{-# LANGUAGE FlexibleInstances #-}
+
+import Test.QuickCheck
+  (Gen, Arbitrary (..), choose, oneof, frequency, elements)
+import Test.QuickCheck.Simple (defaultMain, Test, qcTest)
+
+import Control.Applicative ((<$>), (<*>))
+import Data.ByteString.Char8 (ByteString, pack)
+import Text.LDAP.Data
+  (AttrType (..), AttrValue (..), Attribute, Component (..),
+   DN, List1)
+import Text.LDAP.Printer (LdapPrinter, runLdapPrinter)
+import qualified Text.LDAP.Printer as Printer
+import Text.LDAP.Parser (LdapParser, runLdapParser)
+import qualified Text.LDAP.Parser as Parser
+import Data.List.NonEmpty (NonEmpty ((:|)))
+
+
+list :: Gen a -> Int -> Gen [a]
+list g n = sequence [ g | _i <- [1..n] ]
+
+sequence1 :: Monad m => NonEmpty (m a) -> m (NonEmpty a)
+sequence1 (ma :| ms) = do
+  x   <- ma
+  xs  <- sequence ms
+  return $ x :| xs
+
+list1 :: Gen a -> Int -> Gen (List1 a)
+list1 g n = sequence1 $ do
+  _i <- 1 :| [2..n]
+  return g
+
+digit :: Gen Char
+digit =  choose ('0', '9')
+
+oidpe :: Gen ByteString
+oidpe =  (pack <$>) $ choose (1, 10) >>= list digit
+
+alpha :: Gen Char
+alpha =  oneof [choose ('A', 'Z'), choose ('a', 'z')]
+
+keychar :: Gen Char
+keychar =  elements $ '-' : ['0'..'9'] ++ ['A'..'Z'] ++ ['a'..'z']
+
+keystr :: Gen ByteString
+keystr =  (pack <$>) $ (:) <$> alpha <*> (choose (0, 40) >>= list keychar)
+
+bstring' :: Int -> Int -> Gen ByteString
+bstring' n m = (pack <$>) $ choose (n, m) >>= list (elements ['\0'..'\255'])
+
+bstring :: Int -> Gen ByteString
+bstring =  bstring' 0
+
+
+attrType :: Gen AttrType
+attrType =
+  oneof
+  [ AttrType <$> keystr
+  , AttrOid  <$> (choose (1, 8) >>= list1 oidpe)
+  ]
+
+attrValue :: Gen AttrValue
+attrValue =  AttrValue <$> bstring 0x200
+
+component :: Gen Component
+component =
+  frequency
+  [ (1, S <$> arbitrary)
+  , (3, L <$> (choose (2, 5) >>= list1 arbitrary))
+  ]
+
+
+isoProp :: Eq a => LdapPrinter a -> LdapParser a -> a -> Bool
+isoProp pr ps a = Right a == (runLdapParser ps . runLdapPrinter pr $ a)
+
+instance Arbitrary AttrType where
+  arbitrary = attrType
+
+instance Arbitrary AttrValue where
+  arbitrary = attrValue
+
+instance Arbitrary Component where
+  arbitrary = component
+
+instance Arbitrary DN where
+  arbitrary = choose (1, 30) >>= list1 arbitrary
+
+prop_attributeIso :: Attribute -> Bool
+prop_attributeIso =  isoProp Printer.attribute Parser.attribute
+
+prop_componentIso :: Component -> Bool
+prop_componentIso =  isoProp Printer.component Parser.component
+
+prop_dnIso :: DN -> Bool
+prop_dnIso =  isoProp Printer.dn Parser.dn
+
+prop_ldifAttrIso :: (AttrType, AttrValue) -> Bool
+prop_ldifAttrIso =
+  isoProp
+  (Printer.ldifAttr Printer.ldifEncodeAttrValue)
+  (Parser.ldifAttr  Parser.ldifDecodeAttrValue)
+
+prop_openLdapEntryIso :: (DN, [(AttrType, AttrValue)]) -> Bool
+prop_openLdapEntryIso =
+  isoProp
+  (Printer.openLdapEntry Printer.ldifEncodeAttrValue)
+  (Parser.openLdapEntry  Parser.ldifDecodeAttrValue)
+
+tests :: [Test]
+tests =
+  [ qcTest "attribute iso - print parse"      prop_attributeIso
+  , qcTest "component iso - print parse"      prop_componentIso
+  , qcTest "dn iso - print parse"             prop_dnIso
+  , qcTest "ldifAttr iso - print parse"       prop_ldifAttrIso
+  , qcTest "openLdapEntry iso - print parse"  prop_openLdapEntryIso
+  ]
+
+main :: IO ()
+main = defaultMain tests
diff --git a/text-ldap.cabal b/text-ldap.cabal
--- a/text-ldap.cabal
+++ b/text-ldap.cabal
@@ -1,5 +1,5 @@
 name:                text-ldap
-version:             0.1.1.5
+version:             0.1.1.6
 synopsis:            Parser and Printer for LDAP text data stream
 description:         This package contains Parser and Printer for
                      LDAP text data stream like OpenLDAP backup LDIF.
@@ -58,11 +58,10 @@
                        , semigroups
                        , text-ldap
                        , QuickCheck >=2
-                       , Cabal
-                       , cabal-test-compat >=0.2
+                       , quickcheck-simple
 
-  type:                detailed-0.9
-  test-module:         PrintParse
+  type:                exitcode-stdio-1.0
+  main-is:             printParse.hs
   hs-source-dirs:      test
   ghc-options:         -Wall