From: Pat Thoyts Date: Mon, 9 Sep 2002 22:38:22 +0000 (+0000) Subject: Updated comments X-Git-Tag: winsend-0-5~3 X-Git-Url: http://privyetmir.co.uk/gitweb.cgi?a=commitdiff_plain;h=0fdc0899b3e27dcedebafe7080ce729b3a703ae0;p=winsend Updated comments --- diff --git a/winsend.c b/winsend.c index 5c484fe..cd00290 100644 --- a/winsend.c +++ b/winsend.c @@ -3,10 +3,8 @@ /* * TODO: - * Put the ROT cookie into a client data structure. - * Use a C based COM object. * Arrange to register the dispinterface ID? - * Check the tkWinSend.c file and implement a Tk send. + * Check the tkWinSend.c file and implement a Tk send then raise a TIP? */ static const char rcsid[] = @@ -110,6 +108,7 @@ Winsend_Init(Tcl_Interp* interp) Tcl_InitStubs(interp, "8.3", 0); #endif + /* allocate our package structure */ pkg = (WinsendPkg*)Tcl_Alloc(sizeof(WinsendPkg)); if (pkg == NULL) { Tcl_SetResult(interp, "out of memory", TCL_STATIC); @@ -117,7 +116,7 @@ Winsend_Init(Tcl_Interp* interp) } memset(pkg, 0, sizeof(WinsendPkg)); - /* discover our root name */ + /* discover our root name - default to 'tcl'*/ if (Tcl_Eval(interp, "file tail $::argv0") == TCL_OK) name = Tcl_GetObjResult(interp); if (name == NULL)