Posted to tcl by kbk at Sun Jan 06 02:01:36 GMT 2008view pretty
conClassObj = Tcl_NewStringObj("::tdbc::odbc::connection", -1); Tcl_IncrRefCount(conClassObj); if ((conClassObject = Tcl_GetObjectFromObj(interp, conClassObj)) == NULL) { Tcl_DecrRefCount(conClassObj); return TCL_ERROR; } Tcl_DecrRefCount(conClassObj);