From bfa1f614eda89329cce69e0984f97eda294fb266 Mon Sep 17 00:00:00 2001
From: =?UTF-8?q?Daniel=20Kochma=C5=84ski?= <dkochmanski@turtle-solutions.eu>
Date: Mon, 11 May 2015 11:05:41 +0200
Subject: [PATCH] format: flonum-to-string: Minimal width for numbers is 1 not
 0.
MIME-Version: 1.0
Content-Type: text/plain; charset=UTF-8
Content-Transfer-Encoding: 8bit

Signed-off-by: Daniel Kochmański <dkochmanski@turtle-solutions.eu>
---
 src/lsp/format.lsp | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/src/lsp/format.lsp b/src/lsp/format.lsp
index 0d76ce80d..0c06e1683 100644
--- a/src/lsp/format.lsp
+++ b/src/lsp/format.lsp
@@ -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)))