diff --git a/benchmark/Streamly/Benchmark/Data/ParserK.hs b/benchmark/Streamly/Benchmark/Data/ParserK.hs index 9db700253..5d49c753c 100644 --- a/benchmark/Streamly/Benchmark/Data/ParserK.hs +++ b/benchmark/Streamly/Benchmark/Data/ParserK.hs @@ -23,7 +23,7 @@ import Control.DeepSeq (NFData(..)) import Control.Monad.IO.Class (MonadIO) import Data.Foldable (asum) #ifdef BENCH_CHUNKED -import Streamly.Data.Array (Array, Unbox) +import Streamly.Data.Array (Array, Unbox, streamChunksOf) #endif #ifdef BENCH_CHUNKED_GENERIC import Streamly.Data.Array.Generic (Array) @@ -41,7 +41,6 @@ import Prelude hiding import qualified Control.Applicative as AP import qualified Data.Foldable as F import qualified Data.Traversable as TR -import qualified Streamly.Data.Array as Array import qualified Streamly.Data.Stream as Stream import qualified Streamly.Data.Fold as FL import qualified Streamly.Internal.Data.Fold as Fold @@ -117,7 +116,7 @@ benchIOSink value name f = >>= f . StreamK.fromStream #ifdef BENCH_CHUNKED - . Array.streamChunksOf 4000 + . streamChunksOf 4000 #endif #ifdef BENCH_CHUNKED_GENERIC . GenArr.chunksOf 4000