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
Perl · Apr 29, 2008 · 40c7cc6 · 40c7cc6
1 parent ad3a8c6
commit 40c7cc6
Showing 1 changed file with 2 additions and 4 deletions.
diff --git 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) {