http://gcc.gnu.org/bugzilla/show_bug.cgi?id=46678

Jerry DeLisle <jvdelisle at gcc dot gnu.org> changed:

           What    |Removed                     |Added
----------------------------------------------------------------------------
                 CC|                            |jvdelisle at gcc dot
                   |                            |gnu.org

--- Comment #3 from Jerry DeLisle <jvdelisle at gcc dot gnu.org> 2010-11-27 
03:11:11 UTC ---
Here is a reduced test case:

program test
   implicit none
   integer a(2)
   call sub(a,5)
end program test

subroutine sub(a,n)
   implicit none
   integer n
   integer a(n)
   character(size(a)) :: string
   print *, size(a)
   string = '1234567890'
   write(*,'(a)') string
end subroutine sub 

I think the problem is related to the declaration of string.  The size(a) used
for length is unknown until run time.

Reply via email to