on efecb26 help sign in
25 lines 729 B history raw
1{-# LANGUAGE FlexibleContexts #-}
2-- |
3-- Module : Main
4-- Copyright : (c) 2018 Composewell Technologies
5--
6-- License : BSD3
7-- Maintainer : streamly@composewell.com
9import Stream.ConcurrentCommon (allBenchmarks)
10import Streamly.Benchmark.Common (runWithCLIOpts, defaultStreamSize)
12import qualified Streamly.Internal.Data.Stream.Concurrent as Async
14moduleName :: String
15moduleName = "Data.Stream.ConcurrentOrdered"
17-------------------------------------------------------------------------------
18-- Main
19-------------------------------------------------------------------------------
21main :: IO ()
22main =
23 runWithCLIOpts
24 defaultStreamSize
25 (allBenchmarks moduleName False (Async.ordered True))