on master help sign in
Fix hlint error on ParserD/Type
dde88b8Harendra Kumar
.hlint.ignore−1
@@ -1,5 +1,4 @@
1core/src/Streamly/Internal/Data/Fold.hs
1core/src/Streamly/Internal/Data/Fold.hs
2−core/src/Streamly/Internal/Data/Parser/ParserD/Type.hs
3core/src/Streamly/Internal/Data/Unboxed.hs
2core/src/Streamly/Internal/Data/Unboxed.hs
4core/src/Streamly/Internal/Data/Array/Unboxed.hs
3core/src/Streamly/Internal/Data/Array/Unboxed.hs
5core/src/Streamly/Internal/Data/Array/Unboxed/Type.hs
4core/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 =
381 Error err -> return $ Error err
381 Error err -> return $ Error err
382
382
383{-# INLINE mapStateStep #-}
383{-# INLINE mapStateStep #-}
384−mapStateStep :: (s -> s1) -> Step s b -> (Step s1 b)
384+mapStateStep :: (s -> s1) -> Step s b -> Step s1 b
385mapStateStep f res =
385mapStateStep f res =
386 case res of
386 case res of
387 Partial n s1 -> Partial n $ f s1
387 Partial n s1 -> Partial n $ f s1