diff options
| author | Eugen Wissner <belka@caraus.de> | 2026-09-26 20:29:43 +0200 |
|---|---|---|
| committer | Eugen Wissner <belka@caraus.de> | 2026-09-26 20:29:43 +0200 |
| commit | 116d469d9f4b1baf128a9a42c8fdac3fbeb79449 (patch) | |
| tree | be4f550709e41d48db2c1eee6a2919b6fe652f8b | |
| parent | 56ecab9c0580922c7a27ce527d09d3ed28137c02 (diff) | |
| download | graphql-116d469d9f4b1baf128a9a42c8fdac3fbeb79449.tar.gz | |
Fix endless recursion in Input Show instance
| -rw-r--r-- | CHANGELOG.md | 6 | ||||
| -rw-r--r-- | graphql.cabal | 2 | ||||
| -rw-r--r-- | src/Language/GraphQL/Execute/Transform.hs | 2 |
3 files changed, 6 insertions, 4 deletions
diff --git a/CHANGELOG.md b/CHANGELOG.md index 8c3a0da..e432d44 100644 --- a/CHANGELOG.md +++ b/CHANGELOG.md @@ -6,7 +6,9 @@ The format is based on and this project adheres to [Haskell Package Versioning Policy](https://pvp.haskell.org/). -## [Unreleased] +## [1.5.0.3] - 2026-09-26 +## Fixed +- Fix endless recursion in Input Show instance. ## [1.5.0.2] - 2026-01-08 ### Fixed @@ -557,7 +559,7 @@ and this project adheres to ### Added - Data types for the GraphQL language. -[Unreleased]: https://git.caraus.tech/OSS/graphql/compare/v1.5.0.2...master +[1.5.0.3]: https://git.caraus.tech/OSS/graphql/compare/v1.5.0.2...v1.5.0.3 [1.5.0.2]: https://git.caraus.tech/OSS/graphql/compare/v1.5.0.1...v1.5.0.2 [1.5.0.1]: https://git.caraus.tech/OSS/graphql/compare/v1.5.0.0...v1.5.0.1 [1.5.0.0]: https://git.caraus.tech/OSS/graphql/compare/v1.4.0.0...v1.5.0.0 diff --git a/graphql.cabal b/graphql.cabal index cafc33a..a691238 100644 --- a/graphql.cabal +++ b/graphql.cabal @@ -1,7 +1,7 @@ cabal-version: 3.0 name: graphql -version: 1.5.0.2 +version: 1.5.0.3 synopsis: Haskell GraphQL implementation description: Haskell <https://spec.graphql.org/June2018/ GraphQL> implementation. category: Language diff --git a/src/Language/GraphQL/Execute/Transform.hs b/src/Language/GraphQL/Execute/Transform.hs index 79de094..e3d14a6 100644 --- a/src/Language/GraphQL/Execute/Transform.hs +++ b/src/Language/GraphQL/Execute/Transform.hs @@ -143,7 +143,7 @@ instance Show Input where where showObject key value accumulator = concat [Text.unpack key, ": ", show value] : accumulator - show variableValue = show variableValue + show (Variable variableValue) = show variableValue -- | Extracts operations and fragment definitions of the document. document :: Full.Document |