diff options
author | coryan <coryan@ae88bc3d-4319-0410-8dbf-d08b4c9d3795> | 1999-06-12 01:04:36 +0000 |
---|---|---|
committer | coryan <coryan@ae88bc3d-4319-0410-8dbf-d08b4c9d3795> | 1999-06-12 01:04:36 +0000 |
commit | 4e6a9798f1be338e76493a2c05ba27d3868cda11 (patch) | |
tree | db9c5cd5a9432e485e76edd09fd4a2694cb99731 | |
parent | ef53bcb343a34f3a418b57c3e67f68f462a0736e (diff) | |
download | ATCD-4e6a9798f1be338e76493a2c05ba27d3868cda11.tar.gz |
ChangeLogTag:Fri Jun 11 20:04:37 1999 Carlos O'Ryan <coryan@cs.wustl.edu>
-rw-r--r-- | ChangeLog-99b | 5 | ||||
-rw-r--r-- | bin/Process_Unix.pm | 6 |
2 files changed, 8 insertions, 3 deletions
diff --git a/ChangeLog-99b b/ChangeLog-99b index 37cec7c5eee..c2ca23ee9d7 100644 --- a/ChangeLog-99b +++ b/ChangeLog-99b @@ -1,3 +1,8 @@ +Fri Jun 11 20:04:37 1999 Carlos O'Ryan <coryan@cs.wustl.edu> + + * bin/Process_Unix.pm: + Fixed problems on TimedWait(). + Fri Jun 11 15:28:44 1999 Douglas C. Schmidt <schmidt@tango.cs.wustl.edu> * ace/OS.h: Need to add #include <signal.h> before <pthread.h> diff --git a/bin/Process_Unix.pm b/bin/Process_Unix.pm index e4d983a80a7..11463630bbf 100644 --- a/bin/Process_Unix.pm +++ b/bin/Process_Unix.pm @@ -3,7 +3,7 @@ package Process; $EXE_EXT = ""; -use POSIX ":sys_wait_h"; +use POSIX "sys_wait_h"; sub Create { @@ -63,8 +63,8 @@ sub TimedWait my $self = shift; my $maxtime = shift; while ($maxtime-- != 0) { - waitpid ($self->[0], WNOHANG); - if ($? != -1) { + my $pid = waitpid ($self->[0], &WNOHANG); + if ($pid != 0 && $? != -1) { return $?; } sleep 1; |