http://gcc.gnu.org/bugzilla/show_bug.cgi?id=54597
kargl at gcc dot gnu.org changed: What |Removed |Added ---------------------------------------------------------------------------- CC| |kargl at gcc dot gnu.org --- Comment #1 from kargl at gcc dot gnu.org 2012-09-16 08:45:09 UTC --- (In reply to comment #0) > I would like to write a function that will return string without trailing > spaces, the prototype of the function is as following: > > module mod > > contains > > function foo() > > character(*), allocatable :: foo > character(1000) bar > > bar = "abc" > foo = bar > > end function foo > > end module mod > > program main > > use mod > > write(*, *) """", foo(), """" > > end program main > > The result of "gfortran" still contains trailing spaces, but "ifort" works as > expected. Is this the actually code you want to compile? laptop:kargl[207] gfortran -o z d.f90 d.f90:5.4: function foo() 1 Error: Character-valued module procedure 'foo' at (1) must not be\ assumed length