Documentation

type IDGenerator = TVar Int #

data JobsState t w a #

nextID :: UTCTime -> JobSettings -> JobsState t w a -> STM (JobID 'Safe) #

newJobsState :: forall t w a. (EnumBounded t, Monoid w) => JobSettings -> Map t Prio -> IO (JobsState t w a) #

pushJob :: Ord t => t -> a -> (JobID 'Safe -> a -> Logger w -> IO r) -> JobSettings -> JobsState t w r -> IO (JobID 'Safe) #

pushJobWithTime :: Ord t => UTCTime -> t -> a -> (JobID 'Safe -> a -> Logger w -> IO r) -> JobSettings -> JobsState t w r -> STM (JobID 'Safe) #