Есть ли в Chicken Scheme эквивалент Perl $ 0?

Как я могу надежно получить имя сценария в Chicken Scheme?

Похоже, что -ss съедает имя сценария, поэтому его не видно, если я используйте точечную косую черту для запуска моих скриптов.

scriptedmain.scm:

#!/usr/bin/env csi -q

(display (command-line-arguments))
(display "\n")
(exit)

Trace:

$ ./scriptedmain.scm 
(-q ./scriptedmain.scm)
wonko:Desktop andrew$ csi -ss scriptedmain.scm 
()
5
задан mcandre 4 March 2011 в 00:46
поделиться