[slime-devel] Problems with CLISP asserts

[Barry Fishman]

When running the CVS version of CLISP I get a failure during the asserts
in slink.lisp.

The problem is that:

  (assert (test-print-arglist '(&key (function #'+)) "(&key (function #'+))"))

fails because:

  (print-arglist-to-string '(&key (function #'+)))

Returns:

  "(&key (function #'|COMMON-LISP|::|+|))"

rather than:

  "(&key (function #'+))"

I would think the CLISP response was technically correct, although
overly verbose.

This seems to be a side effect of using WITH-STANDARD-IO-SYNTAX, and
PPRINT.

(pprint '#'+) => #'+
(with-standard-io-syntax (pprint '#'+)) => #'|COMMON-LISP|::|+| 
(with-standard-io-syntax (princ '#'+)) => #'+

-- 
Barry Fishman