From 293cf2174de73c90a794f524ab83a64bc93d0aea Mon Sep 17 00:00:00 2001 From: Hans-Peter Nilsson Date: Tue, 7 Sep 2010 13:23:24 +0000 Subject: re PR middle-end/45505 (gfortran.dg/pr25923.f90) PR fortran/45505 * gfortran.dg/pr25923.f90: XFAIL warning on wrong line for ilp32. From-SVN: r163949 --- gcc/testsuite/ChangeLog | 5 +++++ gcc/testsuite/gfortran.dg/pr25923.f90 | 4 ++-- 2 files changed, 7 insertions(+), 2 deletions(-) (limited to 'gcc') diff --git a/gcc/testsuite/ChangeLog b/gcc/testsuite/ChangeLog index 5c04a04..b2f4aba 100644 --- a/gcc/testsuite/ChangeLog +++ b/gcc/testsuite/ChangeLog @@ -1,3 +1,8 @@ +2010-09-07 Hans-Peter Nilsson + + PR fortran/45505 + * gfortran.dg/pr25923.f90: XFAIL warning on wrong line for ilp32. + 2010-09-07 Jan Hubicka * gcc.c-torture/compile/20100907.c: New testcase. diff --git a/gcc/testsuite/gfortran.dg/pr25923.f90 b/gcc/testsuite/gfortran.dg/pr25923.f90 index f075944..e7f6f6e 100644 --- a/gcc/testsuite/gfortran.dg/pr25923.f90 +++ b/gcc/testsuite/gfortran.dg/pr25923.f90 @@ -10,7 +10,7 @@ implicit none contains - function baz(arg) result(res) ! { dg-warning "res.yr' may be" } + function baz(arg) result(res) ! { dg-warning "res.yr' may be" "PR45505" { xfail ilp32 } } type(bar), intent(in) :: arg type(bar) :: res logical, external:: some_func @@ -19,7 +19,7 @@ contains else res = arg end if - end function baz + end function baz ! { dg-bogus "res.yr' may be" "PR45505" { xfail ilp32 } } end module foo -- cgit v1.1