Increase timeout factor for hppa*-*-* in gcc.dg/long_branch.c
[official-gcc.git] / gcc / testsuite / gfortran.dg / c_loc_tests_17.f90
blob2ed8307ddcfbbb96f098c817d7e7578f11a5524a
1 ! { dg-do compile }
3 ! PR fortran/55574
4 ! The following code used to be accepted because C_LOC pulls in C_PTR
5 ! implicitly.
7 ! Contributed by Valery Weber <valeryweber@hotmail.com>
9 program aaaa
10 use iso_c_binding, only : c_loc
11 integer, target :: i
12 type(C_PTR) :: f_ptr ! { dg-error "being used before it is defined" }
13 f_ptr=c_loc(i) ! { dg-error "Cannot convert" }
14 end program aaaa