Index: generic/tclInt.decls
===================================================================
RCS file: /cvsroot/tcl/tcl/generic/tclInt.decls,v
retrieving revision 1.86
diff -u -p -r1.86 tclInt.decls
--- generic/tclInt.decls	2 Apr 2005 02:08:36 -0000	1.86
+++ generic/tclInt.decls	17 Apr 2005 04:38:01 -0000
@@ -873,7 +873,12 @@ declare 217 generic {
 declare 218 generic {
     void TclPopStackFrame(Tcl_Interp *interp)
 }
-
+declare 219 generic {
+    void TclInitNotifier (void)
+}
+declare 220 generic {
+    void TclFinalizeNotifier (void)
+}
 
 ##############################################################################
 
Index: generic/tclInt.h
===================================================================
RCS file: /cvsroot/tcl/tcl/generic/tclInt.h,v
retrieving revision 1.221
diff -u -p -r1.221 tclInt.h
--- generic/tclInt.h	8 Apr 2005 20:04:04 -0000	1.221
+++ generic/tclInt.h	17 Apr 2005 04:38:01 -0000
@@ -1876,7 +1876,6 @@ MODULE_SCOPE void	TclFinalizeFilesystem 
 MODULE_SCOPE void	TclResetFilesystem _ANSI_ARGS_((void));
 MODULE_SCOPE void	TclFinalizeLoad _ANSI_ARGS_((void));
 MODULE_SCOPE void	TclFinalizeMemorySubsystem _ANSI_ARGS_((void));
-MODULE_SCOPE void	TclFinalizeNotifier _ANSI_ARGS_((void));
 MODULE_SCOPE void	TclFinalizeAsync _ANSI_ARGS_((void));
 MODULE_SCOPE void	TclFinalizeSynchronization _ANSI_ARGS_((void));
 MODULE_SCOPE void	TclFinalizeLock _ANSI_ARGS_((void));
@@ -1903,7 +1902,6 @@ MODULE_SCOPE void	TclInitEncodingSubsyst
 MODULE_SCOPE void	TclInitIOSubsystem _ANSI_ARGS_((void));
 MODULE_SCOPE void	TclInitLimitSupport _ANSI_ARGS_((Tcl_Interp *interp));
 MODULE_SCOPE void	TclInitNamespaceSubsystem _ANSI_ARGS_((void));
-MODULE_SCOPE void	TclInitNotifier _ANSI_ARGS_((void));
 MODULE_SCOPE void	TclInitObjSubsystem _ANSI_ARGS_((void));
 MODULE_SCOPE void	TclInitSubsystems ();
 MODULE_SCOPE int	TclInterpReady _ANSI_ARGS_((Tcl_Interp *interp));
Index: generic/tclIntDecls.h
===================================================================
RCS file: /cvsroot/tcl/tcl/generic/tclIntDecls.h,v
retrieving revision 1.77
diff -u -p -r1.77 tclIntDecls.h
--- generic/tclIntDecls.h	2 Apr 2005 02:08:56 -0000	1.77
+++ generic/tclIntDecls.h	17 Apr 2005 04:38:01 -0000
@@ -1132,6 +1132,16 @@ EXTERN int		TclPushStackFrame _ANSI_ARGS
 /* 218 */
 EXTERN void		TclPopStackFrame _ANSI_ARGS_((Tcl_Interp * interp));
 #endif
+#ifndef TclInitNotifier_TCL_DECLARED
+#define TclInitNotifier_TCL_DECLARED
+/* 219 */
+EXTERN void		TclInitNotifier _ANSI_ARGS_((void));
+#endif
+#ifndef TclFinalizeNotifier_TCL_DECLARED
+#define TclFinalizeNotifier_TCL_DECLARED
+/* 220 */
+EXTERN void		TclFinalizeNotifier _ANSI_ARGS_((void));
+#endif
 
 typedef struct TclIntStubs {
     int magic;
@@ -1371,6 +1381,8 @@ typedef struct TclIntStubs {
     void (*tclStackFree) _ANSI_ARGS_((Tcl_Interp * interp)); /* 216 */
     int (*tclPushStackFrame) _ANSI_ARGS_((Tcl_Interp * interp, Tcl_CallFrame ** framePtrPtr, Tcl_Namespace * namespacePtr, int isProcCallFrame)); /* 217 */
     void (*tclPopStackFrame) _ANSI_ARGS_((Tcl_Interp * interp)); /* 218 */
+    void (*tclInitNotifier) _ANSI_ARGS_((void)); /* 219 */
+    void (*tclFinalizeNotifier) _ANSI_ARGS_((void)); /* 220 */
 } TclIntStubs;
 
 #ifdef __cplusplus
@@ -2128,6 +2140,14 @@ extern TclIntStubs *tclIntStubsPtr;
 #define TclPopStackFrame \
 	(tclIntStubsPtr->tclPopStackFrame) /* 218 */
 #endif
+#ifndef TclInitNotifier
+#define TclInitNotifier \
+	(tclIntStubsPtr->tclInitNotifier) /* 219 */
+#endif
+#ifndef TclFinalizeNotifier
+#define TclFinalizeNotifier \
+	(tclIntStubsPtr->tclFinalizeNotifier) /* 220 */
+#endif
 
 #endif /* defined(USE_TCL_STUBS) && !defined(USE_TCL_STUB_PROCS) */
 
Index: generic/tclStubInit.c
===================================================================
RCS file: /cvsroot/tcl/tcl/generic/tclStubInit.c,v
retrieving revision 1.114
diff -u -p -r1.114 tclStubInit.c
--- generic/tclStubInit.c	2 Apr 2005 02:08:59 -0000	1.114
+++ generic/tclStubInit.c	17 Apr 2005 04:38:01 -0000
@@ -303,6 +303,8 @@ TclIntStubs tclIntStubs = {
     TclStackFree, /* 216 */
     TclPushStackFrame, /* 217 */
     TclPopStackFrame, /* 218 */
+    TclInitNotifier, /* 219 */
+    TclFinalizeNotifier, /* 220 */
 };
 
 TclIntPlatStubs tclIntPlatStubs = {