[commit: packages/bytestring] ghc-head: conditionally export D.B.Internal.unsafePackAddress (efe48cd)

git at git.haskell.org git at git.haskell.org
Thu Aug 29 10:19:04 CEST 2013


Repository : ssh://git@git.haskell.org/bytestring

On branch  : ghc-head
Link       : http://git.haskell.org/?p=packages/bytestring.git;a=commit;h=efe48cd8972361b3794b974a78b985235553073d

>---------------------------------------------------------------

commit efe48cd8972361b3794b974a78b985235553073d
Author: Patrick Palka <patrick at parcs.ath.cx>
Date:   Sat Mar 2 09:07:06 2013 -0500

    conditionally export D.B.Internal.unsafePackAddress


>---------------------------------------------------------------

efe48cd8972361b3794b974a78b985235553073d
 Data/ByteString/Internal.hs |    2 ++
 1 file changed, 2 insertions(+)

diff --git a/Data/ByteString/Internal.hs b/Data/ByteString/Internal.hs
index 2df1e1f..82b6108 100644
--- a/Data/ByteString/Internal.hs
+++ b/Data/ByteString/Internal.hs
@@ -32,7 +32,9 @@ module Data.ByteString.Internal (
         packChars, packUptoLenChars, unsafePackLenChars,
         unpackBytes, unpackAppendBytesLazy, unpackAppendBytesStrict,
         unpackChars, unpackAppendCharsLazy, unpackAppendCharsStrict,
+#if defined(__GLASGOW_HASKELL__)
         unsafePackAddress,
+#endif
 
         -- * Low level imperative construction
         create,                 -- :: Int -> (Ptr Word8 -> IO ()) -> IO ByteString





More information about the ghc-commits mailing list