PR fortran/34689
* gfortran.dg/intent_out_4.f90: Fix test case.
git-svn-id: svn+ssh://gcc.gnu.org/svn/gcc/trunk@131360
138bc75d-0d04-0410-961f-
82ee72b054a4
2008-01-06 Tobias Burnus <burnus@net-b.de>
PR fortran/34689
+ * gfortran.dg/intent_out_4.f90: Fix test case.
+
+2008-01-06 Tobias Burnus <burnus@net-b.de>
+
+ PR fortran/34689
* gfortran.dg/intent_out_4.f90: New.
2008-01-06 Jerry DeLisle <jvdelisle@gcc.gnu.org>
integer :: test
interface
subroutine foo(a)
- integer(inout) :: a
+ integer, intent(inout) :: a
end subroutine foo
end interface
- call foo(a)
+ call foo(test)
end function test