Thanks a lot for putting the medea egg together. I've been using it on a few recent projects and have run into an issue when parsing simple JSON that is isn't included inside an object or an array.
Currently (json->string "foo") returns "foo", but (with-input-string "foo" read-json) returns #f.
This commit ensures that we always have the following property:
(equal? x (with-input-from-string (json->string x) read-json)).
Let me know if you would like to make some changes to this PR. Best, John
Hi,
Thanks a lot for putting the medea egg together. I've been using it on a few recent projects and have run into an issue when parsing simple JSON that is isn't included inside an object or an array.
Currently
(json->string "foo")
returns"foo"
, but(with-input-string "foo" read-json)
returns#f
.This commit ensures that we always have the following property:
(equal? x (with-input-from-string (json->string x) read-json))
.Let me know if you would like to make some changes to this PR. Best, John