xref: /haiku-buildtools/gcc/gcc/testsuite/gfortran.fortran-torture/compile/write.f90

! Program to test simple IO
program testwrite
   write (*) 1
   write (*) "Hello World"
end program