以编程方式访问 Factor 中的模块/文件名？

Question

命令行用法中指定的程序名称，例如“Usage：rot13.factor [OPTIONS]”。

Erlang 有一个名为 ?FILE 的宏来访问源代码自己的文件名。 Factor 有类似的东西吗？

Rosetta 代码

Answer 1

Factor 的命令行词汇表中有一个单词 script，当 Factor 处于解释模式时，它会返回脚本名称或 f。

#! /usr/bin/env factor

USING: namespaces io command-line ;
IN: scriptname

: main ( -- ) script get print ;

MAIN: main

例子：

$ ./scriptname.factor 
Program: ./scriptname.factor

$ factor
( scratchpad ) USING: command-line ;
( scratchpad ) script get .
f