attached code fails with: 
 
parabrisas% gfortran -c -g bug3.F90 
bug3.F90: In function 'de': 
bug3.F90:1: internal compiler error: in gfc_conv_descriptor_data, at 
fortran/trans-array.c:183 
Please submit a full bug report, 
with preprocessed source if appropriate. 
 
parabrisas% cat bug3.F90 
SUBROUTINE de( array ) 
character(len=*), dimension(:), pointer :: array 
logical :: a 
a = associated(array)  
END SUBROUTINE de 
 
 
This is probably related to PR 17202, but is not the same. (in this, the 
strings are assumed length, and the ICE is in a different routine.)

-- 
           Summary: ICE in gfc_conv_descriptor_data with character array
                    pointer.
           Product: gcc
           Version: 4.0.0
            Status: UNCONFIRMED
          Severity: normal
          Priority: P2
         Component: fortran
        AssignedTo: unassigned at gcc dot gnu dot org
        ReportedBy: tow21 at cam dot ac dot uk
                CC: gcc-bugs at gcc dot gnu dot org


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

Reply via email to