summaryrefslogtreecommitdiff
path: root/gcc/testsuite/gfortran.dg/mixed_io_1.f90
blob: 4ea719fb43d8b7fd17c4ed46498a4a8b3974947d (plain)
1
2
3
4
5
6
! { dg-do run }
! { dg-additional-sources mixed_io_1.c }
! { dg-options "-w" } 
      call cio
      write(*,"(A)") '6789' ! { dg-output "123456789" }
      end