<html><head><meta http-equiv="Content-Type" content="text/html charset=us-ascii"></head><body style="word-wrap: break-word; -webkit-nbsp-mode: space; -webkit-line-break: after-white-space; " class=""><div class="">The issue reported in <a href="http://article.gmane.org/gmane.lisp.slime.devel/10751" class="">http://article.gmane.org/gmane.lisp.slime.devel/10751</a> i.e. that when using CCL swank complains of a test failing upon a fresh connection maybe resolved by adding <b class="">#+ccl (ccl::*print-abbreviate-quote* t)</b> as shown:</div><div class=""><br class=""></div><div class=""><div class=""><font face="Courier New">(defun decoded-arglist-to-string (decoded-arglist</font></div><div class=""><font face="Courier New"> &key operator highlight</font></div><div class=""><font face="Courier New"> print-right-margin)</font></div><div class=""><font face="Courier New"> (with-output-to-string (*standard-output*)</font></div><div class=""><font face="Courier New"> (with-arglist-io-syntax</font></div><div class=""><font face="Courier New"> (let ((*print-right-margin* print-right-margin)</font></div><div class=""><font face="Courier New"> <b class="">#+ccl (ccl::*print-abbreviate-quote* t)</b>)</font></div><div class=""><font face="Courier New"> (print-decoded-arglist decoded-arglist </font></div><div class=""><font face="Courier New"> :operator operator </font></div><div class=""><font face="Courier New"> :highlight highlight)))))</font></div><div class=""><font face="Courier New"><br></font></div></div><div class=""> - ben</div><div class=""><br class=""></div><div class="">fyi ccl's *print-abbreviate-quote* is an extension, see also <a href="http://paste.lisp.org/display/136370">http://paste.lisp.org/display/136370</a> </div><div><br></div></body></html>