summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
-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 #\,))))