diff options
| author | jan.nijtmans <nijtmans@users.sourceforge.net> | 2020-10-13 15:45:26 (GMT) |
|---|---|---|
| committer | jan.nijtmans <nijtmans@users.sourceforge.net> | 2020-10-13 15:45:26 (GMT) |
| commit | f70e1f98b3e5235a48e0fbea21515ed7e277e6cd (patch) | |
| tree | 133785f8752974af168c2051003c99df65306c06 /win | |
| parent | fe00b6dcf66b299d9ea42fa1f9a7282c6475159c (diff) | |
| parent | 3fc1392c92078e35e6a35efc90ce598c1c2fc192 (diff) | |
| download | tcl-f70e1f98b3e5235a48e0fbea21515ed7e277e6cd.zip tcl-f70e1f98b3e5235a48e0fbea21515ed7e277e6cd.tar.gz tcl-f70e1f98b3e5235a48e0fbea21515ed7e277e6cd.tar.bz2 | |
Merge 8.6
Diffstat (limited to 'win')
| -rw-r--r-- | win/tclWinFCmd.c | 4 | ||||
| -rw-r--r-- | win/tclWinInit.c | 2 | ||||
| -rw-r--r-- | win/tclWinPipe.c | 2 |
3 files changed, 4 insertions, 4 deletions
diff --git a/win/tclWinFCmd.c b/win/tclWinFCmd.c index 6750d29..ad4bae1 100644 --- a/win/tclWinFCmd.c +++ b/win/tclWinFCmd.c @@ -1560,7 +1560,7 @@ GetWinFileAttributes( } } - *attributePtrPtr = Tcl_NewWideIntObj(attr != 0); + TclNewIntObj(*attributePtrPtr, attr != 0); return TCL_OK; } @@ -1926,7 +1926,7 @@ TclpObjListVolumes(void) int i; char *p; - resultPtr = Tcl_NewObj(); + TclNewObj(resultPtr); /* * On Win32s: diff --git a/win/tclWinInit.c b/win/tclWinInit.c index 420e324..5c3901b 100644 --- a/win/tclWinInit.c +++ b/win/tclWinInit.c @@ -189,7 +189,7 @@ TclpInitLibraryPath( const char *bytes; int length; - pathPtr = Tcl_NewObj(); + TclNewObj(pathPtr); /* * Initialize the substring used when locating the script library. The diff --git a/win/tclWinPipe.c b/win/tclWinPipe.c index 14270f8..a93688d 100644 --- a/win/tclWinPipe.c +++ b/win/tclWinPipe.c @@ -2771,7 +2771,7 @@ Tcl_PidObjCmd( } pipePtr = (PipeInfo *) Tcl_GetChannelInstanceData(chan); - resultPtr = Tcl_NewObj(); + TclNewObj(resultPtr); for (i = 0; i < pipePtr->numPids; i++) { Tcl_ListObjAppendElement(/*interp*/ NULL, resultPtr, Tcl_NewWideIntObj((unsigned) |