[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
number-to-string-pad
|
From: |
Emanuel Berg |
|
Subject: |
number-to-string-pad |
|
Date: |
Sat, 27 Jan 2018 08:06:57 +0100 |
|
User-agent: |
Gnus/5.13 (Gnus v5.13) Emacs/24.4 (gnu/linux) |
Did anyone do
(defun number-to-string-pad (number len)
(let*((num-str (number-to-string number))
(len-num-str (length num-str))
(pad-len (- len len-num-str)) )
(if (< 0 pad-len)
(let ((pad-prefix (make-string pad-len ?0)))
(concat pad-prefix num-str))
num-str) ))
?
--
underground experts united
http://user.it.uu.se/~embe8573
- number-to-string-pad,
Emanuel Berg <=