on master help sign in
Fix enumerateFrom benchmark in bench:Prelude.Serial
commit3a64e637232789874723adb7c7d810d6e5fed809 authoradithyaov <adithya@composewell.com> dateFri 30 Oct 2020, 12:00 (6 years ago) parentea40591
1 file changed+1−1
benchmark/Streamly/Benchmark/Prelude/Serial.hs+1−1
benchmark/Streamly/Benchmark/Prelude/Serial.hs+1−1
@@ -138,7 +138,7 @@ enumerate count n = S.take (count + n) $ S.enumerate
138138-- n ~ 1
139139{-# INLINE enumerateTo #-}
140140enumerateTo :: (Monad m, S.IsStream t) => Int -> Int -> t m Int
141−enumerateTo count n = S.enumerateFrom (minBound + count + n)
141+enumerateTo count n = S.enumerateTo (minBound + count + n)
142142
143143{-# INLINE iterate #-}
144144iterate :: (Monad m, S.IsStream t) => Int -> Int -> t m Int