[Bug fortran/34897] New: Invalid array bound in specification block causes ICE

[pault at gcc dot gnu dot org]

>From the old version of gfortran.dg/mapping_2.f90

      function my_string(x)
         integer i
         real, intent(in) :: x(:)
         character(0) h4(1:minval([(1,i=1,0)],1)) ! If range is 1,0 bombs out.
         character(0) sv1(size(x,1):size(h4))
         character(0) sv2(2*lbound(sv1,1):size(h4))
         character(lbound(sv2,1)-3) my_string
      end function my_string


causes

mapping_2.f90: In function ‘my_string’:
mapping_2.f90:1: warning: Function does not return a value
mapping_2.f90:4: internal compiler error: in gfc_typenode_for_spec, at
fortran/trans-types.c:842
Please submit a full bug report,
with preprocessed source if appropriate.
See <http://gcc.gnu.org/bugs.html> for instructions.


-- 
           Summary: Invalid array bound in specification block causes ICE
           Product: gcc
           Version: 4.3.0
            Status: UNCONFIRMED
          Keywords: ice-on-invalid-code
          Severity: normal
          Priority: P3
         Component: fortran
        AssignedTo: unassigned at gcc dot gnu dot org
        ReportedBy: pault at gcc dot gnu dot org


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