[prev in list] [next in list] [prev in thread] [next in thread] 

List:       openmcl-bug
Subject:    Re: [Bug-openmcl] printing nil with print-pretty set to t
From:       Gary Byers <gb () clozure ! com>
Date:       2004-08-06 7:47:08
Message-ID: 20040806014200.F60279 () clozure ! com
[Download RAW message or body]



On Wed, 21 Jul 2004, Larry Pells wrote:

> On Yellow Dog Linux 3.0.1 with openmcl 0.14.2, when I use the following code,
> nil does not print the package name when print-pretty is set to t.
>
> Larry.
>
> (defpackage :test (:use))
> (loop for a in '(t nil)
>    do (let ((*package* (find-package :test))
>             (*print-pretty*))
>         (print a))
>       (let ((*package* (find-package :test))
>             (*print-pretty* t))
>         (print a)))
>

Sorry that this was stuck in the incoming mail queue as long as it was (and
that it took a few more days to find the bug.)

The fix is in CVS (the function MAYBE-PRINT-FAST in "ccl:lib;pprint.lisp")
was checking to see if FIND-SYMBOL on a symbol's pname found the symbol,
which (of course) doesn't work for NIL.

[prev in list] [next in list] [prev in thread] [next in thread]