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