显示当前运行脚本的执行名称

Question

我尝试过几种方法，其中一种方法是：

 (define (program) (find-system-path 'pref-file))

我已经阅读了文档（在尝试上述代码之后），并且发现它不是我需要使用的，显然:)任何想法？

还要将此信息保存到变量中。 VBS示例：

script = WScript.ScriptFullName

Answer 1

#lang racket

(display "Program name: ")
(displayln (find-system-path 'run-file))

输出（如果保存为“test.rkt”并使用命令racket test.rkt运行）：

Program name: test.rkt

从racket控制台REPL，(find-system-path 'run-file)将返回#<path:racket>。我没有在DrRacket中尝试过。