<html><head></head><body style="word-wrap: break-word; -webkit-nbsp-mode: space; -webkit-line-break: after-white-space; ">Each time swank loaded it runs (swank::test-print-arglist) which complains:<div><br><div><div><font face="Courier">; Warning: Test failed: (&key #'#'+) => "(&key (function (function +)))"</font></div><div><font face="Courier">; Expected: "(&key (function #'+))"</font></div><div><font face="Courier">; While executing: (:internal test test-print-arglist), in process worker(8).</font></div></div><div><br></div><div>That's due to this…</div><div><br></div><div><div><font face="Courier">swank> (decoded-arglist-to-string (decode-arglist '(&key (function #'+))))</font></div><div><font face="Courier">"(&key (function (function +)))"</font></div></div><div><br></div><div>Decoded-arglist-to-string is in swank-arglists.lisp. It is using with-standard-io-syntax. That binds ccl::*print-abbreviate-quote* to nil. If I force it to T in decoded-arglist-to-string the test "passes."</div><div><br></div><div>It is certainly beyond the scope of my expertise etc. to determine where if anyplace the bug lies. Though this seems odd to me:</div><div><br></div><div><div><font face="Courier">$ ccl64 --no-init</font></div><div><font face="Courier">Welcome to Clozure Common Lisp Version 1.9-r15759 (DarwinX8664)!</font></div><div><font face="Courier">? (values ccl::*print-abbreviate-quote* (with-standard-io-syntax ccl::*print-abbreviate-quote*))</font></div><div><font face="Courier">T</font></div><div><font face="Courier">NIL</font></div><div><font face="Courier">? </font></div></div><div><br></div><div>wdyt?</div><div><br></div><div> - ben</div></div></body></html>