Index: generic/nsfInt.h
===================================================================
diff -u -r7d2af5a3b3f0ac8ade700c3cd90a9aac5d00f0fa -reae784ccc80b2a18b83fbe631c32d549189f7927
--- generic/nsfInt.h	(.../nsfInt.h)	(revision 7d2af5a3b3f0ac8ade700c3cd90a9aac5d00f0fa)
+++ generic/nsfInt.h	(.../nsfInt.h)	(revision eae784ccc80b2a18b83fbe631c32d549189f7927)
@@ -939,6 +939,21 @@
 
 EXTERN Tcl_Obj *NsfMethodNamePath(Tcl_Interp *interp, Tcl_Obj *procObj);
 
+/*
+ * Definition of methodEpoch macros
+ */
+#if defined(METHOD_OBJECT_TRACE)
+# define NsfInstanceMethodEpochIncr(msg) \
+  RUNTIME_STATE(interp)->instanceMethodEpoch++;	\
+  fprintf(stderr, "+++ instanceMethodEpoch %d %s\n", RUNTIME_STATE(interp)->instanceMethodEpoch, msg)
+# define NsfObjectMethodEpochIncr(msg) \
+  RUNTIME_STATE(interp)->objectMethodEpoch++;	\
+  fprintf(stderr, "+++ objectMethodEpoch %d %s\n", RUNTIME_STATE(interp)->objectMethodEpoch, msg)
+#else
+# define NsfInstanceMethodEpochIncr(msg) RUNTIME_STATE(interp)->instanceMethodEpoch++
+# define NsfObjectMethodEpochIncr(msg)   RUNTIME_STATE(interp)->objectMethodEpoch++
+#endif
+
 /* 
  * NsfFlag type
  */