Source position: tcl80.pp line 853
function Tcl_GetInterpPath(
askingInterp: PTcl_Interp;
slaveInterp: PTcl_Interp
):Integer;