Dead
[official-gcc.git] / gomp-20050608-branch / gcc / testsuite / gfortran.dg / pr20950.f
blobc132548c8295d1742affeb6a611f6d3240c877e2
1 ! PR libfortran/20950
2 ! Original bug-report by Walt Brainerd, The Fortran Company
3 ! { dg-do run }
4 character*20 c
5 inquire (33, sequential = c)
6 if (c .ne. "UNKNOWN") call abort
7 end