?  search:
summary | log | graphiclog1 | graphiclog2 | commit | commitdiff | tree | refs | edit | fork
blame | history | raw | HEAD
2008-07-06 Kai Tietz <kai.tietz@onevision.com>
[official-gcc.git] / gcc / testsuite / gfortran.dg / advance_2.f90
blob1e83aaee31673d3cee6305ecc70676a77fa29e25
1 ! { dg-do compile }
2 subroutine foo
3 character(len=5) :: a
4 a = "yes"
5 write(*, '(a)', advance=a) "hello world"
6 end subroutine foo
Mirror of the offical gcc git repository hosted at gcc.gnu.org