command-line - 使用`command-line`函数在Scheme中获取命令行参数

Question

这个问题之前肯定有人问过，here。除了command-line在. _ _r6rs-lib

我设法通过以下方式实现了我想要的Gauche（非 r6rs 兼容的实现）*argv*：

(display *argv*)
> gosh test.ss first 1 2 3 4 5 6 7 8 9 10 11 12 13
         >> (first 1 2 3 4 5 6 7 8 9 10 11 12 13)

我想做与使用该功能兼容的Petite Chez Scheme相同r6rs操作command-line。我尝试使用该章中的代码，但我得到的只是一个包含脚本名称的列表，并且只有第一个参数。例如

#!r6rs
(import (rnrs programs (6)))
(display (command-line))

> petite --script test.ss first second
    >> (test.ss first)

是否还有其他一些我缺少的库导入可以使它工作？

Answer 1

以下“脚本”在“Ikarus 计划”中适用于我：

#!/usr/bin/env scheme-script
(import (rnrs))
(display (command-line))
(newline)

ebg@ebg$ ./ik.scm a b c
(./ik.scm a b c)
ebg@ebg$ ikarus --r6rs-script ./ik.scm a b c
(./ik.scm a b c)

对于娇小的

ebg@ebg$ petite --script ~/ik.scm a b c
(/Users/ebg/ik.scm a b c)

请注意，正式(import (rnrs programs (6)))不会导入display，因此编写的代码应该会失败。