text 1.2.0.5 → 1.2.0.6

raw patch · 2 files changed

+2/−2 lines, 2 files

Files

Data/Text/Encoding.hs +1/−1
text.cabal +1/−1

Data/Text/Encoding.hs view

@@ -286,7 +286,7 @@                       return $! text arr 0 (fromIntegral n)                   lastPtr <- peek curPtrPtr                   let left = lastPtr `minusPtr` curPtr-                      undecoded = case state of+                      !undecoded = case state of                         UTF8_ACCEPT -> B.empty                         _           -> B.append undecoded0 (B.drop left bs)                   return $ Some chunkText undecoded

text.cabal view

@@ -1,5 +1,5 @@ name:           text-version:        1.2.0.5+version:        1.2.0.6 homepage:       https://github.com/bos/text bug-reports:    https://github.com/bos/text/issues synopsis:       An efficient packed Unicode text type.