From 20bc7362505a91b1be87b3f81517816ecde22ee0 Mon Sep 17 00:00:00 2001 From: Rob Rix Date: Mon, 7 Oct 2019 10:40:11 -0400 Subject: [PATCH] Fix a renamed rule. --- src/Language/JSON/Assignment.hs | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/src/Language/JSON/Assignment.hs b/src/Language/JSON/Assignment.hs index 7e5de06dd..aaa0a2036 100644 --- a/src/Language/JSON/Assignment.hs +++ b/src/Language/JSON/Assignment.hs @@ -35,7 +35,7 @@ assignment :: Assignment Term assignment = value <|> parseError value :: Assignment Term -value = branchNode Value (object <|> array <|> parseError) +value = branchNode Document (object <|> array <|> parseError) jsonValue :: Assignment Term jsonValue = object <|> array <|> number <|> string <|> boolean <|> none <|> parseError