diff options
author | Gurusamy Sarathy <gsar@cpan.org> | 2000-07-11 17:42:04 +0000 |
---|---|---|
committer | Gurusamy Sarathy <gsar@cpan.org> | 2000-07-11 17:42:04 +0000 |
commit | 9d8fd706bc0a9872712899ee2dadb932fa21142a (patch) | |
tree | 2294f09adaee42fb5263353788bf81563c38eb0d /vmesa | |
parent | 153141c23cb8c100f3a68211170e1ecf65713557 (diff) | |
download | perl-9d8fd706bc0a9872712899ee2dadb932fa21142a.tar.gz |
integrate cfgperl change#6217 into mainline
p4raw-link: @6217 on //depot/cfgperl: cc9b67681954df413fe79f7c379e7b91a3121259
p4raw-id: //depot/perl@6347
Diffstat (limited to 'vmesa')
-rw-r--r-- | vmesa/vmesa.c | 16 |
1 files changed, 8 insertions, 8 deletions
diff --git a/vmesa/vmesa.c b/vmesa/vmesa.c index b39638086f..0e4ad86682 100644 --- a/vmesa/vmesa.c +++ b/vmesa/vmesa.c @@ -182,13 +182,13 @@ do_aspawn(SV* really, SV **mark, SV **sp) /* be used by my_pclose */ /*---------------------------------------------*/ close(fd); - FDPID_LOCK; + MUTEX_LOCK(&PL_fdpid_mutex); p_sv = av_fetch(PL_fdpid,fd,TRUE); fd = (int) SvIVX(*p_sv); SvREFCNT_dec(*p_sv); *p_sv = &PL_sv_undef; sv = *av_fetch(PL_fdpid,fd,TRUE); - FDPID_UNLOCK; + MUTEX_UNLOCK(&PL_fdpid_mutex); (void) SvUPGRADE(sv, SVt_IV); SvIVX(sv) = pid; status = 0; @@ -414,9 +414,9 @@ my_popen(char *cmd, char *mode) pid = spawn_cmd(cmd, Perl_stdin_fd, Perl_stdout_fd); if (pid >= 0) { - FDPID_LOCK; + MUTEX_LOCK(&PL_fdpid_mutex); sv = *av_fetch(PL_fdpid,pFd[this],TRUE); - FDPID_UNLOCK; + MUTEX_UNLOCK(&PL_fdpid_mutex); (void) SvUPGRADE(sv, SVt_IV); SvIVX(sv) = pid; fd = PerlIO_fdopen(pFd[this], mode); @@ -427,9 +427,9 @@ my_popen(char *cmd, char *mode) } else { - FDPID_LOCK; + MUTEX_LOCK(&PL_fdpid_mutex); sv = *av_fetch(PL_fdpid,pFd[that],TRUE); - FDPID_UNLOCK; + MUTEX_UNLOCK(&PL_fdpid_mutex); (void) SvUPGRADE(sv, SVt_IV); SvIVX(sv) = pFd[this]; fd = PerlIO_fdopen(pFd[this], mode); @@ -466,9 +466,9 @@ my_pclose(FILE *fp) SV **sv; FILE *other; - FDPID_LOCK; + MUTEX_LOCK(&PL_fdpid_mutex); sv = av_fetch(PL_fdpid,PerlIO_fileno(fp),TRUE); - FDPID_UNLOCK; + MUTEX_UNLOCK(&PL_fdpid_mutex); pid = (int) SvIVX(*sv); SvREFCNT_dec(*sv); *sv = &PL_sv_undef; |