__PACKAGE__ equivalent in tcl -

is there way(a method call) find out name of current package in tcl??

eg:

package provides abc  proc {  // need print package name abc.   } 

i know class name here "abc" still want print out using tcl command. i'm working on debug modules , hence need this. (similar perl provides: __package__)

i not aware of that. however, can work around:

set __package__ foo package provide $__package__ 1.0 # use can use variable $__package__ on