OSDN Git Service

2010-06-25 Tobias Burnus <burnus@net-b.de>
[pf3gnuchains/gcc-fork.git] / gcc / testsuite / gfortran.dg / semicolon_fixed_2.f
1 ! { dg-do compile }
2 ! { dg-do options "-std=f2008" }
3
4 ! PR 19259 Semicolon cannot start a line
5 ! but it F2008 it can!
6       x=1; y=1;
7       x=2;;
8       x=3;
9       ;                         ! OK
10       ;;                        ! OK
11  900  ;                         ! { dg-error "Semicolon at" }
12       end