diff options
author | jan.nijtmans <nijtmans@users.sourceforge.net> | 2021-02-23 07:42:14 (GMT) |
---|---|---|
committer | jan.nijtmans <nijtmans@users.sourceforge.net> | 2021-02-23 07:42:14 (GMT) |
commit | 92eff9a92206e2292cbd5dbc8e2320ce874ea7fb (patch) | |
tree | 15ef703a6d84d5fca9cca7fb367e8a0c0977e503 /generic/tclBasic.c | |
parent | 8512e037c283c963896ccc29a5118e64a9b5e830 (diff) | |
parent | eb9f949b2cfdc79e6a450a1e4f6e3580ccde4d9f (diff) | |
download | tcl-92eff9a92206e2292cbd5dbc8e2320ce874ea7fb.zip tcl-92eff9a92206e2292cbd5dbc8e2320ce874ea7fb.tar.gz tcl-92eff9a92206e2292cbd5dbc8e2320ce874ea7fb.tar.bz2 |
Merge 8.7
Diffstat (limited to 'generic/tclBasic.c')
-rw-r--r-- | generic/tclBasic.c | 4 |
1 files changed, 4 insertions, 0 deletions
diff --git a/generic/tclBasic.c b/generic/tclBasic.c index 92d0ed4..b90e12d 100644 --- a/generic/tclBasic.c +++ b/generic/tclBasic.c @@ -744,6 +744,10 @@ Tcl_CreateInterp(void) Tcl_InitHashTable(&iPtr->packageTable, TCL_STRING_KEYS); iPtr->packageUnknown = NULL; +#ifdef _WIN32 +# define getenv(x) _wgetenv(L##x) /* On Windows, use _wgetenv below */ +#endif + /* TIP #268 */ #if (TCL_RELEASE_LEVEL == TCL_FINAL_RELEASE) if (getenv("TCL_PKG_PREFER_LATEST") == NULL) { |