Your message dated Thu, 18 Oct 2007 13:47:09 +0000 with message-id <[EMAIL PROTECTED]> and subject line Bug#443785: fixed in perl 5.8.8-11.1 has caused the attached Bug report to be marked as done.
This means that you claim that the problem has been dealt with. If this is not the case it is now your responsibility to reopen the Bug report if necessary, and/or fix the problem forthwith. (NB: If you are a system administrator and have no idea what I am talking about this indicates a serious mail system misconfiguration somewhere. Please contact me immediately.) Debian bug tracking system administrator (administrator, Debian Bugs database)
--- Begin Message ---Package: perl Version: 5.8.8-11 Severity: serious h2ph does not translate "#if defined __x86_64__" correctly; it translates it as: if(defined (defined(&__x86_64__) ? &__x86_64__ : 0)) { This is always true. Upstream has fixed this problem by changing the 0 to undef, which fixes the problem. I've attached the patch. This is serious because this bug prevents dbishell from building. The above test causes it to think that an i386 system is a 64-bit system, which causes it to try to include stubs-64.ph, which doesn't exist. -- Mattdiff -ru perl-5.8.8~/t/lib/h2ph.pht perl-5.8.8/t/lib/h2ph.pht --- perl-5.8.8~/t/lib/h2ph.pht 2007-09-23 20:26:44.000000000 -0700 +++ perl-5.8.8/t/lib/h2ph.pht 2007-09-23 21:01:48.000000000 -0700 @@ -28,21 +28,21 @@ eval q((($a) < ($b) ? ($a) : ($b))); }' unless defined(&MIN); } - if(!(defined (defined(&__SOMETHING_MORE_IMPORTANT) ? &__SOMETHING_MORE_IMPORTANT : 0))) { + if(!(defined (defined(&__SOMETHING_MORE_IMPORTANT) ? &__SOMETHING_MORE_IMPORTANT : undef))) { } - elsif(!(defined (defined(&__SOMETHING_REALLY_REALLY_IMPORTANT) ? &__SOMETHING_REALLY_REALLY_IMPORTANT : 0))) { + elsif(!(defined (defined(&__SOMETHING_REALLY_REALLY_IMPORTANT) ? &__SOMETHING_REALLY_REALLY_IMPORTANT : undef))) { die("Nup, can't go on"); } else { eval 'sub EVERYTHING_IS_OK () {1;}' unless defined(&EVERYTHING_IS_OK); } undef(&WHATEVER) if defined(&WHATEVER); - if((!((defined (defined(&__SOMETHING_TRIVIAL) ? &__SOMETHING_TRIVIAL : 0) && defined (defined(&__SOMETHING_LESS_SO) ? &__SOMETHING_LESS_SO : 0))) || defined (defined(&__SOMETHING_OVERPOWERING) ? &__SOMETHING_OVERPOWERING : 0))) { + if((!((defined (defined(&__SOMETHING_TRIVIAL) ? &__SOMETHING_TRIVIAL : undef) && defined (defined(&__SOMETHING_LESS_SO) ? &__SOMETHING_LESS_SO : undef))) || defined (defined(&__SOMETHING_OVERPOWERING) ? &__SOMETHING_OVERPOWERING : undef))) { eval 'sub WHATEVER () {6;}' unless defined(&WHATEVER); } - elsif(!(defined (defined(&__SOMETHING_TRIVIAL) ? &__SOMETHING_TRIVIAL : 0)) ) { + elsif(!(defined (defined(&__SOMETHING_TRIVIAL) ? &__SOMETHING_TRIVIAL : undef)) ) { eval 'sub WHATEVER () {7;}' unless defined(&WHATEVER); } - elsif(!(defined (defined(&__SOMETHING_LESS_SO) ? &__SOMETHING_LESS_SO : 0)) ) { + elsif(!(defined (defined(&__SOMETHING_LESS_SO) ? &__SOMETHING_LESS_SO : undef)) ) { eval 'sub WHATEVER () {8;}' unless defined(&WHATEVER); } else { eval 'sub WHATEVER () {1000;}' unless defined(&WHATEVER); diff -ru perl-5.8.8~/utils/h2ph.PL perl-5.8.8/utils/h2ph.PL --- perl-5.8.8~/utils/h2ph.PL 2007-09-23 20:26:44.000000000 -0700 +++ perl-5.8.8/utils/h2ph.PL 2007-09-23 20:41:45.000000000 -0700 @@ -514,7 +514,7 @@ } } else { if ($inif && $new !~ /defined\s*\($/) { - $new .= '(defined(&' . $id . ') ? &' . $id . ' : 0)'; + $new .= '(defined(&' . $id . ') ? &' . $id . ' : undef)'; } elsif (/^\[/) { $new .= " \$$id"; } else {
--- End Message ---
--- Begin Message ---Source: perl Source-Version: 5.8.8-11.1 We believe that the bug you reported is fixed in the latest version of perl, which is due to be installed in the Debian FTP archive: libcgi-fast-perl_5.8.8-11.1_all.deb to pool/main/p/perl/libcgi-fast-perl_5.8.8-11.1_all.deb libperl-dev_5.8.8-11.1_i386.deb to pool/main/p/perl/libperl-dev_5.8.8-11.1_i386.deb libperl5.8_5.8.8-11.1_i386.deb to pool/main/p/perl/libperl5.8_5.8.8-11.1_i386.deb perl-base_5.8.8-11.1_i386.deb to pool/main/p/perl/perl-base_5.8.8-11.1_i386.deb perl-debug_5.8.8-11.1_i386.deb to pool/main/p/perl/perl-debug_5.8.8-11.1_i386.deb perl-doc_5.8.8-11.1_all.deb to pool/main/p/perl/perl-doc_5.8.8-11.1_all.deb perl-modules_5.8.8-11.1_all.deb to pool/main/p/perl/perl-modules_5.8.8-11.1_all.deb perl-suid_5.8.8-11.1_i386.deb to pool/main/p/perl/perl-suid_5.8.8-11.1_i386.deb perl_5.8.8-11.1.diff.gz to pool/main/p/perl/perl_5.8.8-11.1.diff.gz perl_5.8.8-11.1.dsc to pool/main/p/perl/perl_5.8.8-11.1.dsc perl_5.8.8-11.1_i386.deb to pool/main/p/perl/perl_5.8.8-11.1_i386.deb A summary of the changes between this version and the previous one is attached. Thank you for reporting the bug, which will now be closed. If you have further comments please address them to [EMAIL PROTECTED], and the maintainer will reopen the bug report if appropriate. Debian distribution maintenance software pp. Faidon Liambotis <[EMAIL PROTECTED]> (supplier of updated perl package) (This message was generated automatically at their request; if you believe that there is a problem with it please contact the archive administrators by mailing [EMAIL PROTECTED]) -----BEGIN PGP SIGNED MESSAGE----- Hash: SHA1 Format: 1.7 Date: Wed, 17 Oct 2007 16:26:33 +0300 Source: perl Binary: perl-base libcgi-fast-perl libperl-dev perl-debug perl-modules perl libperl5.8 perl-suid perl-doc Architecture: source i386 all Version: 5.8.8-11.1 Distribution: unstable Urgency: high Maintainer: Brendan O'Dea <[EMAIL PROTECTED]> Changed-By: Faidon Liambotis <[EMAIL PROTECTED]> Description: libcgi-fast-perl - CGI::Fast Perl module libperl-dev - Perl library: development files libperl5.8 - Shared Perl library perl - Larry Wall's Practical Extraction and Report Language perl-base - The Pathologically Eclectic Rubbish Lister perl-debug - Debug-enabled Perl interpreter perl-doc - Perl documentation perl-modules - Core Perl modules perl-suid - Runs setuid Perl scripts Closes: 443785 Changes: perl (5.8.8-11.1) unstable; urgency=high . * Non-maintainer upload. * Urgency high because of RC bug fix. * Fix h2ph to generate a correct check to distinguish i386/amd64 systems. (Closes: #443785) Files: 9cc5327eee3ff6af9b4fecbcfa478eec 738 perl standard perl_5.8.8-11.1.dsc c91246071558cfe9b89e96f4287d5eac 103223 perl standard perl_5.8.8-11.1.diff.gz 4a4c6fdb5e173e0374146a229443ea84 41436 perl optional libcgi-fast-perl_5.8.8-11.1_all.deb 07c0e5d68740b219774ff2ca1836d52e 7356130 doc optional perl-doc_5.8.8-11.1_all.deb ea569754fa339a7ce33f691b3f837124 2299798 perl standard perl-modules_5.8.8-11.1_all.deb 8b22eb856699766e768cfd89a4ddf560 774196 perl required perl-base_5.8.8-11.1_i386.deb 0758290047384aec68c72f8785aada34 2723412 perl optional perl-debug_5.8.8-11.1_i386.deb 814924480080094f4918576fa6fe90ca 31572 perl optional perl-suid_5.8.8-11.1_i386.deb 7f4256baa5827c2e2ae2e2dc627740f8 532028 libs optional libperl5.8_5.8.8-11.1_i386.deb fd1aff5795194a5485827198b32ec39e 573720 libdevel optional libperl-dev_5.8.8-11.1_i386.deb 58e3b76d0360c95dd8f468db093d2527 3378158 perl standard perl_5.8.8-11.1_i386.deb -----BEGIN PGP SIGNATURE----- Version: GnuPG v1.4.6 (GNU/Linux) iD8DBQFHF2HiVty5d8XpUzMRAoZqAKCBrl1E59BgLvYM+JBCCSjkauOnZACfaCnL eahdourn1Njg34adHkBPKNk= =qlWM -----END PGP SIGNATURE-----
--- End Message ---
