develooper Front page | perl.perl5.porters | Postings from August 2001

SV: HPUX 10.20

Thread Previous
From:
Arthur Bergman
Date:
August 31, 2001 11:28
Subject:
SV: HPUX 10.20
Message ID:
01a001c1324b$a1c0fd00$052aa8c0@foo
> 
> I don't know how to check what perl has taken to represent bool, but just
> tried SAVEI8:
> --8<---
> --- /l1/pro/3gl/CPAN/perl-current/regcomp.c     Thu Aug 30 16:08:27 2001
> +++ /k1/pro/3gl/CPAN/perl-current/regcomp.c     Fri Aug 31 17:30:10 2001
> @@ -4735,7 +4735,7 @@
>      SAVEVPTR(PL_reg_re);               /* from regexec.c */
>      SAVEPPTR(PL_reg_ganch);            /* from regexec.c */
>      SAVESPTR(PL_reg_sv);               /* from regexec.c */
> -    SAVEI32(PL_reg_sv_utf8);           /* from regexec.c */
> +    SAVEI8(PL_reg_sv_utf8);            /* from regexec.c */
>      SAVEVPTR(PL_reg_magic);            /* from regexec.c */
>      SAVEI32(PL_reg_oldpos);                    /* from regexec.c */
>      SAVEVPTR(PL_reg_oldcurpm);         /* from regexec.c */
> -->8---
> 
> Failed 1 test script out of 429, 99.77% okay.
> u=5.35  s=1.7  cu=315.11  cs=27.06  scripts=429  tests=25464
> 
> The failed one is: lib/File/Find/taint................FAILED at test 29
>
> Please someone put this through the correct way, before 22:25, so we've no
> more 'm's tomorrow.
> 

Ok, I will apply it, it might break platforms where bool is not 8?
Maybe we need a SAVEBOOL ?

I posted to Thomas Wegner about the file find problems.

Arthur




Thread Previous


nntp.perl.org: Perl Programming lists via nntp and http.
Comments to Ask Bjørn Hansen at ask@perl.org | Group listing | About