diff options
| author | jan.nijtmans <nijtmans@users.sourceforge.net> | 2021-02-23 07:39:34 (GMT) |
|---|---|---|
| committer | jan.nijtmans <nijtmans@users.sourceforge.net> | 2021-02-23 07:39:34 (GMT) |
| commit | eb9f949b2cfdc79e6a450a1e4f6e3580ccde4d9f (patch) | |
| tree | dd7e8605b200cbb5720dee7d9d0e8f2d62a7631e /generic/tclBasic.c | |
| parent | e3afa124209feea2c83bdd8b506ddd3974647cb4 (diff) | |
| parent | 8242d1a544d685846fe49557be8c9fd628d42329 (diff) | |
| download | tcl-eb9f949b2cfdc79e6a450a1e4f6e3580ccde4d9f.zip tcl-eb9f949b2cfdc79e6a450a1e4f6e3580ccde4d9f.tar.gz tcl-eb9f949b2cfdc79e6a450a1e4f6e3580ccde4d9f.tar.bz2 | |
Merge 8.6
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 b2d3f28..56356e2 100644 --- a/generic/tclBasic.c +++ b/generic/tclBasic.c @@ -774,6 +774,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) { |