Source position: tcl80.pp line 919
function Tcl_NewStringObj(
bytes: PAnsiChar;
len: Integer
):PTcl_Obj;