From 241b92c8c5fd4ef847b99284126de8e3349b926b Mon Sep 17 00:00:00 2001 From: Jerry DeLisle Date: Sat, 3 Nov 2007 16:47:37 +0000 Subject: [PATCH] re PR libfortran/24685 (real(16) formatted input is broken for huge values (gfortran.dg/default_format_2.f90)) 2007-11-03 Jerry DeLisle PR libfortran/24685 * gfortran.dg/default_format_2.f90: XFAIL powerpc*-*-linux* * gfortran.dg/default_format_denormal_2.f90: XFAIL powerpc*-*-linux* * gfortran.dg/large_real_kind_form_io_2.f90: XFAIL powerpc*-*-linux* From-SVN: r129871 --- gcc/testsuite/ChangeLog | 7 +++++++ gcc/testsuite/gfortran.dg/default_format_2.f90 | 6 +++--- gcc/testsuite/gfortran.dg/default_format_denormal_2.f90 | 4 ++-- gcc/testsuite/gfortran.dg/large_real_kind_form_io_2.f90 | 4 +++- 4 files changed, 15 insertions(+), 6 deletions(-) diff --git a/gcc/testsuite/ChangeLog b/gcc/testsuite/ChangeLog index e4db369d4f2..0fec43dd146 100644 --- a/gcc/testsuite/ChangeLog +++ b/gcc/testsuite/ChangeLog @@ -1,3 +1,10 @@ +2007-11-03 Jerry DeLisle + + PR libfortran/24685 + * gfortran.dg/default_format_2.f90: XFAIL powerpc*-*-linux* + * gfortran.dg/default_format_denormal_2.f90: XFAIL powerpc*-*-linux* + * gfortran.dg/large_real_kind_form_io_2.f90: XFAIL powerpc*-*-linux* + 2007-11-03 Eric Botcazou PR rtl-optimization/28940 diff --git a/gcc/testsuite/gfortran.dg/default_format_2.f90 b/gcc/testsuite/gfortran.dg/default_format_2.f90 index 90fbc179ab6..9442242f143 100644 --- a/gcc/testsuite/gfortran.dg/default_format_2.f90 +++ b/gcc/testsuite/gfortran.dg/default_format_2.f90 @@ -1,7 +1,7 @@ ! { dg-require-effective-target fortran_large_real } -! { dg-do run { xfail powerpc*-apple-darwin* *-*-freebsd* } } -! Test XFAILed on powerpc-darwin because the system's printf() lacks -! proper support for long doubles. +! { dg-do run { xfail powerpc*-apple-darwin* *-*-freebsd* powerpc*-*-linux* } } +! Test XFAILed on these platforms because the system's printf() lacks +! proper support for denormalized long doubles. See PR24685 ! ! This tests that the default formats for formatted I/O of reals are ! wide enough and have enough precision, by checking that values can diff --git a/gcc/testsuite/gfortran.dg/default_format_denormal_2.f90 b/gcc/testsuite/gfortran.dg/default_format_denormal_2.f90 index 507a377c380..0ae32f8cb60 100644 --- a/gcc/testsuite/gfortran.dg/default_format_denormal_2.f90 +++ b/gcc/testsuite/gfortran.dg/default_format_denormal_2.f90 @@ -1,7 +1,7 @@ ! { dg-require-effective-target fortran_large_real } -! { dg-do run { xfail powerpc*-apple-darwin* *-*-freebsd* } } +! { dg-do run { xfail powerpc*-apple-darwin* *-*-freebsd* powerpc*-*-linux* } } ! Test XFAILed on these platforms because the system's printf() lacks -! proper support for denormalized long doubles. +! proper support for denormalized long doubles. See PR24685 ! ! This tests that the default formats for formatted I/O of reals are ! wide enough and have enough precision, by checking that values can diff --git a/gcc/testsuite/gfortran.dg/large_real_kind_form_io_2.f90 b/gcc/testsuite/gfortran.dg/large_real_kind_form_io_2.f90 index 261635c590f..b5751cece75 100644 --- a/gcc/testsuite/gfortran.dg/large_real_kind_form_io_2.f90 +++ b/gcc/testsuite/gfortran.dg/large_real_kind_form_io_2.f90 @@ -1,4 +1,6 @@ -! { dg-do run } +! { dg-do run { xfail powerpc*-*-linux* } } +! Test XFAILed on these platforms because the system's printf() lacks +! proper support for denormalized long doubles. See PR24685 ! { dg-require-effective-target fortran_large_real } ! PR libfortran/24685 program large_real_kind_form_io_2