[Bug fortran/33636] Rejects valid use of vector subscript in derived type parameter

[dominiq at lps dot ens dot fr]

------- Comment #1 from dominiq at lps dot ens dot fr  2007-10-03 13:03 -------
On PPC Darwin, I get:

[karma] f90/bug% gfc pr33636.f90
[karma] f90/bug% a.out
           0
[karma] f90/bug% gfc -m64 pr33636.f90
[karma] f90/bug% a.out
           0
[karma] f90/bug% gfc
/opt/gcc/_gcc-clean/gcc/testsuite/gfortran.dg/derived_comp_array_ref_5.f90
/opt/gcc/_gcc-clean/gcc/testsuite/gfortran.dg/derived_comp_array_ref_5.f90:34.28:

      v2 = vec3 (v1%coords ((/i+1, i, i-1/))) ! also broken
                           1
Error: index in dimension 1 is out of bounds at (1)
[karma] f90/bug% gfc -m64
/opt/gcc/_gcc-clean/gcc/testsuite/gfortran.dg/derived_comp_array_ref_5.f90
[karma] f90/bug% a.out 
[karma] f90/bug% 

i.e., the test case of this PR compiles for both 32 and 64 bit modes for gcc
version 4.3.0 20071002, while derived_comp_array_ref_5.f90 compiles only in 64
bit mode (wrong cast somewhere?-)


-- 


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