diff options
| author | nijtmans <nijtmans> | 2008-10-14 22:37:53 (GMT) |
|---|---|---|
| committer | nijtmans <nijtmans> | 2008-10-14 22:37:53 (GMT) |
| commit | 45c244cd8dcd109d144858140ce8c0c070c79f7e (patch) | |
| tree | 600d17e3a8b14046378d7711a27fd9e79eb1ed86 /generic/tclProc.c | |
| parent | ea53c3ec3c87bc77531bc6965ab99a3a741e5789 (diff) | |
| download | tcl-45c244cd8dcd109d144858140ce8c0c070c79f7e.zip tcl-45c244cd8dcd109d144858140ce8c0c070c79f7e.tar.gz tcl-45c244cd8dcd109d144858140ce8c0c070c79f7e.tar.bz2 | |
* generic/tclCmdAH.c: Fix minor compiler warnings when compiling
* generic/tclCmdMZ.c: with -Wwrite-strings
* generic/tclIndexObj.c:
* generic/tclProc.c:
* generic/tclStubLib.c:
* generic/tclUtil.c:
Diffstat (limited to 'generic/tclProc.c')
| -rw-r--r-- | generic/tclProc.c | 6 |
1 files changed, 3 insertions, 3 deletions
diff --git a/generic/tclProc.c b/generic/tclProc.c index bfe5891..423eb3b 100644 --- a/generic/tclProc.c +++ b/generic/tclProc.c @@ -12,7 +12,7 @@ * See the file "license.terms" for information on usage and redistribution of * this file, and for a DISCLAIMER OF ALL WARRANTIES. * - * RCS: @(#) $Id: tclProc.c,v 1.163 2008/08/23 18:53:12 msofer Exp $ + * RCS: @(#) $Id: tclProc.c,v 1.164 2008/10/14 22:37:53 nijtmans Exp $ */ #include "tclInt.h" @@ -83,7 +83,7 @@ Tcl_ObjType tclProcBodyType = { * rep; it's just a cache type. */ -static Tcl_ObjType levelReferenceType = { +static const Tcl_ObjType levelReferenceType = { "levelReference", NULL, NULL, NULL, NULL }; @@ -97,7 +97,7 @@ static Tcl_ObjType levelReferenceType = { * will execute within. */ -static Tcl_ObjType lambdaType = { +static const Tcl_ObjType lambdaType = { "lambdaExpr", /* name */ FreeLambdaInternalRep, /* freeIntRepProc */ DupLambdaInternalRep, /* dupIntRepProc */ |