Posted to tcl by patthoyts at Fri May 11 14:09:05 GMT 2007view pretty

Index: generic/tclIntDecls.h
===================================================================
RCS file: /cvsroot/tcl/tcl/generic/tclIntDecls.h,v
retrieving revision 1.99
diff -u -r1.99 tclIntDecls.h
--- generic/tclIntDecls.h       5 May 2007 23:36:36 -0000       1.99
+++ generic/tclIntDecls.h       10 May 2007 00:16:24 -0000
@@ -1031,14 +1031,14 @@
 #ifndef TclEvalObjEx_TCL_DECLARED
 #define TclEvalObjEx_TCL_DECLARED
 /* 232 */
-EXTERN int             TclEvalObjEx (Tcl_Interp * interp, Tcl_Obj * objPtr,
+MODULE_SCOPE int               TclEvalObjEx (Tcl_Interp * interp, Tcl_Obj * objPtr,
                                int flags, const CmdFrame * invoker,
                                int word);
 #endif
 #ifndef TclGetSrcInfoForPc_TCL_DECLARED
 #define TclGetSrcInfoForPc_TCL_DECLARED
 /* 233 */
-EXTERN void            TclGetSrcInfoForPc (CmdFrame * contextPtr);
+MODULE_SCOPE void              TclGetSrcInfoForPc (CmdFrame * contextPtr);
 #endif

 typedef struct TclIntStubs {