ラケットコード内のプログラム名をプログラムで検出したい。これは、ChickenSchemeで次の方法で実行できます。
#!/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でどのようにエミュレートできますか?