diff options
| author | Gurusamy Sarathy <gsar@cpan.org> | 2000-08-17 00:56:11 +0000 |
|---|---|---|
| committer | Gurusamy Sarathy <gsar@cpan.org> | 2000-08-17 00:56:11 +0000 |
| commit | c66b022d6903a8111b22ec69f0ba7b8507763e2e (patch) | |
| tree | deaa29e6c5bc777ccf1dd37f830319bea15b7fbb /win32/win32.c | |
| parent | 79eeca274c358bbc6dfc41f18a8cb0c37b1b4384 (diff) | |
| download | perl-c66b022d6903a8111b22ec69f0ba7b8507763e2e.tar.gz | |
avoid warnings from dense compiler
p4raw-id: //depot/perl@6664
Diffstat (limited to 'win32/win32.c')
| -rw-r--r-- | win32/win32.c | 10 |
1 files changed, 6 insertions, 4 deletions
diff --git a/win32/win32.c b/win32/win32.c index 5af22ff777..687ffe04b8 100644 --- a/win32/win32.c +++ b/win32/win32.c @@ -1036,10 +1036,11 @@ win32_kill(int pid, int sig) { dTHXo; HANDLE hProcess; + long child; #ifdef USE_ITHREADS if (pid < 0) { /* it is a pseudo-forked child */ - long child = find_pseudo_pid(-pid); + child = find_pseudo_pid(-pid); if (child >= 0) { if (!sig) return 0; @@ -1057,7 +1058,7 @@ win32_kill(int pid, int sig) else #endif { - long child = find_pid(pid); + child = find_pid(pid); if (child >= 0) { if (!sig) return 0; @@ -1659,11 +1660,12 @@ win32_waitpid(int pid, int *status, int flags) dTHXo; DWORD timeout = (flags & WNOHANG) ? 0 : INFINITE; int retval = -1; + long child; if (pid == -1) /* XXX threadid == 1 ? */ return win32_wait(status); #ifdef USE_ITHREADS else if (pid < 0) { - long child = find_pseudo_pid(-pid); + child = find_pseudo_pid(-pid); if (child >= 0) { HANDLE hThread = w32_pseudo_child_handles[child]; DWORD waitcode = WaitForSingleObject(hThread, timeout); @@ -1690,7 +1692,7 @@ win32_waitpid(int pid, int *status, int flags) else { HANDLE hProcess; DWORD waitcode; - long child = find_pid(pid); + child = find_pid(pid); if (child >= 0) { hProcess = w32_child_handles[child]; waitcode = WaitForSingleObject(hProcess, timeout); |