mirror of
https://gitlab.com/embeddable-common-lisp/ecl.git
synced 2026-01-15 22:01:36 -08:00
format: flonum-to-string: Minimal width for numbers is 1 not 0.
Signed-off-by: Daniel Kochmański <dkochmanski@turtle-solutions.eu>
This commit is contained in:
parent
8b0b31f34e
commit
bfa1f614ed
1 changed files with 1 additions and 1 deletions
|
|
@ -117,7 +117,7 @@
|
|||
(float-to-digits nil x nil nil))
|
||||
(T (let ((w (multiple-value-list
|
||||
(float-to-digits nil x
|
||||
(max 0
|
||||
(max 1
|
||||
(+ (1- width)
|
||||
(if (minusp scale)
|
||||
scale 0)))
|
||||
|
|
|
|||
Loading…
Add table
Add a link
Reference in a new issue