This is the mail archive of the
fortran@gcc.gnu.org
mailing list for the GNU Fortran project.
Re: [patch, libgfortran] PR77393 [7 Regression] Revision r237735 changed the behavior of F0.0
- From: Jerry DeLisle <jvdelisle at charter dot net>
- To: Andreas Schwab <schwab at suse dot de>
- Cc: gfortran <fortran at gcc dot gnu dot org>, gcc patches <gcc-patches at gcc dot gnu dot org>
- Date: Thu, 1 Sep 2016 12:48:08 -0700
- Subject: Re: [patch, libgfortran] PR77393 [7 Regression] Revision r237735 changed the behavior of F0.0
- Authentication-results: sourceware.org; auth=none
- References: <dea57bf0-3c91-0b32-7045-c7fef054e266@charter.net> <mvm8tvbhq72.fsf@hawking.suse.de>
On 09/01/2016 03:25 AM, Andreas Schwab wrote:
> On Aug 31 2016, Jerry DeLisle <jvdelisle@charter.net> wrote:
>
>> ! { dg-do run }
>> ! PR77393
>> program testbigf0 ! Can enormous numbers be printed with F0.0 format?
>> implicit none
>> character(10000) :: str
>> write(str, "(f0.0)") -huge(1.0)
>> if (len(trim(str)).lt.41) error stop "FAILED AT 9"
>> write(str, "(f0.0)") -huge(1.0_8)
>> if (len(trim(str)).lt.311) error stop "FAILED AT 9"
>> write(str, "(f0.0)") -huge(1.0_10)
>> if (len(trim(str)).lt.4935) error stop "FAILED AT 9"
>> write(str, "(f0.10)") -huge(1.0_16)
>> if (len(trim(str)).lt.4945) error stop "FAILED AT 11"
>> end program testbigf0
>
> FAIL: gfortran.dg/fmt_f0_2.f90 -O0 (test for excess errors)
> Excess errors:
> /daten/aranym/gcc/gcc-20160901/gcc/testsuite/gfortran.dg/fmt_f0_2.f90:12:36: Error: Invalid real kind 16 at (1)
>
> Andreas.
>
Oh dang, thats right. I can fix that sometime today.
Thanks for report
Jerry