changing Tcl return calls

Code originally called Tcl_SetResult to return a string, but Debian hardening flags made surface an ISO C compatibility warning concerning pointer conversion. I replaced them with Tcl_SetObjResult