diff options
Diffstat (limited to 'generic/tclEnv.c')
| -rw-r--r-- | generic/tclEnv.c | 7 |
1 files changed, 4 insertions, 3 deletions
diff --git a/generic/tclEnv.c b/generic/tclEnv.c index 9417f1a..812c2e4 100644 --- a/generic/tclEnv.c +++ b/generic/tclEnv.c @@ -12,7 +12,7 @@ * See the file "license.terms" for information on usage and redistribution of * this file, and for a DISCLAIMER OF ALL WARRANTIES. * - * RCS: @(#) $Id: tclEnv.c,v 1.27 2005/11/01 15:30:52 dkf Exp $ + * RCS: @(#) $Id: tclEnv.c,v 1.28 2005/11/27 02:33:49 das Exp $ */ #include "tclInt.h" @@ -43,6 +43,7 @@ static int environSize = 0; /* Non-zero means that the environ array was #if defined(__APPLE__) && defined(__DYNAMIC__) #include <crt_externs.h> +MODULE_SCOPE char **environ; char **environ = NULL; #endif @@ -53,8 +54,8 @@ char **environ = NULL; static char * EnvTraceProc(ClientData clientData, Tcl_Interp *interp, CONST char *name1, CONST char *name2, int flags); static void ReplaceString(CONST char *oldStr, char *newStr); -void TclSetEnv(CONST char *name, CONST char *value); -void TclUnsetEnv(CONST char *name); +MODULE_SCOPE void TclSetEnv(CONST char *name, CONST char *value); +MODULE_SCOPE void TclUnsetEnv(CONST char *name); #if defined(__CYGWIN__) && defined(__WIN32__) static void TclCygwinPutenv(CONST char *string); #endif |