From 17a75dfc42f15d897937f5fb245d1c33eb185a82 Mon Sep 17 00:00:00 2001 From: sterni Date: Fri, 13 Aug 2021 11:53:32 +0200 Subject: fix(lisp/klatre): fix inline declaration for chunk-list functions Found this typo because CCL is really particular about everything related to declare. Change-Id: I6d4615c1df7c9d45722e85fa82ebdd094273205d Reviewed-on: https://cl.tvl.fyi/c/depot/+/3347 Tested-by: BuildkiteCI Reviewed-by: grfn --- lisp/klatre/klatre.lisp | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) (limited to 'lisp') diff --git a/lisp/klatre/klatre.lisp b/lisp/klatre/klatre.lisp index 7fb70463a632..57ccde70e46b 100644 --- a/lisp/klatre/klatre.lisp +++ b/lisp/klatre/klatre.lisp @@ -41,7 +41,7 @@ (defun chunk-list (size list &key (start 0) end) "Returns successive chunks of list of size SIZE, starting at START and ending at END." - (declare (inline check-list/bounded check-list/simple)) + (declare (inline chunk-list/bounded chunk-list/unbounded)) (check-type size (integer 1)) (let ((list (nthcdr start list))) (when list -- cgit 1.4.1