Guile Scheme 之 format

Lispor

guile 中的 format 函数与 c 语言中的 printf 函数作用相同, 但是远比它强大, 其类似于 common lisp 中的 format 函数, 但是他们并不相同, guile 中的 format 函数并没有 common lisp 中的全部特性.

guile 默认的 format 函数为 simple-format, 它只支持 ~A 和 ~S 格式化字符, ~A 使用 display 函数, 而 ~S 使用 write 函数. 若想用 format 的全部特性, 需加载 (ice-9 format) 模块:

1. guile> (use-modules (ice-9 format))

复制代码

这样我们就可以用 format 函数来进行格式化字符串了.

我们先看一个例子:
在此, 我们有一个列表, 我们想用逗号<,>分割打印列表中的各个元素
比如:
有一列表 (1 2 3 4)
要打印出 1, 2, 3, 4
下面是 format 实现:

1. guile> (define xs '(1 2 3 4))
   
2. guile> (format #f "~{~a~^, ~}" xs)
   
3. "1, 2, 3, 4"

复制代码

下面是用 let 语句来实现同样的功能:

1. guile> (let loop ((ls  xs))
   
2. ...        (if (null? (cdr ls))
   
3. ...            (format #f "~a" (car ls))
   
4. ...            (string-append (format #f "~a, " (car ls))
   
5. ...                           (loop (cdr ls)))))
   
6. "1, 2, 3, 4"

复制代码

从这两个例子我们可以看出 format 函数为我们提供了一种便捷的方式来格式化字符串.

wolfkin

Thanks for your introduction very much!
And would you tell me how I can get result like following? Thanks!

1. 
   
2. print "%02x, %04x", 1, 1
   
3. 01, 0001
   

复制代码

Lispor

you can get it following

1. scheme@(guile-user)> (format "~2,'0x, ~4'0x" 1 1)
   
2. "01, 0001"

复制代码

and more than that:

1. scheme@(guile-user)> (format "~10,'*,'-,3:d" 7654321)
   
2. "*7-654-321"
   

复制代码

wolfkin

Thank you very much!

Lispor

Guile scheme 之 format 后记-1

Lispor

Guile scheme 之 format 后记-2

Lispor

Guile scheme 之 format 后记-3
Guile scheme 之 format 后记-4
Guile scheme 之 format 后记-5
Guile scheme 之 format 后记-6