diff options
-rw-r--r-- | load.lisp | 4 |
1 files changed, 2 insertions, 2 deletions
@@ -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 #\,)))) |