An ICE occurs when compiling this routine. The printed line number
is incorrect - lies outside the routine, so I don't know which line.
the diagnostic is:
alloc.F90: In function 'dealloc_s1':
alloc.F90:1186: internal compiler error: in gfc_conv_descriptor_data, at
fortran/trans-array.c:181
SUBROUTINE dealloc_s1( array, name, routine )
implicit none
character(len=*), dimension(:), pointer :: array
character(len=*), optional, intent(in) :: name, routine
if (associated(array)) then
call count( -size(array)*len(array), 'S', name, routine )
deallocate(array)
end if
END SUBROUTINE dealloc_s1
--
Summary: ICE, allocated array
Product: gcc
Version: 4.0.0
Status: UNCONFIRMED
Severity: normal
Priority: P2
Component: fortran
AssignedTo: unassigned at gcc dot gnu dot org
ReportedBy: gay at sfu dot ca
CC: gcc-bugs at gcc dot gnu dot org
http://gcc.gnu.org/bugzilla/show_bug.cgi?id=19617
