add tests for errors in queries for queries in starwars tests

2016-07-08 17:50:31 -04:00
parent 624efbbb35
commit a6c0d63049
3 changed files with 61 additions and 0 deletions
--- a/tests/Test/StarWars/Schema.hs
+++ b/tests/Test/StarWars/Schema.hs
@ -42,4 +42,5 @@ character char =
  , Schema.scalar "name"      $ name char
  , Schema.array  "friends"   $ character <$> getFriends char
  , Schema.enum   "appearsIn" . traverse getEpisode $ appearsIn char
+  , Schema.scalar   "secretBackstory" $ secretBackstory char
  ]