Updated to tcl 8.4.1

[pf3gnuchains/sourceware.git] / tcl / generic / tclStubLib.c

diff --git a/tcl/generic/tclStubLib.c b/tcl/generic/tclStubLib.c
index 048fdd4..b00211d 100644 (file)
--- a/tcl/generic/tclStubLib.c
+++ b/tcl/generic/tclStubLib.c
@@ -80,13 +80,13 @@ HasStubSupport (interp)
 #undef Tcl_InitStubs
 #endif
 
-char *
+CONST char *
 Tcl_InitStubs (interp, version, exact)
     Tcl_Interp *interp;
-    char *version;
+    CONST char *version;
     int exact;
 {
-    char *actualVersion;
+    CONST char *actualVersion;
     TclStubs *tmp;
     
     if (!tclStubsPtr) {