diff options
| author | Pweaver (Paul Weaver) <paul@mordor.org> | 2016-07-08 17:50:31 -0400 |
|---|---|---|
| committer | Pweaver (Paul Weaver) <paul@mordor.org> | 2016-07-08 18:10:14 -0400 |
| commit | a6c0d63049044b825d1fd0efe6023de82cb11766 (patch) | |
| tree | 734cf040459e16184e2eae5a4beafc293c255ff7 /tests/Test/StarWars/Data.hs | |
| parent | 624efbbb35c7c416c4562fa22949c49a1359253d (diff) | |
| download | graphql-a6c0d63049044b825d1fd0efe6023de82cb11766.tar.gz | |
add tests for errors in queries for queries in starwars tests
Diffstat (limited to 'tests/Test/StarWars/Data.hs')
| -rw-r--r-- | tests/Test/StarWars/Data.hs | 3 |
1 files changed, 3 insertions, 0 deletions
diff --git a/tests/Test/StarWars/Data.hs b/tests/Test/StarWars/Data.hs index a898cea..cec90ae 100644 --- a/tests/Test/StarWars/Data.hs +++ b/tests/Test/StarWars/Data.hs @@ -56,6 +56,9 @@ appearsIn :: Character -> [Int] appearsIn (Left x) = _appearsIn . _droidChar $ x appearsIn (Right x) = _appearsIn . _humanChar $ x +secretBackstory :: Character -> Text +secretBackstory = error "secretBackstory is secret." + luke :: Character luke = Right luke' |