HsDev.Database.Update.Types

Documentation

data Status

Constructors

StatusWorking

StatusOk

StatusError HsDevError

Instances

ToJSON Status

Methods

toJSON :: Status -> Value

toEncoding :: Status -> Encoding

toJSONList :: [Status] -> Value

toEncodingList :: [Status] -> Encoding

FromJSON Status

Methods

parseJSON :: Value -> Parser Status

parseJSONList :: Value -> Parser [Status]

data Progress

Constructors

Progress

Fields

• progressCurrent :: Int
• progressTotal :: Int

Instances

ToJSON Progress

Methods

toJSON :: Progress -> Value

toEncoding :: Progress -> Encoding

toJSONList :: [Progress] -> Value

toEncodingList :: [Progress] -> Encoding

FromJSON Progress

Methods

parseJSON :: Value -> Parser Progress

parseJSONList :: Value -> Parser [Progress]

data Task

Constructors

Task

Fields

• _taskName :: String
• _taskStatus :: Status
• _taskSubjectType :: String
• _taskSubjectName :: String
• _taskProgress :: Maybe Progress

Instances

ToJSON Task

Methods

toJSON :: Task -> Value

toEncoding :: Task -> Encoding

toJSONList :: [Task] -> Value

toEncodingList :: [Task] -> Encoding

FromJSON Task

Methods

parseJSON :: Value -> Parser Task

parseJSONList :: Value -> Parser [Task]

data UpdateOptions

Constructors

UpdateOptions

Fields

• _updateTasks :: [Task]
• _updateGhcOpts :: [String]
• _updateDocs :: Bool
• _updateInfer :: Bool

Instances

Default UpdateOptions

Methods

def :: UpdateOptions

updateTasks :: Lens' UpdateOptions [Task]

updateGhcOpts :: Lens' UpdateOptions [String]

updateDocs :: Lens' UpdateOptions Bool

updateInfer :: Lens' UpdateOptions Bool

data UpdateState

Constructors

UpdateState

Fields

• _updateOptions :: UpdateOptions
• _updateWorker :: Worker (ServerM IO)

Instances

Monad m => MonadReader UpdateState (UpdateM m)

Methods

ask :: UpdateM m UpdateState

local :: (UpdateState -> UpdateState) -> UpdateM m a -> UpdateM m a

reader :: (UpdateState -> a) -> UpdateM m a

updateOptions :: Lens' UpdateState UpdateOptions

updateWorker :: Lens' UpdateState (Worker (ServerM IO))

withUpdateState :: SessionMonad m => UpdateOptions -> (UpdateState -> m a) -> m a

sendUpdateAction :: UpdateMonad m => ServerM IO () -> m ()

newtype UpdateM m a

Constructors

UpdateM

Fields

• runUpdateM :: ReaderT UpdateState (WriterT [ModuleLocation] (ClientM m)) a

Instances

MonadTrans UpdateM

Methods

lift :: Monad m => m a -> UpdateM m a

Monad m => MonadReader UpdateState (UpdateM m)

Methods

ask :: UpdateM m UpdateState

local :: (UpdateState -> UpdateState) -> UpdateM m a -> UpdateM m a

reader :: (UpdateState -> a) -> UpdateM m a

MonadBase b m => MonadBase b (UpdateM m)

Methods

liftBase :: b α -> UpdateM m α

MonadBaseControl b m => MonadBaseControl b (UpdateM m)

Associated Types

type StM (UpdateM m :: * -> *) a :: *

Methods

liftBaseWith :: (RunInBase (UpdateM m) b -> b a) -> UpdateM m a

restoreM :: StM (UpdateM m) a -> UpdateM m a

Monad m => Monad (UpdateM m)

Methods

(>>=) :: UpdateM m a -> (a -> UpdateM m b) -> UpdateM m b

(>>) :: UpdateM m a -> UpdateM m b -> UpdateM m b

return :: a -> UpdateM m a

fail :: String -> UpdateM m a

Functor m => Functor (UpdateM m)

Methods

fmap :: (a -> b) -> UpdateM m a -> UpdateM m b

(<$) :: a -> UpdateM m b -> UpdateM m a

Applicative m => Applicative (UpdateM m)

Methods

pure :: a -> UpdateM m a

(<*>) :: UpdateM m (a -> b) -> UpdateM m a -> UpdateM m b

liftA2 :: (a -> b -> c) -> UpdateM m a -> UpdateM m b -> UpdateM m c

(*>) :: UpdateM m a -> UpdateM m b -> UpdateM m b

(<*) :: UpdateM m a -> UpdateM m b -> UpdateM m a

MonadPlus m => MonadPlus (UpdateM m)

Methods

mzero :: UpdateM m a

mplus :: UpdateM m a -> UpdateM m a -> UpdateM m a

Alternative m => Alternative (UpdateM m)

Methods

empty :: UpdateM m a

(<|>) :: UpdateM m a -> UpdateM m a -> UpdateM m a

some :: UpdateM m a -> UpdateM m [a]

many :: UpdateM m a -> UpdateM m [a]

MonadIO m => MonadIO (UpdateM m)

Methods

liftIO :: IO a -> UpdateM m a

MonadThrow m => MonadThrow (UpdateM m)

Methods

throwM :: Exception e => e -> UpdateM m a

MonadCatch m => MonadCatch (UpdateM m)

Methods

catch :: Exception e => UpdateM m a -> (e -> UpdateM m a) -> UpdateM m a

MonadMask m => MonadMask (UpdateM m)

Methods

mask :: ((forall a. UpdateM m a -> UpdateM m a) -> UpdateM m b) -> UpdateM m b

uninterruptibleMask :: ((forall a. UpdateM m a -> UpdateM m a) -> UpdateM m b) -> UpdateM m b

(MonadIO m, MonadMask m) => MonadLog (UpdateM m)

Methods

askLog :: UpdateM m Log

localLog :: (Log -> Log) -> UpdateM m a -> UpdateM m a

ServerMonadBase m => CommandMonad (UpdateM m)

Methods

getOptions :: UpdateM m CommandOptions

ServerMonadBase m => SessionMonad (UpdateM m)

Methods

getSession :: UpdateM m Session

localSession :: (Session -> Session) -> UpdateM m a -> UpdateM m a

Monad m => MonadWriter [ModuleLocation] (UpdateM m)

Methods

writer :: (a, [ModuleLocation]) -> UpdateM m a

tell :: [ModuleLocation] -> UpdateM m ()

listen :: UpdateM m a -> UpdateM m (a, [ModuleLocation])

pass :: UpdateM m (a, [ModuleLocation] -> [ModuleLocation]) -> UpdateM m a

type StM (UpdateM m) a

type StM (UpdateM m) a = StM (ReaderT * UpdateState (WriterT [ModuleLocation] (ClientM m))) a

type UpdateMonad m = (CommandMonad m, MonadReader UpdateState m, MonadWriter [ModuleLocation] m)

taskName :: Lens' Task String

taskStatus :: Lens' Task Status

taskSubjectType :: Lens' Task String

taskSubjectName :: Lens' Task String

taskProgress :: Lens' Task (Maybe Progress)

module HsDev.Server.Types