Index: generic/xotclError.c
===================================================================
diff -u -rc942f4e117d2aa3c8594702e0476a3f73a4147df -r66c24900b6a07a0cac4a28251c492bd3a05ec8e7
--- generic/xotclError.c	(.../xotclError.c)	(revision c942f4e117d2aa3c8594702e0476a3f73a4147df)
+++ generic/xotclError.c	(.../xotclError.c)	(revision 66c24900b6a07a0cac4a28251c492bd3a05ec8e7)
@@ -91,7 +91,7 @@
 }
 
 int
-XOTclErrBadVal(Tcl_Interp *interp, char *context, char *expected, char *value) {
+XOTclErrBadVal(Tcl_Interp *interp, char *context, char *expected, CONST char *value) {
   Tcl_ResetResult(interp);
   Tcl_AppendResult(interp, context, ": expected ", expected, " but got '", 
 		   value, "'", (char *) NULL);