print ( false ) bug 5.26.0
- Subject: print ( false ) bug 5.26.0
- From: Robert Dodier
- Date: Mon, 27 Feb 2012 23:41:22 -0700
On 2/27/12, Edwin Woollett <woollett at charter.net> wrote:
> print (false) ----> nil in 5.26.0
> print (false) ----> false in 5.25.1
>
> print (true) -----> t in 5.26.0
> print (true) ------> true in 5.25.1
I'm guessing you have display2d:false by default.
If so, I think the following patch will fix the bug.
best,
Robert Dodier
PS.
diff --git a/src/grind.lisp b/src/grind.lisp
index de1ee5d..cee89e9 100644
--- a/src/grind.lisp
+++ b/src/grind.lisp
@@ -297,12 +297,12 @@
(msz nil l r)
(do ((nl) (w 0))
((null (cdr x))
- (setq nl (cons (if (atom (car x))
+ (setq nl (cons (if (stringp (car x))
(msz (makestring (car x)) l r)
(msize (car x) l r lop rop))
nl))
(cons (+ w (caar nl)) (nreverse nl)))
- (setq nl (cons (if (atom (car x))
+ (setq nl (cons (if (stringp (car x))
(msz (makestring (car x)) l r)
(msize (car x) l r lop rop))
nl)