@@ -9,7 +9,9 @@ import Data.Binary.Put ( runPut )
9import qualified Data.Binary.Get as BG ( getWord8, getWord16be, getWord32be, getWord64be )
9import qualified Data.Binary.Get as BG ( getWord8, getWord16be, getWord32be, getWord64be )
10import qualified Data.Binary.Put as BP ( putWord8, putWord16be, putWord32be, putWord64be )
10import qualified Data.Binary.Put as BP ( putWord8, putWord16be, putWord32be, putWord64be )
12−import Bits
12+import Data.Binary.Bits
13+import Data.Binary.Bits.Get
14+import Data.Binary.Bits.Put
14import Control.Applicative
16import Control.Applicative
15import Data.Bits
17import Data.Bits
@@ -19,9 +21,6 @@ import Foreign.Storable
19import System.Random
21import System.Random
20import System
22import System
25import Test.Framework.Options ( TestOptions'(..) )
24import Test.Framework.Options ( TestOptions'(..) )
26import Test.Framework.Providers.QuickCheck2 ( testProperty )
25import Test.Framework.Providers.QuickCheck2 ( testProperty )
27import Test.Framework.Runners.Console ( defaultMain )
26import Test.Framework.Runners.Console ( defaultMain )