diff options
Diffstat (limited to 'Data/GraphQL/Parser.hs')
| -rw-r--r-- | Data/GraphQL/Parser.hs | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/Data/GraphQL/Parser.hs b/Data/GraphQL/Parser.hs index df91e99..35f42d5 100644 --- a/Data/GraphQL/Parser.hs +++ b/Data/GraphQL/Parser.hs @@ -149,7 +149,7 @@ value = ValueVariable <$> variable either (pure . ValueFloat) (maybe (fail "Integer value is out of range.") (pure . ValueInt) - . toBoundedInteger . (`scientific` 1)) + . toBoundedInteger . (`scientific` 0)) . floatingOrInteger -- TODO: Escape characters. Look at `jsstring_` in aeson package. |