2014-01-30 Alangi Derick <alangiderick@gmail.com>
[official-gcc.git] / gcc / testsuite / gfortran.dg / volatile.f90
blob73184250cbe9c6b97b29b3e464c8d9f2964fad41
1 ! { dg-do run }
2 ! Test whether volatile statements and attributes are accepted
3 ! PR fortran/29601
4 program volatile_test
5 implicit none
6 real :: l,m
7 real, volatile :: r = 3.
8 volatile :: l
9 l = 4.0
10 m = 3.0
11 end program volatile_test