2010-12-20 Tobias Burnus <burnus@net-b.de>

[official-gcc.git] / gcc / testsuite / gfortran.dg / named_interface.f90

! { dg-do compile }
! PR 20363
module snafu
  interface foo
    subroutine really_snafu (foo)        
      integer, intent (inout)  :: foo
    end subroutine really_snafu
  end interface foo
end module snafu

! { dg-final { cleanup-modules "snafu" } }