I’m trying to bring this up again, and also now sending it to slime-devel. I would like this warning to be gone. Can anyone fix it?

On Mar 9, 2013, at 1:57 PM, Ben Hyde bhyde@pobox.com wrote:

Each time swank loaded it runs (swank::test-print-arglist) which complains:

; Warning: Test failed: (&key #'#'+) => "(&key (function (function +)))" ; Expected: "(&key (function #'+))" ; While executing: (:internal test test-print-arglist), in process worker(8).

That's due to this…

swank> (decoded-arglist-to-string (decode-arglist '(&key (function #'+)))) "(&key (function (function +)))"

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

It is certainly beyond the scope of my expertise etc. to determine where if anyplace the bug lies. Though this seems odd to me:

$ ccl64 --no-init Welcome to Clozure Common Lisp Version 1.9-r15759 (DarwinX8664)! ? (values ccl::*print-abbreviate-quote* (with-standard-io-syntax ccl::*print-abbreviate-quote*)) T NIL ?

wdyt?

• ben

---

Openmcl-devel mailing list Openmcl-devel@clozure.com http://clozure.com/mailman/listinfo/openmcl-devel