Я хотел бы программно определить имя программы в коде Racket. Это можно сделать в Chicken Scheme с помощью:
#!/bin/sh
#|
exec csi -ss $0 ${1+"$@"}
exit
|#
(define (main)
(display (format "Program: ~a\n" (program-name)))
(exit))
(if (not (equal? (program-name) "csi"))
(main))
Как я мог подражать этому в Racket?
Это то, что вы хотите?
(find-system-path 'run-file)
См. также racket/cmdline, как анализировать командную строку.
http://docs.racket-lang.org/reference/Command-Line_Parsing.html
Примечание: для этого конкретного шаблона выполнения, чтобы иметь библиотечный модуль, который также можно запускать как основной, используйте подмодуль с именем main. См. основные и тестовые подмодули, который показывает, как это сделать.
