X-Git-Url: http://repo.macrolet.net/gitweb/?a=blobdiff_plain;f=src%2Fcold%2Fwith-stuff.lisp;h=47f308680d3ec02e0baf3a84a426767cfeb70299;hb=94ac5b7c3ff37850210b6fc9a7593cf1c5752993;hp=aff7a7f7f7bec2794235ed2d9d3edcaf797f6515;hpb=cea4896b2482b7b2b429c1631d774b4cfbc0efba;p=sbcl.git diff --git a/src/cold/with-stuff.lisp b/src/cold/with-stuff.lisp index aff7a7f..47f3086 100644 --- a/src/cold/with-stuff.lisp +++ b/src/cold/with-stuff.lisp @@ -95,9 +95,9 @@ (compile '%without-given-nickname) (compile '%multi-nickname-magic) -;;; Like WITH-ADDITIONAL-NICKNAME and WITHOUT-GIVEN-NICKNAMES, except -;;; working on arbitrary lists of nickname descriptors instead of -;;; single nickname/package pairs. +;;; This is like WITH-ADDITIONAL-NICKNAME and WITHOUT-GIVEN-NICKNAMES, +;;; except working on arbitrary lists of nickname descriptors instead +;;; of single nickname/package pairs. ;;; ;;; A nickname descriptor is a list of the form ;;; PACKAGE-DESIGNATOR NICKNAME*