diff options
author | sterni <sternenseemann@systemli.org> | 2021-08-13T09·53+0200 |
---|---|---|
committer | sterni <sternenseemann@systemli.org> | 2021-08-14T14·46+0000 |
commit | 17a75dfc42f15d897937f5fb245d1c33eb185a82 (patch) | |
tree | 1d7425f4cf84c8027b296bde3f1827e00527aec6 /lisp/klatre | |
parent | 80ecce37b4494097b17b03b1c797d74c3ff5f1b1 (diff) |
fix(lisp/klatre): fix inline declaration for chunk-list functions r/2730
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 <grfn@gws.fyi>
Diffstat (limited to 'lisp/klatre')
-rw-r--r-- | lisp/klatre/klatre.lisp | 2 |
1 files changed, 1 insertions, 1 deletions
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 |