summaryrefslogtreecommitdiffstats
path: root/generic/tclDate.c
diff options
context:
space:
mode:
authornijtmans <nijtmans>2007-02-20 23:24:02 (GMT)
committernijtmans <nijtmans>2007-02-20 23:24:02 (GMT)
commit6ad116f411885307607d5bebcd6a987ebfafff40 (patch)
tree2fc3ee74f9099dbc66a0d0d154665561411fd654 /generic/tclDate.c
parent7ae3600bbf1577f02278766a0cca9d439a933bf9 (diff)
downloadtcl-6ad116f411885307607d5bebcd6a987ebfafff40.zip
tcl-6ad116f411885307607d5bebcd6a987ebfafff40.tar.gz
tcl-6ad116f411885307607d5bebcd6a987ebfafff40.tar.bz2
various "const" additions, in line with TIP #27
Diffstat (limited to 'generic/tclDate.c')
-rw-r--r--generic/tclDate.c8
1 files changed, 4 insertions, 4 deletions
diff --git a/generic/tclDate.c b/generic/tclDate.c
index 0156879..b38026f 100644
--- a/generic/tclDate.c
+++ b/generic/tclDate.c
@@ -219,7 +219,7 @@ typedef struct DateInfo {
* An entry in the lexical lookup table.
*/
typedef struct _TABLE {
- char *name;
+ const char *name;
int type;
time_t value;
} TABLE;
@@ -243,7 +243,7 @@ typedef enum _MERIDIAN {
/*
* Prototypes of internal functions.
*/
-static void TclDateerror(char *s);
+static void TclDateerror(const char *s);
static time_t ToSeconds(time_t Hours, time_t Minutes,
time_t Seconds, MERIDIAN Meridian);
static int LookupWord(char *buff);
@@ -2079,7 +2079,7 @@ static TABLE MilitaryTable[] = {
*/
static void
TclDateerror(s)
- char *s;
+ const char *s;
{
}
@@ -2292,7 +2292,7 @@ TclClockOldscanObjCmd( clientData, interp, objc, objv )
ClientData clientData; /* Unused */
Tcl_Interp* interp; /* Tcl interpreter */
int objc; /* Count of paraneters */
- Tcl_Obj *CONST *objv; /* Parameters */
+ Tcl_Obj *const *objv; /* Parameters */
{
Tcl_Obj* result;