Fix hlint error on ParserD/Type
commitdde88b8b0033a40ba0c2885329cecab6ba34aa3e
authorHarendra Kumar <harendra@composewell.com>
dateTue 9 Aug 2022, 03:46 (4 years ago)
parentff1dd54
.hlint.ignore−1
@@ -1,5 +1,4 @@
11core/src/Streamly/Internal/Data/Fold.hs
2−core/src/Streamly/Internal/Data/Parser/ParserD/Type.hs
32core/src/Streamly/Internal/Data/Unboxed.hs
43core/src/Streamly/Internal/Data/Array/Unboxed.hs
54core/src/Streamly/Internal/Data/Array/Unboxed/Type.hs
core/src/Streamly/Internal/Data/Parser/ParserD/Type.hs+1−1
@@ -381,7 +381,7 @@ extractStep f res =
381381 Error err -> return $ Error err
382382
383383{-# INLINE mapStateStep #-}
384−mapStateStep :: (s -> s1) -> Step s b -> (Step s1 b)
384+mapStateStep :: (s -> s1) -> Step s b -> Step s1 b
385385mapStateStep f res =
386386 case res of
387387 Partial n s1 -> Partial n $ f s1