On Mon, 18 Jul 2005 18:10:27 +0200, Campo Weijerman <[EMAIL PROTECTED]> wrote:

> On Fri, Jul 15, 2005 at 02:32:50AM -0700, Gisle Aas wrote:
> > +#ifdef HAS_DIRFD
> > +           PUSHi(fchdir(dirfd(IoDIRP(io))) >= 0);
> > +#else
> > +           DIE(aTHX PL_no_func, "dirfd");
> > +#endif
> 
> This might explain the smoke failures I was having on AIX, starting
> from 25157.  (last successful make was 25150)

No, it does not. It just uncovered a bug in Configure, which I fixed in
25169, and the test case in 25170

> Perhaps I haven't looked hard enough, but there doesn't seem to be a
> dirfd() on AIX, and Configure agrees:
> 
> $ ./Configure -Dusedevel -des
> [...]
> dirfd() NOT found.
> [...]
> 
> $ grep -i dirfd conf*
> config.h:/* HAS_DIRFD:
> config.h: *     This manifest constant lets the C program know that dirfd
> config.h:/*#define HAS_DIRFD            / **/
> config.sh:d_dirfd='undef'
> config_h.SH:/* HAS_DIRFD:
> config_h.SH: *  This manifest constant lets the C program know that dirfd
> config_h.SH:#$d_dirfd HAS_DIRFD         /**/
> configure.com:$ WC "d_dirfd='undef'"
> 
> $ make
> [...]
> ld: 0711-317 ERROR: Undefined symbol: .dirfd
> 
> But:
> 
> $ ./Configure -Dusedevel -Ud_dirfd -des
> 
> Works allright...
> 
> So what's going on here?


-- 
H.Merijn Brand        Amsterdam Perl Mongers (http://amsterdam.pm.org/)
using Perl 5.6.2, 5.8.0, 5.8.5, & 5.9.2  on HP-UX 10.20, 11.00 & 11.11,
 AIX 4.3 & 5.2, SuSE 9.2 & 9.3, and Cygwin. http://www.cmve.net/~merijn
Smoking perl: http://www.test-smoke.org,    perl QA: http://qa.perl.org
 reports  to: [EMAIL PROTECTED],                perl-qa@perl.org

Reply via email to