GNU bug report logs - #65680
cl-print-to-string-with-limit erroneously imposes a maximum print-length of 50

Previous Next

Full log

View this message in rfc822 format

From: Michael Heerdegen <michael_heerdegen <at> web.de>
To: Alan Mackenzie <acm <at> muc.de>
Cc: 65680 <at> debbugs.gnu.org
Subject: bug#65680: cl-print-to-string-with-limit erroneously imposes a maximum print-length of 50
Date: Tue, 03 Oct 2023 04:11:16 +0200

Hello Alan,

in 01229fe0096 "Stop truncating strings too much in
cl-print-string-with-limit" there is an error: the first `cond'
condition will error when limit is nil (`zerop' expects a number):

| @@ -557,6 +572,11 @@ cl-print-to-string-with-limit
|                          ((null limit) nil)
|                          ((eq limit t) print-level)
|                          (t (min 8 (truncate (log limit))))))
| +         (cl-print-string-length
| +          (cond
| +           ((or (null limit) (zerop limit)) nil)
| +           ((eq limit t) cl-print-string-length)
| +           (t (max 0 (- limit 3)))))

TIA,

Michael.

Previous Next

GNU bug tracking system
Copyright (C) 1999 Darren O. Benham, 1997,2003 nCipher Corporation Ltd, 1994-97 Ian Jackson.