github/semantic
1
1
Fork 0
mirror of https://github.com/github/semantic.git synced 2024-12-24 15:35:14 +03:00
Code Issues Projects Releases Wiki Activity

Assign parse errors inside the value node.

Browse Source
This commit is contained in:
Rob Rix 2018-06-27 14:23:20 -04:00
parent 4fe23a6196
commit 1e82044bd1
1 changed files with 1 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
src/Language/JSON/Assignment.hs
View File

@ -35,7 +35,7 @@ assignment :: Assignment Term
assignment = Syntax.handleError (value <|> parseError) assignment = Syntax.handleError (value <|> parseError)
value :: Assignment Term value :: Assignment Term
value = branchNode Value (object <|> array) value = branchNode Value (object <|> array <|> parseError)
jsonValue :: Assignment Term jsonValue :: Assignment Term
jsonValue = object <|> array <|> number <|> string <|> boolean <|> none <|> parseError jsonValue = object <|> array <|> number <|> string <|> boolean <|> none <|> parseError