Fix hlint errors.
commit74c5351639129dedab5bbdb1b11960d032f19fd0
authorpranaysashank <pranaysashank@composewell.com>
dateTue 17 Nov 2020, 15:40 (6 years ago)
parent8016730
src/Streamly/Internal/Data/Fold.hs+1−1
@@ -416,7 +416,7 @@ drainBy2 f = Fold2 (const (void . f)) (\_ -> return ()) return
416416-- @since 0.7.0
417417{-# INLINABLE last #-}
418418last :: Monad m => Fold m a (Maybe a)
419−last = _Fold1 (flip const)
419+last = _Fold1 (\_ x -> x)
420420
421421------------------------------------------------------------------------------
422422-- To Summary