mirror of
https://github.com/hasura/graphql-engine.git
synced 2024-12-17 20:41:49 +03:00
25 lines
687 B
Haskell
25 lines
687 B
Haskell
module Hasura.GraphQL.Execute.Action where
|
|
|
|
import Hasura.Prelude
|
|
|
|
import Control.Monad.Trans.Control (MonadBaseControl)
|
|
|
|
import qualified Hasura.Tracing as Tracing
|
|
|
|
import Hasura.EncJSON
|
|
import Hasura.RQL.Types.Error
|
|
import Hasura.RQL.Types.Action
|
|
|
|
|
|
newtype ActionExecution =
|
|
ActionExecution {
|
|
unActionExecution
|
|
:: forall m
|
|
. (MonadIO m, MonadBaseControl IO m, MonadError QErr m, Tracing.MonadTrace m) => m EncJSON
|
|
}
|
|
|
|
data ActionExecutionPlan
|
|
= AEPSync !ActionExecution
|
|
| AEPAsyncQuery !ActionId !(ActionLogResponse -> ActionExecution)
|
|
| AEPAsyncMutation !EncJSON
|