{-# LANGUAGE OverloadedStrings #-}
{-# LANGUAGE NoImplicitPrelude #-}

module Data.Morpheus.Error.Operation
  ( mutationIsNotDefined,
    subscriptionIsNotDefined,
  )
where

import Data.Morpheus.Types.Internal.AST.Base
  ( Position,
  )
import Data.Morpheus.Types.Internal.AST.Error
  ( GQLError,
    at,
  )

mutationIsNotDefined :: Position -> GQLError
mutationIsNotDefined :: Position -> GQLError
mutationIsNotDefined Position
position =
  GQLError
"Schema is not configured for mutations." GQLError -> Position -> GQLError
`at` Position
position

subscriptionIsNotDefined :: Position -> GQLError
subscriptionIsNotDefined :: Position -> GQLError
subscriptionIsNotDefined Position
position =
  GQLError
"Schema is not configured for subscriptions." GQLError -> Position -> GQLError
`at` Position
position