------- Comment #5 from mikael at gcc dot gnu dot org 2008-12-22 18:51 ------- Reduced: program test_iso implicit none
type varying_string character(LEN=1), dimension(:), allocatable :: chars end type varying_string CALL get_unit_set_ch () contains subroutine get_unit_set_CH (separator) type(varying_string), intent(out), optional :: separator end subroutine get_unit_set_CH end -- http://gcc.gnu.org/bugzilla/show_bug.cgi?id=38602