From 698bdb3146f539fcf3c1961168d115c9526e0f4a Mon Sep 17 00:00:00 2001 From: Fumiaki Kinoshita Date: Sat, 4 Jul 2020 16:47:39 +0900 Subject: [PATCH] s/encodeListWithB/primMapListBounded/ (fixes #50) --- Data/ByteString/Builder/Prim.hs | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) diff --git a/Data/ByteString/Builder/Prim.hs b/Data/ByteString/Builder/Prim.hs index 464f8aa2b..ee5f64ef8 100644 --- a/Data/ByteString/Builder/Prim.hs +++ b/Data/ByteString/Builder/Prim.hs @@ -100,7 +100,7 @@ import Data.ByteString.Builder.Prim renderString :: String -\> Builder renderString cs = - B.charUtf8 \'\"\' \<\> E.'encodeListWithB' escape cs \<\> B.charUtf8 \'\"\' + B.charUtf8 \'\"\' \<\> E.'primMapListBounded' escape cs \<\> B.charUtf8 \'\"\' where escape :: E.'BoundedPrim' Char escape = @@ -301,7 +301,7 @@ corresponding functions in future releases of this library. -- > -- > renderString :: String -> Builder -- > renderString cs = --- > charUtf8 '"' <> encodeListWithB escapedUtf8 cs <> charUtf8 '"' +-- > charUtf8 '"' <> primMapListBounded escapedUtf8 cs <> charUtf8 '"' -- > where -- > escapedUtf8 :: BoundedPrim Char -- > escapedUtf8 =