From 633ee6f51e93ee36a87cca9f5d9628f2ca5538e4 Mon Sep 17 00:00:00 2001 From: =?UTF-8?q?Juan=20Manuel=20Tom=C3=A1s?= Date: Wed, 31 Dec 2025 21:55:24 -0300 Subject: Fix repeat type declaration --- extra.lisp | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/extra.lisp b/extra.lisp index c0a6a8a..3b64096 100644 --- a/extra.lisp +++ b/extra.lisp @@ -4,7 +4,7 @@ (or (char= it #\Space) (not (graphic-char-p it)))) -(declaim (ftype (function (parser integer integer) parser) repeat)) +(declaim (ftype (function (parser integer &optional integer) parser) repeat)) (defun repeat (p min &optional (max 0)) (if (> min 0) (comp ((x p) -- cgit v1.2.3