@@ -164,6 +164,7 @@ import Data.Maybe (isJust, fromJust)
164164#if __GLASGOW_HASKELL__ < 808
165165import Data.Semigroup (Semigroup(..))
166166#endif
167+import Fusion.Plugin.Types (Fuse(..))
167168import Streamly.Internal.Data.Tuple.Strict (Tuple'(..), Tuple3'(..))
168169import Streamly.Internal.Data.SVar (MonadAsync)
169170
@@ -177,7 +178,7 @@ import Prelude hiding (concatMap)
177178-- represents a new intermediate value available to be extracted. @Done@
178179-- represents that the fold has been terminated and won't be processed
179180-- further.
180−-- {-# ANN type Step Fuse #-}
181+{-# ANN type Step Fuse #-}
181182data Step s b
182183 = Partial !s
183184 | Done !b