Handle Output enumerations in Schema definition

The third end-to-end test from graphql-js was implemented.
2016-02-09 13:31:28 +01:00
parent c385566912
commit df8e43c9aa
3 changed files with 96 additions and 32 deletions
--- a/Data/GraphQL/Schema.hs
+++ b/Data/GraphQL/Schema.hs
@ -14,8 +14,8 @@ type Resolver f = Input -> f (Output f)
 data Output f = OutputResolver (Resolver f)
              | OutputList (f [Output f])
              | OutputScalar (f Scalar)
+              | OutputEnum (f Text)
           -- | OutputUnion [Output]
-           -- | OutputEnum [Scalar]
           -- | OutputNonNull (Output)

 data Input = InputScalar Scalar