This is a live mirror of the Perl 5 development currently hosted at https://github.com/perl/perl5
Change 25850 failed to include all changed headers
authorNicholas Clark <nick@ccl4.org>
Thu, 27 Oct 2005 08:53:03 +0000 (08:53 +0000)
committerNicholas Clark <nick@ccl4.org>
Thu, 27 Oct 2005 08:53:03 +0000 (08:53 +0000)
p4raw-id: //depot/perl@25860

embed.h
proto.h

diff --git a/embed.h b/embed.h
index d39d4c2..5062f37 100644 (file)
--- a/embed.h
+++ b/embed.h
 #define require_pv             Perl_require_pv
 #define pack_cat               Perl_pack_cat
 #define packlist               Perl_packlist
+#ifdef PERL_USES_PL_PIDSTATUS
 #ifdef PERL_CORE
 #define pidgone                        Perl_pidgone
 #endif
+#endif
 #define pmflag                 Perl_pmflag
 #ifdef PERL_CORE
 #define pmruntime              Perl_pmruntime
 #define require_pv(a)          Perl_require_pv(aTHX_ a)
 #define pack_cat(a,b,c,d,e,f,g)        Perl_pack_cat(aTHX_ a,b,c,d,e,f,g)
 #define packlist(a,b,c,d,e)    Perl_packlist(aTHX_ a,b,c,d,e)
+#ifdef PERL_USES_PL_PIDSTATUS
 #ifdef PERL_CORE
 #define pidgone(a,b)           Perl_pidgone(aTHX_ a,b)
 #endif
+#endif
 #define pmflag(a,b)            Perl_pmflag(aTHX_ a,b)
 #ifdef PERL_CORE
 #define pmruntime(a,b,c)       Perl_pmruntime(aTHX_ a,b,c)
diff --git a/proto.h b/proto.h
index 0839945..3bdecd8 100644 (file)
--- a/proto.h
+++ b/proto.h
@@ -1717,7 +1717,9 @@ PERL_CALLCONV void        Perl_packlist(pTHX_ SV *cat, const char *pat, const char *pat
                        __attribute__nonnull__(pTHX_4)
                        __attribute__nonnull__(pTHX_5);
 
+#ifdef PERL_USES_PL_PIDSTATUS
 PERL_CALLCONV void     Perl_pidgone(pTHX_ Pid_t pid, int status);
+#endif
 PERL_CALLCONV void     Perl_pmflag(pTHX_ U32* pmfl, int ch)
                        __attribute__nonnull__(pTHX_1);