on master help sign in
Add `@since 1.2.1.*` annotations
596f523Herbert Valerio Riedel
Data/Text.hs+1
@@ -381,6 +381,7 @@ instance Exts.IsList Text where
381instance NFData Text where rnf !_ = ()
381instance NFData Text where rnf !_ = ()
382#endif
382#endif
383
383
384+-- | @since 1.2.1.0
384instance Binary Text where
385instance Binary Text where
385 put t = put (encodeUtf8 t)
386 put t = put (encodeUtf8 t)
386 get = do
387 get = do
Data/Text/Lazy.hs+1
@@ -376,6 +376,7 @@ instance NFData Text where
376 rnf (Chunk _ ts) = rnf ts
376 rnf (Chunk _ ts) = rnf ts
377#endif
377#endif
378
378
379+-- | @since 1.2.1.0
379instance Binary Text where
380instance Binary Text where
380 put t = put (encodeUtf8 t)
381 put t = put (encodeUtf8 t)
381 get = do
382 get = do
Data/Text/Show.hs+2
@@ -46,6 +46,8 @@ unpack = S.unstreamList . stream
46-- fusion.
46-- fusion.
47--
47--
48-- This is exposed solely for people writing GHC rewrite rules.
48-- This is exposed solely for people writing GHC rewrite rules.
49+--
50+-- @since 1.2.1.1
49unpackCString# :: Addr# -> Text
51unpackCString# :: Addr# -> Text
50unpackCString# addr# = unstream (S.streamCString# addr#)
52unpackCString# addr# = unstream (S.streamCString# addr#)
51{-# NOINLINE unpackCString# #-}
53{-# NOINLINE unpackCString# #-}