Source position: tcl80.pp line 914
function Tcl_GetStringFromObj(
pObj: PTcl_Obj;
pLen: PInteger
):PChar;