?  search:
summary | log | graphiclog1 | graphiclog2 | commit | commitdiff | tree | refs | edit | fork
blame | history | raw | HEAD
RISC-V: Refactor Dynamic LMUL codes
[official-gcc.git] / gcc / testsuite / gfortran.dg / pr95104.f90
blob20bdd910f468687a4a390bcb1980ac914a17ea86
1 ! { dg-do run }
2 ! PR libfortran/95104 - Segfault on a legal WAIT statement
3
4 program test
5 wait (10, iostat=ios)
6 if (ios /= 0) stop 1
7 close (10)
8 end program test
Mirror of the offical gcc git repository hosted at gcc.gnu.org