Copyright | (c) Soostone Inc 2020 |
---|---|
License | AllRightsReserved |
Stability | experimental |
Portability | POSIX |
Safe Haskell | None |
Language | GHC2024 |
Synopsis
- type SpecBackend bk = (HasBackendSchemaField bk, RenderSql Query bk, RenderSql SExp bk, RenderSql (CreateRelation bk) bk, Backend bk, MustacheBackend bk, Typeable bk, RunBackendEffect bk, DumpBackendRequirements bk, HasBackendQueryStats bk, CSVImport bk, InterpreterBackendSupport bk, NapkinParserDialect bk)
- executeDAGSpec :: forall bk m. (MonadFix m, Katip m, SpecBackend bk, HasBackendQueryStats bk, MonadReader (ComboEnv bk) m) => KVS -> Maybe ConcurrentSlots -> DevSlow -> RuntimeEnv -> SpecRuntime bk -> RawInterpretedSpec bk -> Map TaskId NominalDiffTime -> Map (Ref Table) NormalizedTable -> TMVar UIExecutionControl -> TMVar () -> RuntimeEventQueueDAG bk -> TasksDAG Full bk -> m (Success, DAGRunState bk)
- estimateExecutionTime :: TasksDAG Exec b -> Map TaskId NominalDiffTime -> Maybe (UTCTime, Map TaskId (TaskStateInfo b)) -> Estimate
- data UIExecutionControl
- newtype HookAssertionError = HookAssertionError (NonEmpty AssertionEntry)
Documentation
type SpecBackend bk = (HasBackendSchemaField bk, RenderSql Query bk, RenderSql SExp bk, RenderSql (CreateRelation bk) bk, Backend bk, MustacheBackend bk, Typeable bk, RunBackendEffect bk, DumpBackendRequirements bk, HasBackendQueryStats bk, CSVImport bk, InterpreterBackendSupport bk, NapkinParserDialect bk) #
What we seem to need to be able to call executeSpec
; it's
basically all about choosing a backend that satisfies the
needed operations.
executeDAGSpec :: forall bk m. (MonadFix m, Katip m, SpecBackend bk, HasBackendQueryStats bk, MonadReader (ComboEnv bk) m) => KVS -> Maybe ConcurrentSlots -> DevSlow -> RuntimeEnv -> SpecRuntime bk -> RawInterpretedSpec bk -> Map TaskId NominalDiffTime -> Map (Ref Table) NormalizedTable -> TMVar UIExecutionControl -> TMVar () -> RuntimeEventQueueDAG bk -> TasksDAG Full bk -> m (Success, DAGRunState bk) #
estimateExecutionTime :: TasksDAG Exec b -> Map TaskId NominalDiffTime -> Maybe (UTCTime, Map TaskId (TaskStateInfo b)) -> Estimate #
data UIExecutionControl #
UI Soft Quit
Instances
Show UIExecutionControl # | |
Defined in Napkin.Run.Execute.DAG showsPrec :: Int -> UIExecutionControl -> ShowS # show :: UIExecutionControl -> String # showList :: [UIExecutionControl] -> ShowS # | |
Eq UIExecutionControl # | |
Defined in Napkin.Run.Execute.DAG (==) :: UIExecutionControl -> UIExecutionControl -> Bool # (/=) :: UIExecutionControl -> UIExecutionControl -> Bool # |
newtype HookAssertionError #
Instances
Exception HookAssertionError # | |
Defined in Napkin.Run.Execute.DAG | |
Show HookAssertionError # | |
Defined in Napkin.Run.Execute.DAG showsPrec :: Int -> HookAssertionError -> ShowS # show :: HookAssertionError -> String # showList :: [HookAssertionError] -> ShowS # |