$NetBSD: patch-ak,v 1.1 2004/04/01 00:52:39 minskim Exp $

--- object.h.orig	1994-04-01 18:11:55.000000000 -0600
+++ object.h
@@ -45,7 +45,7 @@ class Object {
     static Object* find(Tcl_Interp*, char const* handle);
 
     /* TCL Callback */
-    virtual int method(int argc, char* argv[]);
+    virtual int method(int argc, const char* argv[]);
   private:
     void init(Tcl_Interp*, char const* otype, char const* ohandle);