From 528ba6e047ca3f02a729ae046702594b6c33e7f0 Mon Sep 17 00:00:00 2001
From: Ranjeet Kumar Ranjan <ranjeetr@composewell.com>
Date: Wed, 12 Jul 2023 10:04:32 +0530
Subject: [PATCH] Fix up

---
 core/src/Streamly/Internal/Unicode/Stream.hs | 5 ++---
 core/src/Streamly/Unicode/Stream.hs          | 1 -
 2 files changed, 2 insertions(+), 4 deletions(-)

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)