Export the Data.Time.Clock.Type module from Clock

This commit is contained in:
Ranjeet Kumar Ranjan 2023-08-21 21:17:13 +05:30
parent b6a2d3e836
commit 2370d23e38
2 changed files with 5 additions and 4 deletions

View File

@ -9,8 +9,7 @@
module Streamly.Internal.Data.Time.Clock module Streamly.Internal.Data.Time.Clock
( (
-- * System clock -- * System clock
Clock(..) module Streamly.Internal.Data.Time.Clock.Type
, getTime
-- * Async clock -- * Async clock
, asyncClock , asyncClock
@ -30,13 +29,14 @@ where
import Control.Concurrent (threadDelay, ThreadId) import Control.Concurrent (threadDelay, ThreadId)
import Control.Concurrent.MVar (MVar, newEmptyMVar, takeMVar, tryPutMVar) import Control.Concurrent.MVar (MVar, newEmptyMVar, takeMVar, tryPutMVar)
import Control.Monad (forever, when, void) import Control.Monad (forever, when, void)
import Streamly.Internal.Data.Time.Clock.Type (Clock(..), getTime)
import Streamly.Internal.Data.Time.Units import Streamly.Internal.Data.Time.Units
(MicroSecond64(..), fromAbsTime, addToAbsTime, toRelTime) (MicroSecond64(..), fromAbsTime, addToAbsTime, toRelTime)
import Streamly.Internal.Control.ForkIO (forkIOManaged) import Streamly.Internal.Control.ForkIO (forkIOManaged)
import qualified Streamly.Internal.Data.IORef.Unboxed as Unboxed import qualified Streamly.Internal.Data.IORef.Unboxed as Unboxed
import Streamly.Internal.Data.Time.Clock.Type
------------------------------------------------------------------------------ ------------------------------------------------------------------------------
-- Async clock -- Async clock
------------------------------------------------------------------------------ ------------------------------------------------------------------------------

View File

@ -285,7 +285,6 @@ library
-- streamly-time -- streamly-time
, Streamly.Internal.Data.Time.TimeSpec , Streamly.Internal.Data.Time.TimeSpec
, Streamly.Internal.Data.Time.Units , Streamly.Internal.Data.Time.Units
, Streamly.Internal.Data.Time.Clock.Type
, Streamly.Internal.Data.Time.Clock , Streamly.Internal.Data.Time.Clock
-- streamly-core-stream-types -- streamly-core-stream-types
@ -433,6 +432,8 @@ library
, Streamly.Internal.Data.Producer.Type , Streamly.Internal.Data.Producer.Type
, Streamly.Internal.Data.Producer.Source , Streamly.Internal.Data.Producer.Source
, Streamly.Internal.Data.Time.Clock.Type
if flag(dev) if flag(dev)
other-modules: other-modules:
Streamly.Internal.Data.StreamK.Alt Streamly.Internal.Data.StreamK.Alt