OSDN Git Service

1277fb50c6bfaef42d59cff2c85c86c613856798
[pf3gnuchains/gcc-fork.git] / gcc / testsuite / g77.dg / fno-vxt-1.f
1 C Test compiler flags: -fno-vxt
2 C Origin: David Billinghurst <David.Billinghurst@riotinto.com>
3 C
4 C { dg-do run }
5 C { dg-options "-fno-vxt" }
6       i = 0
7      !1
8       if ( i .ne. 0 ) call exit
9       call abort
10       END