diff --git a/core/src/Streamly/Internal/Unicode/Stream.hs b/core/src/Streamly/Internal/Unicode/Stream.hs index 00309e4021..e237c0eea0 100644 --- a/core/src/Streamly/Internal/Unicode/Stream.hs +++ b/core/src/Streamly/Internal/Unicode/Stream.hs @@ -199,7 +199,6 @@ encodeLatin1Lax = encodeLatin1 -- extract the significant bits from each byte of the sequence and combine them -- to form the complete code point value. The specific bit manipulations will -- differ based on the number of bytes used. --- Int helps in cheaper conversion from Int to Char. type CodePoint = Int -- | DecodeState refers to the number of bytes remaining to complete the current @@ -429,7 +428,7 @@ decodeUtf8EitherD :: Monad m decodeUtf8EitherD = resumeDecodeUtf8EitherD 0 0 -- | --- +-- Initial DecodeState and CodePoint is 0. -- /Pre-release/ {-# INLINE decodeUtf8Either #-} decodeUtf8Either :: Monad m @@ -437,7 +436,7 @@ decodeUtf8Either :: Monad m decodeUtf8Either = decodeUtf8EitherD -- | --- +-- Initial DecodeState and CodePoint is 0. -- /Pre-release/ {-# INLINE resumeDecodeUtf8Either #-} resumeDecodeUtf8Either diff --git a/core/src/Streamly/Unicode/Stream.hs b/core/src/Streamly/Unicode/Stream.hs index 56af906993..2c2267cab3 100644 --- a/core/src/Streamly/Unicode/Stream.hs +++ b/core/src/Streamly/Unicode/Stream.hs @@ -84,7 +84,6 @@ module Streamly.Unicode.Stream , decodeUtf8 , decodeUtf8' , decodeUtf8Chunks - , decodeUtf8Either , resumeDecodeUtf8Either -- * Elimination (Encoding)