diff options
author | jan.nijtmans <nijtmans@users.sourceforge.net> | 2020-03-14 22:07:25 (GMT) |
---|---|---|
committer | jan.nijtmans <nijtmans@users.sourceforge.net> | 2020-03-14 22:07:25 (GMT) |
commit | ad027699337cb14f37a3914d03a1504da8d0f946 (patch) | |
tree | 22fb59fa2b72ec24e3a28ce9435a5d5cc982fe9f /generic/tclEnv.c | |
parent | 6751485187087a5d96253b9d52e1e01b33e0c1a4 (diff) | |
parent | bb05d544ee15b5aeda1e4dce5bcbea977e0f0aa2 (diff) | |
download | tcl-ad027699337cb14f37a3914d03a1504da8d0f946.zip tcl-ad027699337cb14f37a3914d03a1504da8d0f946.tar.gz tcl-ad027699337cb14f37a3914d03a1504da8d0f946.tar.bz2 |
Merge 8.6
Diffstat (limited to 'generic/tclEnv.c')
-rw-r--r-- | generic/tclEnv.c | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/generic/tclEnv.c b/generic/tclEnv.c index 509bcc0..fbc641c 100644 --- a/generic/tclEnv.c +++ b/generic/tclEnv.c @@ -511,7 +511,7 @@ TclUnsetEnv( #endif /* HAVE_PUTENV_THAT_COPIES */ } #else /* !USE_PUTENV_FOR_UNSET */ - for (envPtr = (char *)(tenviron+index+1); ; envPtr++) { + for (envPtr = (char **)(tenviron+index+1); ; envPtr++) { envPtr[-1] = *envPtr; if (*envPtr == NULL) { break; |