Index: generic/xotcl.c
===================================================================
diff -u -rf0260303acd3dd10018bbcbb28fc5d954dca2dc6 -rae1f8003c9b771906e285970f31ff9f12ce40558
--- generic/xotcl.c	(.../xotcl.c)	(revision f0260303acd3dd10018bbcbb28fc5d954dca2dc6)
+++ generic/xotcl.c	(.../xotcl.c)	(revision ae1f8003c9b771906e285970f31ff9f12ce40558)
@@ -12866,12 +12866,7 @@
 
 /* TODO: this method should be removed, we should register XOTclClassInfoMixinMethod for 
    xotcl1 under name ... instmxin ... */
-static int XOTclClassInfoInstmixinMethod(Tcl_Interp *interp, XOTclClass * class, int withClosure, int withGuards,
-			      char *patternString, XOTclObject *patternObj) {
-  return XOTclClassInfoMixinMethod(interp, class, withClosure, withGuards, patternString, patternObj);
-}
 
-
 static int XOTclClassInfoInstmixinguardMethod(Tcl_Interp *interp, XOTclClass * class, char * mixin) {
   return class->opt ? GuardList(interp, class->opt->instmixins, mixin) : TCL_OK;
 }