The following generates an ICE with gfortran 4.3.5, 4.4.3, 4.4.5, and 4.5.1.
Version 4.4.3 was checked on Ubuntu 10.04. The rest were checked on 10.10.

foo_fail.f90:
module foo
       implicit none
       real :: a
       pointer(c_a, a)
end module foo

gfortran -fcray-pointer -c foo_fail.f90
f951: internal compiler error: backend decl for module variable c_a already
exists

However, if a is changed to x (or any letter which results in the variable
being alphabetically after the cray pointer name), the file compiles fine. 

foo_works.f90
module foo
       implicit none
       real :: x
       pointer(c_x, x)
end module foo

gfortran -fcray-pointer -c foo_works.f90

In both cases, a .mod is generated. If module is changed to subroutine, both
cases compile fine.


gcc -v:
Target: i686-linux-gnu
Configured with: ../src/configure -v --with-pkgversion='Ubuntu/Linaro
4.4.4-8ubuntu1' --with-bugurl=file:///usr/share/doc/gcc-4.4/README.Bugs
--enable-languages=c,c++,fortran,objc,obj-c++ --prefix=/usr --enable-shared
--enable-multiarch --enable-linker-build-id --with-system-zlib
--libexecdir=/usr/lib --without-included-gettext --enable-threads=posix
--with-gxx-include-dir=/usr/include/c++/4.4 --program-suffix=-4.4 --enable-nls
--with-sysroot=/ --enable-clocale=gnu --enable-libstdcxx-debug --enable-objc-gc
--enable-targets=all --disable-werror --with-arch-32=i686 --with-tune=generic
--enable-checking=release --build=i686-linux-gnu --host=i686-linux-gnu
--target=i686-linux-gnu
Thread model: posix
gcc version 4.4.5 20100728 (prerelease) (Ubuntu/Linaro 4.4.4-8ubuntu1)


-- 
           Summary: ICE with CRAY pointer in module depending on variable
                    name
           Product: gcc
           Version: unknown
            Status: UNCONFIRMED
          Severity: normal
          Priority: P3
         Component: fortran
        AssignedTo: unassigned at gcc dot gnu dot org
        ReportedBy: billy dot baker at cox dot net


http://gcc.gnu.org/bugzilla/show_bug.cgi?id=45187

Reply via email to