这是indexloc提供的服务,不要输入任何密码
Skip to content
Merged
14 changes: 1 addition & 13 deletions server/src-lib/Hasura/GraphQL/Resolve/Context.hs
Original file line number Diff line number Diff line change
Expand Up @@ -3,11 +3,9 @@
{-# LANGUAGE MultiWayIf #-}
{-# LANGUAGE NoImplicitPrelude #-}
{-# LANGUAGE OverloadedStrings #-}
{-# LANGUAGE TemplateHaskell #-}

module Hasura.GraphQL.Resolve.Context
( InsResp(..)
, FieldMap
( FieldMap
, RelationInfoMap
, OrdByCtx
, OrdByItemMap
Expand All @@ -32,9 +30,6 @@ module Hasura.GraphQL.Resolve.Context
import Data.Has
import Hasura.Prelude

import qualified Data.Aeson as J
import qualified Data.Aeson.Casing as J
import qualified Data.Aeson.TH as J
import qualified Data.ByteString.Lazy as BL
import qualified Data.HashMap.Strict as Map
import qualified Data.Sequence as Seq
Expand All @@ -50,13 +45,6 @@ import Hasura.SQL.Value

import qualified Hasura.SQL.DML as S

data InsResp
= InsResp
{ _irAffectedRows :: !Int
, _irResponse :: !(Maybe J.Object)
} deriving (Show, Eq)
$(J.deriveJSON (J.aesonDrop 3 J.snakeCase) ''InsResp)

type FieldMap
= Map.HashMap (G.NamedType, G.Name)
(Either PGColInfo (RelInfo, Bool, S.BoolExp, Maybe Int))
Expand Down
Loading