Source position: tcl80.pp line 850
function Tcl_CreateSlave(
interp: PTcl_Interp;
slaveName: PChar;
isSafe: Integer
):PTcl_Interp;