Commit e70d124c authored by Bas Lijnse's avatar Bas Lijnse

Allow extra whitespace in JSONNode fromString instance

parent 486c945b
Pipeline #30002 failed with stage
in 3 minutes and 6 seconds
......@@ -182,8 +182,9 @@ where
instance fromString JSONNode
where
fromString s
# (json,i) = parse 0 s
| i == size s
# s` = trim s
# (json,i) = parse 0 s`
| i == size s`
= json
= JSONError
......
Markdown is supported
0% or
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment