?  search:
summary | log | graphiclog1 | graphiclog2 | commit | commitdiff | tree | refs | edit | fork
blame | history | raw | HEAD
2010-11-30 Tobias Burnus <burnus@net-b.de>
[official-gcc.git] / gcc / testsuite / gfortran.dg / return_1.f90
bloba8067b03c08c5317f4d6eb2a5f0ec8a313930f62
1 ! { dg-do compile }
2 ! { dg-options "-std=legacy" }
3 !
4 ! Test cases where no blank is required after RETURN
5 subroutine sub(*)
6 return(1)
7 return1 ! { dg-error "" }
8 end subroutine
Mirror of the offical gcc git repository hosted at gcc.gnu.org