From c06d0b8e95ea4b87eab69da085cb32dbd052c1f0 Mon Sep 17 00:00:00 2001 From: Eugen Wissner Date: Tue, 26 May 2020 11:13:55 +0200 Subject: Add Union and Interface type definitions --- tests/Test/StarWars/Schema.hs | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) (limited to 'tests/Test/StarWars/Schema.hs') diff --git a/tests/Test/StarWars/Schema.hs b/tests/Test/StarWars/Schema.hs index f32c031..e58d33b 100644 --- a/tests/Test/StarWars/Schema.hs +++ b/tests/Test/StarWars/Schema.hs @@ -25,7 +25,7 @@ import Test.StarWars.Data schema :: Schema Identity schema = Schema { query = queryType, mutation = Nothing } where - queryType = Out.ObjectType "Query" Nothing $ HashMap.fromList + queryType = Out.ObjectType "Query" Nothing [] $ HashMap.fromList [ ("hero", Out.Field Nothing (Out.NamedScalarType string) mempty hero) , ("human", Out.Field Nothing (Out.NamedScalarType string) mempty human) , ("droid", Out.Field Nothing (Out.NamedScalarType string) mempty droid) -- cgit v1.2.3