[commit: bytestring] ghc-7.6: Don't export builder prim testing support functions (5973fe1)
Paolo Capriotti
p.capriotti at gmail.com
Thu Sep 6 12:29:06 CEST 2012
Repository : ssh://darcs.haskell.org//srv/darcs/packages/bytestring
On branch : ghc-7.6
http://hackage.haskell.org/trac/ghc/changeset/5973fe1fba29509bac610f6ea893e79bbc487eba
>---------------------------------------------------------------
commit 5973fe1fba29509bac610f6ea893e79bbc487eba
Author: Duncan Coutts <duncan at community.haskell.org>
Date: Wed Sep 5 01:52:02 2012 +0000
Don't export builder prim testing support functions
Now that it's an exposed API
>---------------------------------------------------------------
Data/ByteString/Builder/Prim.hs | 7 ++++---
1 files changed, 4 insertions(+), 3 deletions(-)
diff --git a/Data/ByteString/Builder/Prim.hs b/Data/ByteString/Builder/Prim.hs
index 4c85bb0..396f287 100644
--- a/Data/ByteString/Builder/Prim.hs
+++ b/Data/ByteString/Builder/Prim.hs
@@ -447,6 +447,7 @@ module Data.ByteString.Builder.Prim (
-- a decimal number with UTF-8 encoded characters.
, charUtf8
+{-
-- * Testing support
-- | The following four functions are intended for testing use
-- only. They are /not/ efficient. Basic encodings are efficently executed by
@@ -458,7 +459,7 @@ module Data.ByteString.Builder.Prim (
, showF
, showB
-
+-}
) where
import Data.ByteString.Builder.Internal
@@ -764,7 +765,7 @@ encodeCharUtf8 f1 f2 f3 f4 c = case ord c of
------------------------------------------------------------------------------
-- Testing encodings
------------------------------------------------------------------------------
-
+{-
-- | /For testing use only./ Evaluate a 'FixedPrim' on a given value.
evalF :: FixedPrim a -> a -> [Word8]
evalF fe = S.unpack . S.unsafeCreate (I.size fe) . runF fe
@@ -787,5 +788,5 @@ showF fe = map (chr . fromIntegral) . evalF fe
-- codepoints.
showB :: BoundedPrim a -> a -> String
showB be = map (chr . fromIntegral) . evalB be
-
+-}
More information about the Cvs-libraries
mailing list