diff options
| author | Danny Navarro <j@dannynavarro.net> | 2017-03-03 19:23:42 -0300 |
|---|---|---|
| committer | Danny Navarro <j@dannynavarro.net> | 2017-03-03 15:23:43 -0300 |
| commit | fb071210cfd163bf8ee97448b7976ab4bdf1ed50 (patch) | |
| tree | d2a04bc60cf2adc948d842307acd05a4decde3bb | |
| parent | 285ccb0af954059879b12e33754fd10ccbed646d (diff) | |
| download | graphql-fb071210cfd163bf8ee97448b7976ab4bdf1ed50.tar.gz | |
Fix wrong scientific exponent when parsing
| -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. |