Webb.Thread.Internal.Thread

type Thread = { mutex :: Mutex, program :: ShowRef (Aff Unit), state :: ShowRef Thread }

newThread :: forall m. MonadEffect m => m Thread

setProgram :: forall m. MonadEffect m => Thread -> Aff Unit -> m Unit

start :: Thread -> Aff Unit

stop :: Thread -> Aff Unit

isStarted :: forall m. MonadEffect m => Thread -> m Boolean

isStopped :: forall m. MonadEffect m => Thread -> m Boolean