Come posso ottenere il nome del programma in Racket?

Question

Vorrei rilevare a livello di programmazione il nome del programma all'interno del codice Racket. Questo può essere fatto in Chicken Scheme con:

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

Come posso emulare questo in Racket?

Answer 1

È questo quello che vuoi?

(find-system-path 'run-file) 

Vedi anche racket/cmdline per il modo di analizzare la riga di comando.

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

Answer 2

Nota: per questo particolare modello di esecuzione, per avere un modulo di libreria che può anche essere eseguito come un principale, utilizzare un nome submoduleprincipale. Vedi Main and Test Submodules, che mostra come farlo.