From: SourceForge.net <no...@so...> - 2005-09-05 21:02:56
|
Bugs item #1282492, was opened at 2005-09-05 15:43 Message generated for change (Comment added) made by sds You can respond by visiting: https://sourceforge.net/tracker/?func=detail&atid=101355&aid=1282492&group_id=1355 Please note that this message will contain a full copy of the comment thread, including the initial issue submission, for this request, not just the latest update. Category: clisp Group: ANSI compliance issue Status: Open Resolution: None Priority: 5 Submitted By: Sergey Pavlov (leeaaa) Assigned to: Sam Steingold (sds) Summary: write function don't binds all print-variables Initial Comment: I think following code should unbind *print-length* after exiting from "write" and print 10, but actually CLISP prints 50. I have tested it with LispWorks - that implementation binds/unbinds all *print-* vars to their value if key argument absent. That logic better, because it protects vars from changes inside a custom print- object functions (defclass c () (f)) (defmethod print-object ((x c) s) (setq *print-length* 50) (print "print-object")) (progn (setq *print-length* 10) (write (make-instance 'c) ) (print *print-length*) ) ---------------------------------------------------------------------- >Comment By: Sam Steingold (sds) Date: 2005-09-05 17:02 Message: Logged In: YES user_id=5735 I do not see a requirement that the non-supplied keyword parameters effect a binding: http://www.lisp.org/HyperSpec/Body/fun_writecm_p_rintcm_princ.html For each explicitly supplied keyword parameter named in the next figure, the corresponding printer control variable is dynamically bound to its value while printing goes on; for each keyword parameter in the next figure that is not explicitly supplied, the value of the corresponding printer control variable is the same as it was at the time write was invoked. ---------------------------------------------------------------------- You can respond by visiting: https://sourceforge.net/tracker/?func=detail&atid=101355&aid=1282492&group_id=1355 |