<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>