mirror of
https://github.com/hasura/graphql-engine.git
synced 2024-12-17 20:41:49 +03:00
b167120f96
We'll see if this improves compile times at all, but I think it's worth doing as at least the most minimal form of module documentation. This was accomplished by first compiling everything with -ddump-minimal-imports, and then a bunch of scripting (with help from ormolu) **EDIT** it doesn't seem to improve CI compile times but the noise floor is high as it looks like we're not caching library dependencies anymore PR-URL: https://github.com/hasura/graphql-engine-mono/pull/2730 GitOrigin-RevId: 667eb8de1e0f1af70420cbec90402922b8b84cb4
23 lines
658 B
Haskell
23 lines
658 B
Haskell
-- | Classes for monads used during schema construction and query parsing.
|
|
module Hasura.GraphQL.Parser.Class.Parse
|
|
( MonadParse (..),
|
|
parseError,
|
|
)
|
|
where
|
|
|
|
import Data.Parser.JSONPath
|
|
import Hasura.Base.Error
|
|
import Hasura.Prelude
|
|
|
|
-- | A class that provides functionality for parsing GraphQL queries, i.e.
|
|
-- running a fully-constructed 'Parser'.
|
|
class Monad m => MonadParse m where
|
|
withPath :: (JSONPath -> JSONPath) -> m a -> m a
|
|
|
|
-- | Not the full power of 'MonadError' because parse errors cannot be
|
|
-- caught.
|
|
parseErrorWith :: Code -> Text -> m a
|
|
|
|
parseError :: MonadParse m => Text -> m a
|
|
parseError = parseErrorWith ValidationFailed
|