Fullpath of current TCL script

Question

Is there a possibility to get the full path of the currently executing TCL script?

In PHP it would be: __FILE__

Answer 1

seconds after I've posted my question ... lindex $argv 0 is a good starting point ;-)