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

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

import Data.Morpheus.Types.Internal.AST.Base
  ( Position,
    ValidationError (..),
  )

mutationIsNotDefined :: Position -> ValidationError
mutationIsNotDefined :: Position -> ValidationError
mutationIsNotDefined Position
position =
  Message -> [Position] -> ValidationError
ValidationError
    Message
"Schema is not configured for mutations."
    [Position
position]

subscriptionIsNotDefined :: Position -> ValidationError
subscriptionIsNotDefined :: Position -> ValidationError
subscriptionIsNotDefined Position
position =
  Message -> [Position] -> ValidationError
ValidationError
    Message
"Schema is not configured for subscriptions."
    [Position
position]