public inbox for gcc-bugs@sourceware.org
help / color / mirror / Atom feed
* [Bug testsuite/41612] New: FAIL: gfortran.dg/round_2.f03
@ 2009-10-06 20:28 dominiq at lps dot ens dot fr
2009-10-07 1:24 ` [Bug testsuite/41612] " jvdelisle at gcc dot gnu dot org
` (3 more replies)
0 siblings, 4 replies; 5+ messages in thread
From: dominiq at lps dot ens dot fr @ 2009-10-06 20:28 UTC (permalink / raw)
To: gcc-bugs
On powerpc-apple-darwin* gfortran.dg/round_2.f03 fails with:
/opt/gcc/_gcc_clean/gcc/testsuite/gfortran.dg/round_2.f03:5.37:
write(line, '(RN, 4F10.3)') 0.0625_10, 0.1875_10
1
Error: Invalid real kind 10 at (1)
/opt/gcc/_gcc_clean/gcc/testsuite/gfortran.dg/round_2.f03:8.36:
write(line, '(RN, 4F10.2)') 0.125_10, 0.375_10, 1.125_10, 1.375_10
1
Error: Invalid real kind 10 at (1)
/opt/gcc/_gcc_clean/gcc/testsuite/gfortran.dg/round_2.f03:11.35:
write(line, '(RN, 4F10.1)') 0.25_10, 0.75_10, 1.25_10, 1.75_10
1
Error: Invalid real kind 10 at (1)
/opt/gcc/_gcc_clean/gcc/testsuite/gfortran.dg/round_2.f03:14.34:
write(line, '(RN, 4F10.0)') 0.5_10, 1.5_10, 2.5_10, 3.5_10
1
Error: Invalid real kind 10 at (1)
since there is no kind 10 on powerpc-apple-darwin*, but only kind 16. Borrowed
for similar test the fix is quite obvious as:
! { dg-do run }
! PR35962 Implement F2003 rounding modes.
! Test case prepared by Jerry Delisle <jvdelisle@gcc.gnu.org>
integer,parameter :: k = selected_real_kind (precision (0.0_8) + 1)
character(64) :: line
print *, k
write(line, '(RN, 4F10.3)') 0.0625_k, 0.1875_k
if (line.ne." 0.062 0.188") call abort
write(line, '(RN, 4F10.2)') 0.125_k, 0.375_k, 1.125_k, 1.375_k
if (line.ne." 0.12 0.38 1.12 1.38") call abort
write(line, '(RN, 4F10.1)') 0.25_k, 0.75_k, 1.25_k, 1.75_k
if (line.ne." 0.2 0.8 1.2 1.8") call abort
write(line, '(RN, 4F10.0)') 0.5_k, 1.5_k, 2.5_k, 3.5_k
if (line.ne." 0. 2. 2. 4.") call abort
end
--
Summary: FAIL: gfortran.dg/round_2.f03
Product: gcc
Version: 4.5.0
Status: UNCONFIRMED
Severity: normal
Priority: P3
Component: testsuite
AssignedTo: unassigned at gcc dot gnu dot org
ReportedBy: dominiq at lps dot ens dot fr
GCC build triplet: powerpc-apple-darwin*
GCC host triplet: powerpc-apple-darwin*
GCC target triplet: powerpc-apple-darwin*
http://gcc.gnu.org/bugzilla/show_bug.cgi?id=41612
^ permalink raw reply [flat|nested] 5+ messages in thread
* [Bug testsuite/41612] FAIL: gfortran.dg/round_2.f03
2009-10-06 20:28 [Bug testsuite/41612] New: FAIL: gfortran.dg/round_2.f03 dominiq at lps dot ens dot fr
@ 2009-10-07 1:24 ` jvdelisle at gcc dot gnu dot org
2009-10-07 1:26 ` jvdelisle at gcc dot gnu dot org
` (2 subsequent siblings)
3 siblings, 0 replies; 5+ messages in thread
From: jvdelisle at gcc dot gnu dot org @ 2009-10-07 1:24 UTC (permalink / raw)
To: gcc-bugs
------- Comment #1 from jvdelisle at gcc dot gnu dot org 2009-10-07 01:24 -------
Subject: Bug 41612
Author: jvdelisle
Date: Wed Oct 7 01:24:27 2009
New Revision: 152510
URL: http://gcc.gnu.org/viewcvs?root=gcc&view=rev&rev=152510
Log:
2009-10-06 Jerry DeLisle <jvdelisle@gcc.gnu.org>
PR libgfortran/41612
* gfortran.dg/round_2.f03: Fix test to work on platforms that do not
have kind=10 reals.
Modified:
trunk/gcc/testsuite/ChangeLog
trunk/gcc/testsuite/gfortran.dg/round_2.f03
--
http://gcc.gnu.org/bugzilla/show_bug.cgi?id=41612
^ permalink raw reply [flat|nested] 5+ messages in thread
* [Bug testsuite/41612] FAIL: gfortran.dg/round_2.f03
2009-10-06 20:28 [Bug testsuite/41612] New: FAIL: gfortran.dg/round_2.f03 dominiq at lps dot ens dot fr
2009-10-07 1:24 ` [Bug testsuite/41612] " jvdelisle at gcc dot gnu dot org
@ 2009-10-07 1:26 ` jvdelisle at gcc dot gnu dot org
2009-10-10 17:34 ` jvdelisle at gcc dot gnu dot org
2009-10-10 18:08 ` dominiq at lps dot ens dot fr
3 siblings, 0 replies; 5+ messages in thread
From: jvdelisle at gcc dot gnu dot org @ 2009-10-07 1:26 UTC (permalink / raw)
To: gcc-bugs
------- Comment #2 from jvdelisle at gcc dot gnu dot org 2009-10-07 01:26 -------
Fixed on trunk. This test may still fail for platforms that have neither
kind=10 or kind=16.
Probably we should just XFAIL those if they show up.
--
jvdelisle at gcc dot gnu dot org changed:
What |Removed |Added
----------------------------------------------------------------------------
Status|UNCONFIRMED |RESOLVED
Resolution| |FIXED
http://gcc.gnu.org/bugzilla/show_bug.cgi?id=41612
^ permalink raw reply [flat|nested] 5+ messages in thread
* [Bug testsuite/41612] FAIL: gfortran.dg/round_2.f03
2009-10-06 20:28 [Bug testsuite/41612] New: FAIL: gfortran.dg/round_2.f03 dominiq at lps dot ens dot fr
2009-10-07 1:24 ` [Bug testsuite/41612] " jvdelisle at gcc dot gnu dot org
2009-10-07 1:26 ` jvdelisle at gcc dot gnu dot org
@ 2009-10-10 17:34 ` jvdelisle at gcc dot gnu dot org
2009-10-10 18:08 ` dominiq at lps dot ens dot fr
3 siblings, 0 replies; 5+ messages in thread
From: jvdelisle at gcc dot gnu dot org @ 2009-10-10 17:34 UTC (permalink / raw)
To: gcc-bugs
------- Comment #3 from jvdelisle at gcc dot gnu dot org 2009-10-10 17:34 -------
Subject: Bug 41612
Author: jvdelisle
Date: Sat Oct 10 17:34:06 2009
New Revision: 152624
URL: http://gcc.gnu.org/viewcvs?root=gcc&view=rev&rev=152624
Log:
2009-10-10 Jerry DeLisle <jvdelisle@gcc.gnu.org>
PR libgfortran/41612
* gfortran.dg/round_2.f03: Update test to also test for smaller kind.
Add conditions to avoid runtime errors if not supported.
Modified:
trunk/gcc/testsuite/ChangeLog
trunk/gcc/testsuite/gfortran.dg/round_2.f03
--
http://gcc.gnu.org/bugzilla/show_bug.cgi?id=41612
^ permalink raw reply [flat|nested] 5+ messages in thread
* [Bug testsuite/41612] FAIL: gfortran.dg/round_2.f03
2009-10-06 20:28 [Bug testsuite/41612] New: FAIL: gfortran.dg/round_2.f03 dominiq at lps dot ens dot fr
` (2 preceding siblings ...)
2009-10-10 17:34 ` jvdelisle at gcc dot gnu dot org
@ 2009-10-10 18:08 ` dominiq at lps dot ens dot fr
3 siblings, 0 replies; 5+ messages in thread
From: dominiq at lps dot ens dot fr @ 2009-10-10 18:08 UTC (permalink / raw)
To: gcc-bugs
------- Comment #4 from dominiq at lps dot ens dot fr 2009-10-10 18:08 -------
Subject: Re: FAIL: gfortran.dg/round_2.f03
I am not sure that the change will allow the compilation if k<0.
--
http://gcc.gnu.org/bugzilla/show_bug.cgi?id=41612
^ permalink raw reply [flat|nested] 5+ messages in thread
end of thread, other threads:[~2009-10-10 18:08 UTC | newest]
Thread overview: 5+ messages (download: mbox.gz / follow: Atom feed)
-- links below jump to the message on this page --
2009-10-06 20:28 [Bug testsuite/41612] New: FAIL: gfortran.dg/round_2.f03 dominiq at lps dot ens dot fr
2009-10-07 1:24 ` [Bug testsuite/41612] " jvdelisle at gcc dot gnu dot org
2009-10-07 1:26 ` jvdelisle at gcc dot gnu dot org
2009-10-10 17:34 ` jvdelisle at gcc dot gnu dot org
2009-10-10 18:08 ` dominiq at lps dot ens dot fr
This is a public inbox, see mirroring instructions
for how to clone and mirror all data and code used for this inbox;
as well as URLs for read-only IMAP folder(s) and NNTP newsgroup(s).