Source position: tcl80.pp line 881
function Tcl_GetCurrentNamespace(
interp: PTcl_Interp
):PTcl_Namespace;