AA
Size: a a a
AA
к
runApp :: AppConfig -> AppState -> Conn -> LogFunctionT IO () -> Application a -> IO (Either AppException a)
runApp config state connection logFunction app = flip evalLoggerT logFunction . flip evalPQ connection . runExceptT . flip evalStateT state . flip runReaderT config $ app
runApp config state connection logFunction
= flip evalLoggerT logFunction
. flip evalPQ connection
. runExceptT
. flip evalStateT state
. flip runReaderT configA
TZ
A
TZ
TZ
DB
runApp config state connection logFunction
= flip evalLoggerT logFunction
. flip evalPQ connection
. runExceptT
. flip evalStateT state
. flip runReaderT configY
R
AA
KV
AA
AA
AA
MP
AA
R
AA