time-io-access-0.1.0.0: Access/Data/Time/Clock.hs

module Access.Data.Time.Clock
    ( module Data.Time.Clock

    , ClockAccess(..)
    ) where

import Data.Time.Clock

import Access.Core


class Access io => ClockAccess io where
    getCurrentTime' :: io UTCTime


instance ClockAccess IO where
    getCurrentTime' = getCurrentTime