gfortran-dg.exp (gfortran-dg-test): Adapt regular expression to match gfortran…

gfortran-dg.exp (gfortran-dg-test): Adapt regular expression to match gfortran warning/error messages

2004-07-10  David Billinghurst (David.Billinghurst@riotinto.com)

	* lib/gfortran-dg.exp (gfortran-dg-test):  Adapt regular
	expression to match gfortran warning/error messages
	* gfortran.dg/g77/12632.f: Copy from g77.dg and fix
	dg-error text.

From-SVN: r84372

gcc/testsuite/ChangeLog

+2004-07-10  David Billinghurst (David.Billinghurst@riotinto.com)
+
+	* lib/gfortran-dg.exp (gfortran-dg-test):  Adapt regular
+	expression to match gfortran warning/error messages
+	* gfortran.dg/g77/12632.f: Copy from g77.dg and fix
+	dg-error text.
+
 2004-07-09  David Billinghurst (David.Billinghurst@riotinto.com)
 
 	* lib/fortran-torture.exp: Rename proc search_for to 

gcc/testsuite/gfortran.dg/g77/12632.f

+C { dg-do compile }
+C { dg-options "-fbounds-check" }
+       INTEGER I(1)
+       I(2) = 0  ! { dg-error "out of bounds" "out of bounds" }
+       END
+