------- Comment #4 from janus at gcc dot gnu dot org 2009-07-14 13:20 -------
Here is a minimal test case:
implicit none
type :: varying_string
end type
interface assignment(=)
procedure op_assign_VS_CH
end interface
contains
subroutine op_assign_VS_CH (var, exp)
type(varying_string), intent(out) :: var
character(LEN=*), intent(in) :: exp
end subroutine
subroutine split_VS
type(varying_string) :: string
call split_CH(string)
end subroutine
subroutine split_CH (string)
type(varying_string) :: string
string = ""
end subroutine
end
--
janus at gcc dot gnu dot org changed:
What |Removed |Added
----------------------------------------------------------------------------
Status|UNCONFIRMED |NEW
Ever Confirmed|0 |1
Last reconfirmed|0000-00-00 00:00:00 |2009-07-14 13:20:29
date| |
http://gcc.gnu.org/bugzilla/show_bug.cgi?id=40743
