summaryrefslogtreecommitdiff
path: root/load.lisp
diff options
context:
space:
mode:
authorJuan Manuel Tomás <jtomas1815@gmail.com>2023-08-07 01:12:17 -0300
committerJuan Manuel Tomás <jtomas1815@gmail.com>2023-08-07 01:12:17 -0300
commitc857477e0585b14a8ecba3d57d45e961449c2a90 (patch)
treec9fe1dfc34e72c5b6318155d6963a4a09bc64150 /load.lisp
parent45db9a682fe12cb68f76665a76bf58aee36bc44b (diff)
downloadjson-c857477e0585b14a8ecba3d57d45e961449c2a90.tar.gz
json-c857477e0585b14a8ecba3d57d45e961449c2a90.zip
Take empty objects into account
Diffstat (limited to 'load.lisp')
-rw-r--r--load.lisp4
1 files changed, 2 insertions, 2 deletions
diff --git a/load.lisp b/load.lisp
index f8566bb..4acfede 100644
--- a/load.lisp
+++ b/load.lisp
@@ -78,10 +78,10 @@
(defparameter json-object
(let ((json-pair
(comp ((_ whitespace)
- (k (crit string-literal))
+ (k string-literal)
(_ whitespace)
(_ (crit (unit #\:)))
- (v json-value))
+ (v (crit json-value)))
(cons k v))))
(comp ((_ (unit #\{))
(vn (optional (separated-list json-pair (unit #\,))))