From d12577ae717512979c7654191ca65f25fc877907 Mon Sep 17 00:00:00 2001
From: Eugen Wissner <belka@caraus.de>
Date: Wed, 27 May 2020 23:18:35 +0200
Subject: 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.
---
 tests/Language/GraphQL/SchemaSpec.hs | 32 --------------------------------
 1 file changed, 32 deletions(-)
 delete mode 100644 tests/Language/GraphQL/SchemaSpec.hs

(limited to 'tests/Language/GraphQL/SchemaSpec.hs')

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
-- 
cgit v1.2.3