Usage: (tpl-file) Returns the name of the current template file.
This Scheme function takes no arguments.