diff options
author | Craig A. Berry <craigberry@mac.com> | 2003-04-13 19:43:00 -0500 |
---|---|---|
committer | H.Merijn Brand <h.m.brand@xs4all.nl> | 2003-04-14 05:42:18 +0000 |
commit | 119586db753fab6875f9973c20a57e0d66dbfbcf (patch) | |
tree | f34f113f066e3f2460cc4491f79993ae7a168ee9 /vms | |
parent | 47cb5ff94030e4ad02be93d8c9632645ac553a43 (diff) | |
download | perl-119586db753fab6875f9973c20a57e0d66dbfbcf.tar.gz |
vms/vms.c waitpid tweak
From: "Craig A. Berry" <craigberry@mac.com>
Message-ID: <3E9A4A64.6030205@mac.com>
p4raw-id: //depot/perl@19202
Diffstat (limited to 'vms')
-rw-r--r-- | vms/vms.c | 6 |
1 files changed, 3 insertions, 3 deletions
@@ -2752,7 +2752,7 @@ I32 Perl_my_pclose(pTHX_ PerlIO *fp) } /* end of my_pclose() */ -#if defined(__CRTL_VER) && __CRTL_VER >= 70100322 +#if defined(__CRTL_VER) && __CRTL_VER >= 70200000 /* Roll our own prototype because we want this regardless of whether * _VMS_WAIT is defined. */ @@ -2801,7 +2801,7 @@ Perl_my_waitpid(pTHX_ Pid_t pid, int *statusp, int flags) /* fall through if this child is not one of our own pipe children */ -#if defined(__CRTL_VER) && __CRTL_VER >= 70100322 +#if defined(__CRTL_VER) && __CRTL_VER >= 70200000 /* waitpid() became available in the CRTL as of VMS 7.0, but only * in 7.2 did we get a version that fills in the VMS completion @@ -2820,7 +2820,7 @@ Perl_my_waitpid(pTHX_ Pid_t pid, int *statusp, int flags) * of the current process. */ -#endif /* defined(__CRTL_VER) && __CRTL_VER >= 70100322 */ +#endif /* defined(__CRTL_VER) && __CRTL_VER >= 70200000 */ { $DESCRIPTOR(intdsc,"0 00:00:01"); |