: fortran
Assignee: unassigned at gcc dot gnu.org
Reporter: kergonath at me dot com
Target Milestone: ---
When compiled with -fcheck=all, the included code crashes with the following
error message:
At line 16 of file foo.f90
Fortran runtime error: Recursive call to nonrecursive
http://gcc.gnu.org/bugzilla/show_bug.cgi?id=60795
--- Comment #4 from Kergonath ---
The slightly modified version:
module m
contains
subroutine allocate_array(s_array)
character(:), dimension(:), allocatable, intent(out) :: s_array
allocate(character(2) :: s_array(10))
: fortran
Assignee: unassigned at gcc dot gnu.org
Reporter: kergonath at me dot com
In the following program:
program stringtest
character(:), dimension(:), allocatable :: s
allocate(character(1) :: s(10))
write(*,*) size(s)
write(*,*) len(s)
end program
the elements of the
