rhi/bytebuild
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

fix haddock formatting in the json escape sequence example

Browse source
This commit is contained in:
Andrew Martin 2019-10-18 13:56:02 -04:00
parent 6359787a02
commit f40f0c5623
1 changed files with 3 additions and 3 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

6
src/Data/ByteArray/Builder.hs
View file

@ -460,9 +460,9 @@ shortTextUtf8 a =
-- and JSON special characters will be escaped. Additionally, the -- and JSON special characters will be escaped. Additionally, the
-- result is surrounded by double quotes. For example: -- result is surrounded by double quotes. For example:
-- --
-- * @foo ==> "foo"@ -- * @foo ==\> "foo"@ (no escape sequences)
-- * @\_"_/ ==> "\\_\"_/"@ -- * @\\_"_\/ ==\> "\\\\_\\"_\/"@ (escapes backslashes and quotes)
-- * @hello<ESC>world ==> "hello\u001Bworld"@ (where <LF> is code point 0x1B) -- * @hello\<ESC\>world ==> "hello\\u001Bworld"@ (where @\<ESC\>@ is code point 0x1B)
shortTextJsonString :: ShortText -> Builder shortTextJsonString :: ShortText -> Builder
shortTextJsonString a = shortTextJsonString a =
let !(ByteArray ba) = shortTextToByteArray a let !(ByteArray ba) = shortTextToByteArray a