Hide type synonims from the main API

2 files changed, 2 insertions, 8 deletions

diff --git a/bench/Main.hs b/bench/Main.hs
index d60c0d7..4953a06 100644
--- a/bench/Main.hs
+++ b/bench/Main.hs
@@ -22,6 +22,7 @@ import             Data.AttoBencode as B
 import             Data.AttoBencode.Parser as B
 import "bencoding" Data.BEncode     as C
 import "bencoding" Data.BEncode.Internal as C
+import "bencoding" Data.BEncode.Types    as C
 
 instance NFData A.BEncode where
     rnf (A.BInt    i) = rnf i
diff --git a/src/Data/BEncode.hs b/src/Data/BEncode.hs
index 353d66e..81010b6 100644
--- a/src/Data/BEncode.hs
+++ b/src/Data/BEncode.hs
@@ -57,14 +57,7 @@
 #endif
 
 module Data.BEncode
-       ( -- * Datatype
-         BInteger
-       , BString
-       , BList
-       , BDict
-       , BKey
-
-       , BValue (..)
+       ( BValue (..)
 
          -- * Conversion
        , BEncode (..)