From 7137cb0872e17772f26c432384da5eefa3e645d7 Mon Sep 17 00:00:00 2001 From: William Harold Newman Date: Thu, 8 Nov 2007 21:08:40 +0000 Subject: [PATCH] 1.0.11.17: fixed dumb buglet in DEFMACRO NAMED-LET Someone (jsnell?) on #lisp pointed out that there was still a #!+SB-DOC left behind after some clod deleted the corresponding doc string.:-| also a few comment tweaks --- src/code/early-extensions.lisp | 11 ++++++----- version.lisp-expr | 2 +- 2 files changed, 7 insertions(+), 6 deletions(-) diff --git a/src/code/early-extensions.lisp b/src/code/early-extensions.lisp index 68cf7c5..bfe8451 100644 --- a/src/code/early-extensions.lisp +++ b/src/code/early-extensions.lisp @@ -377,8 +377,8 @@ ;;; not really an old-fashioned function, but what the calling ;;; convention should've been: like NTH, but with the same argument -;;; order as in all the other dereferencing functions, with the -;;; collection first and the index second +;;; order as in all the other indexed dereferencing functions, with +;;; the collection first and the index second (declaim (inline nth-but-with-sane-arg-order)) (declaim (ftype (function (list index) t) nth-but-with-sane-arg-order)) (defun nth-but-with-sane-arg-order (list index) @@ -395,11 +395,12 @@ ;;;; miscellaneous iteration extensions -;;; "the ultimate iteration macro" +;;; like Scheme's named LET ;;; -;;; note for Schemers: This seems to be identical to Scheme's "named LET". +;;; (CMU CL called this ITERATE, and commented it as "the ultimate +;;; iteration macro...". I (WHN) found the old name insufficiently +;;; specific to remind me what the macro means, so I renamed it.) (defmacro named-let (name binds &body body) - #!+sb-doc (dolist (x binds) (unless (proper-list-of-length-p x 2) (error "malformed NAMED-LET variable spec: ~S" x))) diff --git a/version.lisp-expr b/version.lisp-expr index 63b0325..46ffe81 100644 --- a/version.lisp-expr +++ b/version.lisp-expr @@ -17,4 +17,4 @@ ;;; checkins which aren't released. (And occasionally for internal ;;; versions, especially for internal versions off the main CVS ;;; branch, it gets hairier, e.g. "0.pre7.14.flaky4.13".) -"1.0.11.16" +"1.0.11.17" -- 1.7.10.4