From f7887fbaf34aeab55cd686e7111943c488668c18 Mon Sep 17 00:00:00 2001 From: rguenth Date: Wed, 17 Feb 2010 09:39:26 +0000 Subject: [PATCH] 2010-02-16 Richard Guenther PR tree-optimization/41043 * gfortran.dg/pr41043.f90: New testcase. * gcc.dg/Wstrict-overflow-18.c: XFAIL. git-svn-id: svn+ssh://gcc.gnu.org/svn/gcc/trunk@156824 138bc75d-0d04-0410-961f-82ee72b054a4 --- gcc/testsuite/gfortran.dg/pr41043.f90 | 11 +++++++++++ 1 file changed, 11 insertions(+) create mode 100644 gcc/testsuite/gfortran.dg/pr41043.f90 diff --git a/gcc/testsuite/gfortran.dg/pr41043.f90 b/gcc/testsuite/gfortran.dg/pr41043.f90 new file mode 100644 index 0000000..fab428b --- /dev/null +++ b/gcc/testsuite/gfortran.dg/pr41043.f90 @@ -0,0 +1,11 @@ +! { dg-do compile } +! { dg-options "-O2" } + subroutine foo + implicit none + + integer :: i + + call gee_i(int(i**huge(0_8),kind=kind(i))) + + end subroutine foo + -- 2.7.4