Index: generic/xotcl.decls
===================================================================
diff -u -ra4d1fd30453e4e87467b02ed749fb4007d46a5e0 -rf6be3f63eadda89d7f419a090d86669c6be84c3b
--- generic/xotcl.decls	(.../xotcl.decls)	(revision a4d1fd30453e4e87467b02ed749fb4007d46a5e0)
+++ generic/xotcl.decls	(.../xotcl.decls)	(revision f6be3f63eadda89d7f419a090d86669c6be84c3b)
@@ -66,10 +66,10 @@
 #	                 ClientData cd, Tcl_CmdDeleteProc *dp)
 #}
 declare 13 generic {
-    int XOTclRemovePMethod(Tcl_Interp *interp,struct XOTcl_Object *obj, char *nm)
+    int XOTclRemovePMethod(Tcl_Interp *interp,struct XOTcl_Object *obj, CONST char *nm)
 }
 declare 14 generic {
-    int XOTclRemoveIMethod(Tcl_Interp *interp, struct XOTcl_Class *cl, char *nm)
+    int XOTclRemoveIMethod(Tcl_Interp *interp, struct XOTcl_Class *cl, CONST char *nm)
 }
 declare 15 generic {
     Tcl_Obj *XOTclOSetInstVar(struct XOTcl_Object *obj, Tcl_Interp *interp,