Bug#688974: perl: Ambiguous use of operator warning when requiring sys/cdefs.ph

[James Davidson]

Package: perl
Version: 5.10.1-17squeeze3
Severity: minor

When sys/cdefs.ph is pulled in through a require (e.g., sys/ioctl.ph)
an abmiguous use of operator warning is produced:

Trivial reproduction:

$ perl -w -e "require 'sys/cdefs.ph';" 
Operator or semicolon missing before &__inline at (eval 103) line 1.
Ambiguous use of & resolved as operator & at (eval 103) line 1.

The following patch removes the specific warning seen, however, there
are likely other areas in this file that need similar treatment.

--- cdefs.ph.orig       2012-09-27 16:53:25.079999806 +0000
+++ cdefs.ph    2012-09-27 16:59:57.100001743 +0000
@@ -261,7 +261,7 @@
                eval 'sub __extern_always_inline () { &extern  &__always_inline  &__attribute__ (( &__gnu_inline__));}' unless defined(&__extern_always_inline);
            }
        } else {
-           eval 'sub __extern_inline () { &extern  &__inline;}' unless defined(&__extern_inline);
+           eval 'sub __extern_inline () { &extern  (&__inline);}' unless defined(&__extern_inline);
            if( &__GNUC_PREREQ (4,3)) {
                eval 'sub __extern_always_inline () { &extern  &__always_inline  &__attribute__ (( &__artificial__));}' unless defined(&__extern_always_inline);
            } else {


-- System Information:

Debian Release: 6.0.5
  APT prefers stable-updates
  APT policy: (500, 'stable-updates'), (500, 'oldstable'), (500, 'stable')
Architecture: amd64 (x86_64)

Kernel: Linux 2.6.32-5-amd64 (SMP w/3 CPU cores)
Locale: LANG=en_US.UTF-8, LC_CTYPE=en_US.UTF-8 (charmap=UTF-8)
Shell: /bin/sh linked to /bin/dash

Versions of packages perl depends on:
ii  libbz2-1.0             1.0.5-6+squeeze1  high-quality block-sorting file co
ii  libc6                  2.11.3-3          Embedded GNU C Library: Shared lib
ii  libdb4.7               4.7.25-9          Berkeley v4.7 Database Libraries [
ii  libgdbm3               1.8.3-9           GNU dbm database routines (runtime
ii  perl-base              5.10.1-17squeeze3 minimal Perl system
ii  perl-modules           5.10.1-17squeeze3 Core Perl modules
ii  zlib1g                 1:1.2.3.4.dfsg-3  compression library - runtime

Versions of packages perl recommends:
ii  netbase                       4.45       Basic TCP/IP networking system

Versions of packages perl suggests:
pn  libterm-readline-gnu-perl | l <none>     (no description available)
ii  make                          3.81-8     An utility for Directing compilati
pn  perl-doc                      <none>     (no description available)

-- no debconf information