X-Git-Url: http://repo.macrolet.net/gitweb/?a=blobdiff_plain;f=src%2Fcode%2Fseq.lisp;h=0b0e4bcfbc782cf9a5244bbae0b19061411aa435;hb=d3862cc781cabf52f15c2d3a164f992dbbba84f4;hp=18e1d130df77253c565b0e6efcd708167621bcfe;hpb=7dd568fb64927be78556ac27f1f0dc60e79cf942;p=sbcl.git diff --git a/src/code/seq.lisp b/src/code/seq.lisp index 18e1d13..0b0e4bc 100644 --- a/src/code/seq.lisp +++ b/src/code/seq.lisp @@ -1902,8 +1902,8 @@ from-end start end key))) (frobs)))) -;;; the user interface to FIND and POSITION: Get all our ducks in a row, -;;; then call %FIND-POSITION +;;; the user interface to FIND and POSITION: Get all our ducks in a +;;; row, then call %FIND-POSITION. (declaim (inline find position)) (macrolet ((def-find-position (fun-name values-index) `(defun ,fun-name (item