
12 Apr
2004
12 Apr
'04
12:01 a.m.
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