diff options
Diffstat (limited to 'generic/tclBasic.c')
| -rw-r--r-- | generic/tclBasic.c | 6 |
1 files changed, 2 insertions, 4 deletions
diff --git a/generic/tclBasic.c b/generic/tclBasic.c index ed1ad58..3940d4b 100644 --- a/generic/tclBasic.c +++ b/generic/tclBasic.c @@ -2740,10 +2740,9 @@ Tcl_CreateObjCommand2( * name. */ void *clientData, /* Arbitrary value to pass to object * function. */ - Tcl_CmdDeleteProc *deleteProc + Tcl_CmdDeleteProc *deleteProc) /* If not NULL, gives a function to call when * this command is deleted. */ -) { CmdWrapperInfo *info = (CmdWrapperInfo *) Tcl_Alloc(sizeof(CmdWrapperInfo)); info->proc = proc; @@ -2768,10 +2767,9 @@ Tcl_CreateObjCommand( * name. */ void *clientData, /* Arbitrary value to pass to object * function. */ - Tcl_CmdDeleteProc *deleteProc + Tcl_CmdDeleteProc *deleteProc) /* If not NULL, gives a function to call when * this command is deleted. */ -) { Interp *iPtr = (Interp *) interp; Namespace *nsPtr; |