--- Comment #5 from fxcoudert at gcc dot gnu dot org 2007-05-04 16:20
---
Subject: Bug 31210
Author: fxcoudert
Date: Fri May 4 15:20:17 2007
New Revision: 124429
URL: http://gcc.gnu.org/viewcvs?root=gcc&view=rev&rev=124429
Log:
PR libfortran/31210
* gfortran.dg/zero_l
--- Comment #4 from fxcoudert at gcc dot gnu dot org 2007-05-04 16:14
---
Subject: Bug 31210
Author: fxcoudert
Date: Fri May 4 15:14:07 2007
New Revision: 124428
URL: http://gcc.gnu.org/viewcvs?root=gcc&view=rev&rev=124428
Log:
PR libfortran/31210
* io/transfer.c (tra
--- Comment #3 from jvdelisle at gcc dot gnu dot org 2007-05-04 16:04
---
I agree, this patch is OK for trunk Thanks.
--
http://gcc.gnu.org/bugzilla/show_bug.cgi?id=31210
--- Comment #2 from fxcoudert at gcc dot gnu dot org 2007-05-04 15:06
---
Reduced testcase:
integer :: l = 0
write(*,'(A,I1)') foo(), 0
contains
function foo()
character(len=l) :: foo
foo = ""
end function
end
When a function result is a string of length 0, and
