[Xotcl] Use of TclGetInterpProc