From 6659f26d557d792a0bf3f596a0d87aa69a7f2317 Mon Sep 17 00:00:00 2001 From: =?UTF-8?q?Juan=20Manuel=20Tom=C3=A1s?= Date: Sun, 13 Oct 2024 03:52:47 -0300 Subject: Improve safety based on json parser tests --- extra.lisp | 3 +-- 1 file changed, 1 insertion(+), 2 deletions(-) (limited to 'extra.lisp') diff --git a/extra.lisp b/extra.lisp index 916465b..2963e94 100644 --- a/extra.lisp +++ b/extra.lisp @@ -41,8 +41,7 @@ (some (lambda (y) (char= x y)) '(#\Space #\Newline #\Tab))) (defparameter whitespace - (comp ((_ (optional (many (unit whitespace?))))) - :whitespace)) + (comp ((_ (optional (many (unit whitespace?))))))) (defun separated-list (p separator &key include-separator) (comp ((v p) -- cgit v1.2.3