diff options
author | dgp <dgp@users.sourceforge.net> | 2008-10-17 16:32:57 (GMT) |
---|---|---|
committer | dgp <dgp@users.sourceforge.net> | 2008-10-17 16:32:57 (GMT) |
commit | c7737419286a172921b8edcbf3b4f40c02e02dae (patch) | |
tree | 28220fcac63f741bcf4e0650f857498e526120b2 /generic/tclCmdAH.c | |
parent | 842e3ff91428c72a2ce0d4df4889778af82f4b12 (diff) | |
download | tcl-c7737419286a172921b8edcbf3b4f40c02e02dae.zip tcl-c7737419286a172921b8edcbf3b4f40c02e02dae.tar.gz tcl-c7737419286a172921b8edcbf3b4f40c02e02dae.tar.bz2 |
* generic/tclCompile.h: Declare the internal tclInstructionTable
* generic/tclExecute.c: to simply be "const", not CONST86.
* generic/tclCmdAH.c: whitespace.
* generic/tclCmdIL.c: Uninitialized variable warning.
* generic/tclTest.c: const correctness warning.
Diffstat (limited to 'generic/tclCmdAH.c')
-rw-r--r-- | generic/tclCmdAH.c | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/generic/tclCmdAH.c b/generic/tclCmdAH.c index 342188e..2e9b5b9 100644 --- a/generic/tclCmdAH.c +++ b/generic/tclCmdAH.c @@ -10,7 +10,7 @@ * See the file "license.terms" for information on usage and redistribution of * this file, and for a DISCLAIMER OF ALL WARRANTIES. * - * RCS: @(#) $Id: tclCmdAH.c,v 1.106 2008/10/14 22:37:53 nijtmans Exp $ + * RCS: @(#) $Id: tclCmdAH.c,v 1.107 2008/10/17 16:32:58 dgp Exp $ */ #include "tclInt.h" @@ -51,7 +51,7 @@ static inline void ForeachCleanup(Tcl_Interp *interp, struct ForeachState *statePtr); static int GetStatBuf(Tcl_Interp *interp, Tcl_Obj *pathPtr, Tcl_FSStatProc *statProc, Tcl_StatBuf *statPtr); -static const char *GetTypeFromMode(int mode); +static const char * GetTypeFromMode(int mode); static int StoreStatData(Tcl_Interp *interp, Tcl_Obj *varName, Tcl_StatBuf *statPtr); static Tcl_NRPostProc CatchObjCmdCallback; |