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



kargl at gcc dot gnu.org changed:



           What    |Removed                     |Added

----------------------------------------------------------------------------

                 CC|                            |kargl at gcc dot gnu.org



--- Comment #1 from kargl at gcc dot gnu.org 2012-11-02 02:57:36 UTC ---

(In reply to comment #0)

> This 4-line Fortran program has an error at line 3, where array(*) is of 
> course

> not permitted as an argument of a function.

> 

> implicit none

> integer:: array(2)=(/42,666/)

> print *, size(array(*))

> end

> 

> Other compilers (g95, ifort) correctly diagnose the error but gfortran 4.8.0 

> gives an internal compiler error: Segmentation fault and asks me to tell you.

> My compile-time output follows.

> 

> cayley[~/Jfh] % /local/scratch/gf/bin/gfortran -v trybadstar.f90

> Driving: /local/scratch/gf/bin/gfortran -v trybadstar.f90 -l gfortran -l m

> -shared-libgcc

> Using built-in specs.

> COLLECT_GCC=/local/scratch/gf/bin/gfortran

> COLLECT_LTO_WRAPPER=/local/scratch/gf/libexec/gcc/i686-pc-linux-gnu/4.8.0/lto-wrapper

> Target: i686-pc-linux-gnu

> Configured with: /local/scratch/gcc-4.8-20120701/configure

> --prefix=/local/scratch/gf --enable-languages=c,fortran --disable-libada

> --with-local-prefix=/local/scratch --with-gmp=/local/scratch

> Thread model: posix

> gcc version 4.8.0 20120701 (experimental) (GCC) 



John,



It looks like it has been fixed on trunk (aka 4.8.0).

For me, gfc4x is 4.8.0 20121002.  gfortran 4.5.x 

seems to also work, so it appears that a regression

crept in in the 4.6. development.



troutmask:sgk[209] gfc4x -o z k.f90

k.f90:2.20:



print *, size(array(*))

                    1

Error: Expected array subscript at (1)

troutmask:sgk[210] gfc47 -o z k.f90

f951: internal compiler error: Segmentation fault: 11

Please submit a full bug report,

with preprocessed source if appropriate.

See <http://gcc.gnu.org/bugs.html> for instructions.

troutmask:sgk[211] gfc46 -o z k.f90

f951: internal compiler error: Segmentation fault: 11

Please submit a full bug report,

with preprocessed source if appropriate.

See <http://gcc.gnu.org/bugs.html> for instructions.

troutmask:sgk[212] gfc45 -o z k.f90

k.f90:2.20:



print *, size(array(*))

                    1

Error: Expected array subscript at (1)



A quick scan of gcc/fortran/ChangeLog did not reveal

an obvious candidate for the revision that fixed the

problem.  We should probably add your test to the

testsuite to make sure it does not get broken, again.

Reply via email to