Làm cách nào để lấy tên chương trình trong Racket?

Question

Tôi muốn phát hiện chương trình tên chương trình trong mã Racket. Điều này có thể được thực hiện trong Chương trình Gà với:

#!/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)) 

Làm cách nào tôi có thể mô phỏng điều này trong vợt?

Answer 1

Đây có phải là những gì bạn muốn không?

(find-system-path 'run-file) 

Xem thêm racket/cmdline để biết cách phân tích cú pháp dòng lệnh.

http://docs.racket-lang.org/reference/Command-Line_Parsing.html

Answer 2

Lưu ý: đối với mô hình đặc biệt này thực hiện, có một module thư viện mà cũng có thể được chạy như một chính, sử dụng một submodule tên chính. Xem Main and Test Submodules, trong đó cho thấy làm thế nào để làm điều này.