From 6b8e45d89b22ed51751dc976068a0e0350edff4d Mon Sep 17 00:00:00 2001 From: =?UTF-8?q?Juan=20Manuel=20Tom=C3=A1s?= Date: Sat, 17 Dec 2022 15:29:12 -0300 Subject: Add whitespace parser --- parser.lisp | 4 ++++ 1 file changed, 4 insertions(+) (limited to 'parser.lisp') diff --git a/parser.lisp b/parser.lisp index 55ded57..7567b1f 100644 --- a/parser.lisp +++ b/parser.lisp @@ -134,3 +134,7 @@ (if include-separator (cons v (cons sep vn)) (cons v vn)))) + +(defparameter whitespace + (comp ((_ (optional (many (unit-if (lambda (x) (or (char= x #\Space) (char= x #\Newline) (char= x #\Tab)))))))) + nil)) -- cgit v1.2.3