diff options
| author | jan.nijtmans <nijtmans@users.sourceforge.net> | 2018-09-05 13:45:15 (GMT) |
|---|---|---|
| committer | jan.nijtmans <nijtmans@users.sourceforge.net> | 2018-09-05 13:45:15 (GMT) |
| commit | 1f6ac7f87e3a127645d7839916f0bc2a6143b9b9 (patch) | |
| tree | ebd9cd2ef1306351bac09ce6e0c22872ad04d953 /generic/tclProcess.c | |
| parent | 2562ea174bddf62331bd7d71ebd4b49f53ad8345 (diff) | |
| parent | 5c9968a001208bb4fc6d06ad040c28bd84b7831f (diff) | |
| download | tcl-1f6ac7f87e3a127645d7839916f0bc2a6143b9b9.zip tcl-1f6ac7f87e3a127645d7839916f0bc2a6143b9b9.tar.gz tcl-1f6ac7f87e3a127645d7839916f0bc2a6143b9b9.tar.bz2 | |
Merge 8.7.
Change some internal function signatures, accounting for the 64-bit era.
Diffstat (limited to 'generic/tclProcess.c')
| -rw-r--r-- | generic/tclProcess.c | 6 |
1 files changed, 3 insertions, 3 deletions
diff --git a/generic/tclProcess.c b/generic/tclProcess.c index a781386..73d2268 100644 --- a/generic/tclProcess.c +++ b/generic/tclProcess.c @@ -47,7 +47,7 @@ static void InitProcessInfo(ProcessInfo *info, Tcl_Pid pid, int resolvedPid); static void FreeProcessInfo(ProcessInfo *info); static int RefreshProcessInfo(ProcessInfo *info, int options); -static TclProcessWaitStatus WaitProcessStatus(Tcl_Pid pid, int resolvedPid, +static TclProcessWaitStatus WaitProcessStatus(Tcl_Pid pid, size_t resolvedPid, int options, int *codePtr, Tcl_Obj **msgPtr, Tcl_Obj **errorObjPtr); static Tcl_Obj * BuildProcessStatusObj(ProcessInfo *info); @@ -193,7 +193,7 @@ RefreshProcessInfo( TclProcessWaitStatus WaitProcessStatus( Tcl_Pid pid, /* Process id. */ - int resolvedPid, /* Resolved process id. */ + size_t resolvedPid, /* Resolved process id. */ int options, /* Options passed to Tcl_WaitPid. */ int *codePtr, /* If non-NULL, will receive either: * - 0 for normal exit. @@ -799,7 +799,7 @@ void TclProcessCreated( Tcl_Pid pid) /* Process id. */ { - int resolvedPid; + size_t resolvedPid; Tcl_HashEntry *entry, *entry2; int isNew; ProcessInfo *info; |