------- 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

Reply via email to