Win32 process ids can have more than 16 bits

From: "Jan Dubois" <jand@activestate.com>
Message-ID: <01be01c8a9d1$12b32b10$38198130$@com>

p4raw-id: //depot/perl@33763

diff --git a/win32/win32.c b/win32/win32.c
index 5a0dde3..0673fc2 100644 (file)
--- a/win32/win32.c
+++ b/win32/win32.c
@@ -665,8 +665,7 @@ Perl_do_aspawn(pTHX_ SV *really, SV **mark, SV **sp)
     }
 
     if (flag == P_NOWAIT) {
-       if (IsWin95())
-           PL_statusvalue = -1;        /* >16bits hint for pp_system() */
+       PL_statusvalue = -1;    /* >16bits hint for pp_system() */
     }
     else {
        if (status < 0) {
@@ -779,8 +778,7 @@ do_spawn2(pTHX_ const char *cmd, int exectype)
        Safefree(argv);
     }
     if (exectype == EXECF_SPAWN_NOWAIT) {
-       if (IsWin95())
-           PL_statusvalue = -1;        /* >16bits hint for pp_system() */
+       PL_statusvalue = -1;    /* >16bits hint for pp_system() */
     }
     else {
        if (status < 0) {