From 066a368f63f1607e6d6b24ad586fd54f46f91dc4 Mon Sep 17 00:00:00 2001 From: Jerry DeLisle Date: Fri, 29 Jun 2007 23:29:41 +0000 Subject: [PATCH] inline_1.f90: Fix test. 2007-06-29 Jerry DeLisle * gfortran.fortran-torture/compile/inline_1.f90: Fix test. From-SVN: r126131 --- gcc/testsuite/ChangeLog | 4 ++++ gcc/testsuite/gfortran.fortran-torture/compile/inline_1.f90 | 2 +- 2 files changed, 5 insertions(+), 1 deletion(-) diff --git a/gcc/testsuite/ChangeLog b/gcc/testsuite/ChangeLog index b8ab6e54a03..e848e23f05b 100644 --- a/gcc/testsuite/ChangeLog +++ b/gcc/testsuite/ChangeLog @@ -1,3 +1,7 @@ +2007-06-29 Jerry DeLisle + + * gfortran.fortran-torture/compile/inline_1.f90: Fix test. + 2007-06-29 Douglas Gregor * g++.dg/other/canon-31724.C: New. diff --git a/gcc/testsuite/gfortran.fortran-torture/compile/inline_1.f90 b/gcc/testsuite/gfortran.fortran-torture/compile/inline_1.f90 index 58c02f2c1a3..4c05baaaa3e 100644 --- a/gcc/testsuite/gfortran.fortran-torture/compile/inline_1.f90 +++ b/gcc/testsuite/gfortran.fortran-torture/compile/inline_1.f90 @@ -11,7 +11,7 @@ contains maxerr1 = funk (r ,x1 , x1) end do if (debug) then - print "help" + print *, "help" end if end subroutine fit end program gfcbug43 -- 2.30.2