Index: xotcl/generic/xotclMetaData.c
===================================================================
diff -u -r2846921e448d4d4aeb3245ebbfe4381182f0e286 -r1aa7246cc8e44078c9dbd33e03992478615f314f
--- xotcl/generic/xotclMetaData.c	(.../xotclMetaData.c)	(revision 2846921e448d4d4aeb3245ebbfe4381182f0e286)
+++ xotcl/generic/xotclMetaData.c	(.../xotclMetaData.c)	(revision 1aa7246cc8e44078c9dbd33e03992478615f314f)
@@ -1,5 +1,5 @@
 /* -*- Mode: c++ -*-
- *  $Id: xotclMetaData.c,v 1.4 2006/09/25 08:29:04 neumann Exp $
+ *  $Id: xotclMetaData.c,v 1.5 2006/09/27 08:12:40 neumann Exp $
  *  
  *  Extended Object Tcl (XOTcl)
  *
@@ -81,7 +81,7 @@
 }
 
 int
-XOTclOMetaDataMethod (ClientData cd, Tcl_Interp* in, int objc, Tcl_Obj *objv[]) {
+XOTclOMetaDataMethod (ClientData cd, Tcl_Interp* in, int objc, Tcl_Obj *CONST objv[]) {
   XOTclObject *obj = (XOTclObject*)cd;
   XOTclClass  *cl  = XOTclObjectToClass(cd);
   char* option; int add = -1;