re PR fortran/33849 (Fix misleading error message "GENERIC non-INTRINSIC procedure not allowed as an actual argument")

2007-10-23  Jerry DeLisle  <jvdelisle@gcc.gnu.org>

	PR forrtran/33849
	gfortran.dg/generic_actual_arg.f90: Fix dg-error message.

From-SVN: r129595
This commit is contained in:
Jerry DeLisle 2007-10-24 03:39:03 +00:00
parent 6a8204bbe1
commit d72702e2cb
2 changed files with 6 additions and 1 deletions

View File

@ -1,3 +1,8 @@
2007-10-23 Jerry DeLisle <jvdelisle@gcc.gnu.org>
PR forrtran/33849
gfortran.dg/generic_actual_arg.f90: Fix dg-error message.
2007-10-23 Martin Michlmayr <tbm@cyrius.com>
Uros Bizjak <ubizjak@gmail.com>

View File

@ -18,7 +18,7 @@ END SUBROUTINE
END MODULE TEST
USE TEST
CALL F(CALCULATION) ! { dg-error "GENERIC non-INTRINSIC procedure" }
CALL F(CALCULATION) ! { dg-error "GENERIC procedure" }
END
SUBROUTINE F()