Changeset 912

Timestamp:

Feb 16, 2005, 11:16:33 AM (20 years ago)

Author:

bryan

Message:

don't declare dynamic-extent for the unused args passed to
(funcall (formatter "~A") ..) which end up being returned
to the caller.

File:

• trunk/ccl/lib/pprint.lisp (modified) (1 diff)

trunk/ccl/lib/pprint.lisp

@@ -2168 +2168 @@
       ; appearing EQ giving bogus circularity detection
       ; But now we have fixed things so we don't circle check rest args (ha!)
-      (declare (dynamic-extent args))
       (do-sub-format-0 s ,control-string args))))