Use Pid_t.

p4raw-id: //depot/cfgperl@3950

1 files changed, 1 insertions, 1 deletions

diff --git a/doio.c b/doio.c
index 838d67f0ef..cc347331a2 100644
--- a/doio.c
+++ b/doio.c
@@ -413,7 +413,7 @@ Perl_do_open9(pTHX_ GV *gv, register char *name, I32 len, int as_raw,
 	    }
 	}
 	if (fd != PerlIO_fileno(fp)) {
-	    int pid;
+	    Pid_t pid;
 	    SV *sv;
 
 	    PerlLIO_dup2(PerlIO_fileno(fp), fd);