* cfghooks.c (verify_flow_info): Disable check that all probabilities
[official-gcc.git] / gcc / testsuite / gfortran.dg / dec_loc_rval_3.f03
blobb3441b806eff88c4f621f0172c3a607c5ed03d39
1 ! { dg-do compile }
2 ! { dg-options "-std=f2003" }
4 ! Test errors for usage of %loc as an rvalue with a real standard.
6 program main
7 implicit none
9 integer, volatile :: i, j, k
11 k = %loc(j) ! { dg-error "Legacy Extension:" }
13 end