diff options
| author | Daniel Dragan <bulk88@hotmail.com> | 2014-03-27 03:37:03 -0400 |
|---|---|---|
| committer | Steve Hay <steve.m.hay@googlemail.com> | 2014-03-27 11:01:56 +0000 |
| commit | 721b26746b834f5757da998a7d1918547cf27ef3 (patch) | |
| tree | 8745d8b05d8497fcec5ab1e61c55365d9bf3fe87 /win32/win32.h | |
| parent | 5ed061ffb1e0dc3e88d2395a727b41f73002750c (diff) | |
| download | perl-721b26746b834f5757da998a7d1918547cf27ef3.tar.gz | |
fix killpg on Win32, to meet posix expectations for killpg
On Win32 Perls built without PERL_IMPLICIT_SYS, killpg from win32.c was
directly called by Perl_apply, yet killpg's return value had Win32
behavior, not POSIX behavior. Modify killpg token to have same meaning as
PerlProcKillpg/PerlProc_killpg has on PERL_IMPLICIT_SYS builds. Use a
macro rather than create a win32_killpg C function since win32_killpg would
be nothing but a call to win32_kill anyways. win32_kill contains the Win32
to POSIX semantics conversion code. Rename old killpg to my_killpg since
it has no use outside of win32.c. The psuedo-PID code in win32_kill also
played a factor in not writing a separate win32_killpg that calls
my_killpg. This fix is tested by kill0.t passing on
no-PERL_IMPLICIT_SYS builds.
[perl #121230]
Diffstat (limited to 'win32/win32.h')
| -rw-r--r-- | win32/win32.h | 1 |
1 files changed, 0 insertions, 1 deletions
diff --git a/win32/win32.h b/win32/win32.h index 3d1655a929..e109939070 100644 --- a/win32/win32.h +++ b/win32/win32.h @@ -322,7 +322,6 @@ extern gid_t getegid(void); extern int setuid(uid_t uid); extern int setgid(gid_t gid); extern int kill(int pid, int sig); -extern int killpg(int pid, int sig); #ifndef USE_PERL_SBRK extern void *sbrk(ptrdiff_t need); # define HAS_SBRK_PROTO |