diff options
| author | Eugen Wissner <belka@caraus.de> | 2020-05-27 23:18:35 +0200 |
|---|---|---|
| committer | Eugen Wissner <belka@caraus.de> | 2020-05-29 13:53:51 +0200 |
| commit | d12577ae717512979c7654191ca65f25fc877907 (patch) | |
| tree | 17eda8d92d92ef2773c439d614f00ea0e74ea969 /tests/Language/GraphQL/SchemaSpec.hs | |
| parent | c06d0b8e95ea4b87eab69da085cb32dbd052c1f0 (diff) | |
| download | graphql-d12577ae717512979c7654191ca65f25fc877907.tar.gz | |
Define resolvers on type fields
Returning resolvers from other resolvers isn't supported anymore. Since
we have a type system now, we define the resolvers in the object type
fields and pass an object with the previous result to them.
Diffstat (limited to 'tests/Language/GraphQL/SchemaSpec.hs')
| -rw-r--r-- | tests/Language/GraphQL/SchemaSpec.hs | 32 |
1 files changed, 0 insertions, 32 deletions
diff --git a/tests/Language/GraphQL/SchemaSpec.hs b/tests/Language/GraphQL/SchemaSpec.hs deleted file mode 100644 index 9bc5530..0000000 --- a/tests/Language/GraphQL/SchemaSpec.hs +++ /dev/null @@ -1,32 +0,0 @@ -{-# LANGUAGE OverloadedStrings #-} -module Language.GraphQL.SchemaSpec - ( spec - ) where - -import qualified Data.Aeson as Aeson -import qualified Data.Aeson.Types as Aeson -import qualified Data.HashMap.Strict as HashMap -import qualified Data.Sequence as Sequence -import Language.GraphQL.AST.Core -import Language.GraphQL.Error -import Language.GraphQL.Schema -import qualified Language.GraphQL.Type.Out as Out -import Test.Hspec (Spec, describe, it, shouldBe) - -spec :: Spec -spec = - describe "resolve" $ - it "ignores invalid __typename" $ do - let resolver = pure $ object - [ Resolver "field" $ pure $ Out.String "T" - ] - schema = HashMap.singleton "__typename" resolver - fields = Sequence.singleton - $ SelectionFragment - $ Fragment "T" Sequence.empty - expected = Aeson.object - [ ("data" , Aeson.emptyObject) - ] - - actual <- runCollectErrs (resolve schema fields) - actual `shouldBe` expected |