diff options
| author | dgp <dgp@users.sourceforge.net> | 2002-02-20 18:46:29 (GMT) |
|---|---|---|
| committer | dgp <dgp@users.sourceforge.net> | 2002-02-20 18:46:29 (GMT) |
| commit | cc1bbd201a7a27fca359161852a83c76154dca64 (patch) | |
| tree | 277dbd20299a6c1d835fab8c2ff005ba9a0d6611 /generic/tcl.h | |
| parent | 8990c49c4d485fb0ae33ca8f210a59a714d762c0 (diff) | |
| download | tcl-cc1bbd201a7a27fca359161852a83c76154dca64.zip tcl-cc1bbd201a7a27fca359161852a83c76154dca64.tar.gz tcl-cc1bbd201a7a27fca359161852a83c76154dca64.tar.bz2 | |
* generic/tcl.decls (Tcl_RegExpRange,Tcl_GetIndexFromObjStruct):
Overlooked a few source incompatibilities. Now using CONST84.
* generic/tclDecls.h: make genstubs
* generic/tcl.h (Tcl_CmdObjTraceProc): silence warning from Sun
Workshop compiler.
Diffstat (limited to 'generic/tcl.h')
| -rw-r--r-- | generic/tcl.h | 13 |
1 files changed, 4 insertions, 9 deletions
diff --git a/generic/tcl.h b/generic/tcl.h index 160990c..f9246e7 100644 --- a/generic/tcl.h +++ b/generic/tcl.h @@ -13,7 +13,7 @@ * See the file "license.terms" for information on usage and redistribution * of this file, and for a DISCLAIMER OF ALL WARRANTIES. * - * RCS: @(#) $Id: tcl.h,v 1.116 2002/02/20 00:35:47 dkf Exp $ + * RCS: @(#) $Id: tcl.h,v 1.117 2002/02/20 18:46:29 dgp Exp $ */ #ifndef _TCL @@ -665,14 +665,9 @@ typedef int (Tcl_CmdProc) _ANSI_ARGS_((ClientData clientData, typedef void (Tcl_CmdTraceProc) _ANSI_ARGS_((ClientData clientData, Tcl_Interp *interp, int level, char *command, Tcl_CmdProc *proc, ClientData cmdClientData, int argc, char *argv[])); -typedef int (Tcl_CmdObjTraceProc) _ANSI_ARGS_(( - ClientData clientData, - Tcl_Interp* interp, - int level, - CONST char* command, - Tcl_Command commandInfo, - int objc, - struct Tcl_Obj *CONST objv[] )); +typedef int (Tcl_CmdObjTraceProc) _ANSI_ARGS_((ClientData clientData, + Tcl_Interp *interp, int level, CONST char *command, + Tcl_Command commandInfo, int objc, struct Tcl_Obj * CONST * objv)); typedef void (Tcl_CmdObjTraceDeleteProc) _ANSI_ARGS_((ClientData clientData)); typedef void (Tcl_DupInternalRepProc) _ANSI_ARGS_((struct Tcl_Obj *srcPtr, struct Tcl_Obj *dupPtr)); |