diff options
author | dgp <dgp@noemail.net> | 2008-10-17 16:32:57 (GMT) |
---|---|---|
committer | dgp <dgp@noemail.net> | 2008-10-17 16:32:57 (GMT) |
commit | 93997cb5919e4696c327383cb1ca93b9cb8726b9 (patch) | |
tree | 28220fcac63f741bcf4e0650f857498e526120b2 /generic/tclCmdAH.c | |
parent | b296d5ba7a53b61b5eda08fda6ae7168e745428c (diff) | |
download | tcl-93997cb5919e4696c327383cb1ca93b9cb8726b9.zip tcl-93997cb5919e4696c327383cb1ca93b9cb8726b9.tar.gz tcl-93997cb5919e4696c327383cb1ca93b9cb8726b9.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.
FossilOrigin-Name: c9106a2d20ebc3544524b33efb8448bf5a107c5f
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; |