Increase timeout factor for hppa*-*-* in gcc.dg/long_branch.c
[official-gcc.git] / gcc / testsuite / gfortran.dg / newunit_3.f90
blob2500130fe6b3272737c02102bdba9ce51976c238
1 ! { dg-do run }
2 ! PR48960 On ERROR newunit should not modify user variable.
3 program test_newunit
4 integer :: st, un = 0
5 open (newunit=un, file='nonexisting.dat', status='old', iostat=st)
6 if (un /= 0) STOP 1
7 end program test_newunit