数値を位取り用のカンマで区切る - lisp-cookbook-ja/common-lisp GitHub Wiki

数値

多機能なformatには、位取りの間隔と文字を指定して出力する機能があります。

下記のように~Dに:を与えます。

(format nil "~:D" 10000000)
;=> "10,000,000"

;; 引数詳細
~mincol,padchar,commachar,comma-intervalD.

;; 4つ置きに:で区切る
(format nil "~,,':,4:D" 1000000000000)
;=> "1:0000:0000:0000"