Guile Scheme 之 format

Question

本帖最后由 Lispor 于 2010-11-30 23:23 编辑

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 函数为我们提供了一种便捷的方式来格式化字符串.

Answer 1

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

Answer 2

Guile scheme 之 format 后记-2

Answer 3

Guile scheme 之 format 后记-1

Answer 4

Thank you very much!

Answer 5

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"

复制代码

Answer 6

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

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

复制代码