[Openmcl-devel] swank test failed ... test-print-arglist & ccl::*print-abbreviate-quote*

[Gary Byers]

ccl:*print-abbreviate-quote* is an arguably useful but non-standard extension
to the printer in CCL.

WITH-STANDARD-IO-SYNTAX is supposed to disable implementation-specific non-standard
extensions (e.g., bind CCL:*PRINT-ABBREVIATE-QUOTE* to NIL.)  Until a few years
ago, it didn't do this; I don't remember exactly when that change was made, but I
don't think of it as a recent change.

Swank's test suite apparently expects the old (incorrect) behavior.  People
who care about what Swank's test suite does should presumably try to presuade
whoever maintains Swank's test suite to fix it.

On Thu, 22 May 2014, Mark H. David wrote:

> 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 at 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 at clozure.com
> http://clozure.com/mailman/listinfo/openmcl-devel
> 
> 
> 
>