graphql-engine/server/src-lib/Hasura/RQL/IR/Delete.hs
Gil Mizrahi 0e65932355 server/mssql support delete mutations (close hasura/graphql-engine#7626)
PR-URL: https://github.com/hasura/graphql-engine-mono/pull/2691
Co-authored-by: Abby Sassel <3883855+sassela@users.noreply.github.com>
Co-authored-by: Rakesh Emmadi <12475069+rakeshkky@users.noreply.github.com>
GitOrigin-RevId: 8b66cc30e8e036ee56a5267c1d2f308155951ae9
2021-11-19 17:06:01 +00:00

28 lines
766 B
Haskell

{-# LANGUAGE UndecidableInstances #-}
module Hasura.RQL.IR.Delete
( AnnDel,
AnnDelG (..),
)
where
import Data.Kind (Type)
import Hasura.Prelude
import Hasura.RQL.IR.BoolExp
import Hasura.RQL.IR.Returning
import Hasura.RQL.Types.Backend
import Hasura.RQL.Types.Column
import Hasura.SQL.Backend
data AnnDelG (b :: BackendType) (r :: BackendType -> Type) v = AnnDel
{ dqp1Table :: !(TableName b),
dqp1Where :: !(AnnBoolExp b v, AnnBoolExp b v),
dqp1Output :: !(MutationOutputG b r v),
dqp1AllCols :: ![ColumnInfo b]
}
deriving (Functor, Foldable, Traversable)
type AnnDel b = AnnDelG b (Const Void) (SQLExpression b)
deriving instance (Show (MutationOutputG b r a), Backend b, Show (BooleanOperators b a), Show a) => Show (AnnDelG b r a)