1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
|
--- tkStripchart.c.orig Mon Jun 29 15:17:00 1998
+++ tkStripchart.c Tue Mar 22 13:02:03 2005
@@ -329,7 +329,7 @@
*/
static void Callback(Stripchart* StripchartPtr);
-static void ComputeStripchartGeometry(Stripchart* StripchartPtr);
+static void ComputeStripchartGeometry(const Stripchart* StripchartPtr);
static int ConfigureStripchart(Tcl_Interp* interp, Stripchart* StripchartPtr,
- int argc, char** argv, int flags);
+ int argc, const char** argv, int flags);
static void DestroyStripchart(char* clientData);
static void DisplayStripchart(ClientData clientData);
@@ -337,9 +337,9 @@
static void EventuallyRedrawStripchart(Stripchart* StripchartPtr,
int displaybits);
-static void ReplaceColours(Stripchart* StripchartPtr, int argc, char** argv);
+static void ReplaceColours(Stripchart* StripchartPtr, int argc, const char** argv);
static void ScrollStrips(Stripchart* StripchartPtr);
static void StripchartEventProc(ClientData clientData, XEvent* eventPtr);
static int StripchartWidgetCmd(ClientData clientData, Tcl_Interp* interp,
- int argc, char** argv);
+ int argc, const char** argv);
static void SetStripchartValue(Stripchart* StripchartPtr, double value);
static void SwapColours(Stripchart* StripchartPtr);
@@ -364,5 +364,5 @@
int
Tk_StripchartCmd(ClientData clientData, Tcl_Interp *interp, int argc,
- char **argv)
+ const char **argv)
{
Tk_Window tkwin = (Tk_Window) clientData;
@@ -419,5 +419,5 @@
static int
StripchartWidgetCmd(ClientData clientData, Tcl_Interp *interp,
- int argc, char **argv)
+ int argc, const char **argv)
{
register Stripchart *StripchartPtr = (Stripchart*)clientData;
@@ -629,5 +629,5 @@
static int
ConfigureStripchart(Tcl_Interp *interp, Stripchart *StripchartPtr,
- int argc, char** argv, int flags)
+ int argc, const char** argv, int flags)
{
XGCValues gcValues;
@@ -699,5 +699,5 @@
*/
static void
-ComputeStripchartGeometry(Stripchart* StripchartPtr)
+ComputeStripchartGeometry(const Stripchart* StripchartPtr)
{
int tt = hasatitle(StripchartPtr);
@@ -1040,5 +1040,5 @@
*/
static void
-ReplaceColours(Stripchart* StripchartPtr, int argc, char** argv)
+ReplaceColours(Stripchart* StripchartPtr, int argc, const char** argv)
{
StripchartPtr->altborder =
--- vic_tcl.h Thu Sep 9 08:05:49 1999
+++ vic_tcl.h Thu Sep 23 19:00:33 2004
@@ -74,6 +77,6 @@
error(file);
}
- inline char* var(const char* varname, int flags = TCL_GLOBAL_ONLY) {
- return (Tcl_GetVar(tcl_, (char*)varname, flags));
+ inline CONST char* var(const char* varname, int flags = TCL_GLOBAL_ONLY) {
+ return (Tcl_GetVar(tcl_, varname, flags));
}
/*
@@ -125,5 +128,5 @@
void class_name(const char*);
/* make this public for Sun's compiler */
- static int callback(ClientData, Tcl_Interp*, int ac, char** av);
+ static int callback(ClientData, Tcl_Interp*, int ac, CONST char** av);
static void reset_all();
protected:
--- rate-variable.cpp Thu Sep 9 08:21:55 1999
+++ rate-variable.cpp Thu Sep 23 18:55:10 2004
@@ -62,11 +62,11 @@
RateVariable(const char* name) : TclObject(name) { }
protected:
- static char* update_rate_var(ClientData, Tcl_Interp*, char* name1,
- char* name2, int flags);
+ static char* update_rate_var(ClientData, Tcl_Interp*, const char* name1,
+ const char* name2, int flags);
int command(int argc, const char*const* argv);
} rate_variable_cmd("rate_variable");
char* RateVariable::update_rate_var(ClientData clientData, Tcl_Interp* tcl,
- char* name1, char* name2, int flags)
+ const char* name1, const char* name2, int flags)
{
rv_data* rv = (rv_data*)clientData;
@@ -81,5 +81,5 @@
char res[128];
flags &= TCL_GLOBAL_ONLY;
- char* cv = Tcl_GetVar2(tcl, name1, name2, flags);
+ const char* cv = Tcl_GetVar2(tcl, name1, name2, flags);
if (cv == NULL)
return (tcl->result);
|
