@@ -76,7 +76,7 @@ module Streamly.Internal.Data.Stream.Channel.Types
7676 , stopWhen
7777 , ordered
7878 , interleaved
79− , bound
79+ , boundThreads
8080
8181 , rate
8282 , avgRate
@@ -546,13 +546,14 @@ interleaved flag st = st { _interleaved = flag }
546546getInterleaved :: Config -> Bool
547547getInterleaved = _interleaved
548548
549+-- TODO: Make it consistently take effect everywhere.
550+
549551-- | Spawn bound threads (i.e., spawn threads using 'forkOS' instead of
550552-- 'forkIO'). The default value is 'False'.
551553--
552−-- Currently, this only takes effect for concurrent folds. TODO: Make it
553−-- consistently take effect everywhere.
554−bound :: Bool -> Config -> Config
555−bound flag st = st { _bound = flag }
554+-- Currently, this only takes effect only for concurrent folds.
555+boundThreads :: Bool -> Config -> Config
556+boundThreads flag st = st { _bound = flag }
556557
557558getBound :: Config -> Bool
558559getBound = _bound