PR fortran/34690
* gfortran.dg/elemental_args_check_2.f90: Fix test case.
git-svn-id: svn+ssh://gcc.gnu.org/svn/gcc/trunk@131362
138bc75d-0d04-0410-961f-
82ee72b054a4
2008-01-06 Tobias Burnus <burnus@net-b.de>
+ PR fortran/34690
+ * gfortran.dg/elemental_args_check_2.f90: Fix test case.
+
+2008-01-06 Tobias Burnus <burnus@net-b.de>
+
PR fortran/34689
* gfortran.dg/intent_out_4.f90: Fix test case.
MODULE M1
IMPLICIT NONE
CONTAINS
- PURE ELEMENTAL SUBROUTINE S1(I,F)
+ PURE ELEMENTAL SUBROUTINE S1(I,F) ! { dg-error "Dummy procedure 'f' not allowed in elemental procedure" }
INTEGER, INTENT(IN) :: I
INTERFACE
- PURE INTEGER FUNCTION F(I) ! { dg-error "Dummy procedure 'f' not allowed in elemental procedure" }
+ PURE INTEGER FUNCTION F(I)
INTEGER, INTENT(IN) :: I
END FUNCTION F
END INTERFACE