diff options
author | Dominique d'Humieres <dominiq@lps.ens.fr> | 2014-01-21 03:44:13 +0100 |
---|---|---|
committer | Jerry DeLisle <jvdelisle@gcc.gnu.org> | 2014-01-21 02:44:13 +0000 |
commit | d1a5b5e3725895a52432d1abb251ebd332f7a643 (patch) | |
tree | 7bcdf9ba086f09d21d5aa5b12d3e8af2f627ae2e /gcc/testsuite | |
parent | 91d45414d8f5d82fa8945870f83ab11102d1e68c (diff) | |
download | gcc-d1a5b5e3725895a52432d1abb251ebd332f7a643.zip gcc-d1a5b5e3725895a52432d1abb251ebd332f7a643.tar.gz gcc-d1a5b5e3725895a52432d1abb251ebd332f7a643.tar.bz2 |
round_3.f08: Add more cases.
2014-01-20 Dominique d'Humieres <dominiq@lps.ens.fr>
* gfortran.dg/round_3.f08: Add more cases.
From-SVN: r206866
Diffstat (limited to 'gcc/testsuite')
-rw-r--r-- | gcc/testsuite/ChangeLog | 4 | ||||
-rw-r--r-- | gcc/testsuite/gfortran.dg/round_3.f08 | 5 |
2 files changed, 9 insertions, 0 deletions
diff --git a/gcc/testsuite/ChangeLog b/gcc/testsuite/ChangeLog index 10a7625..9c06b5c 100644 --- a/gcc/testsuite/ChangeLog +++ b/gcc/testsuite/ChangeLog @@ -1,3 +1,7 @@ +2014-01-20 Dominique d'Humieres <dominiq@lps.ens.fr> + + * gfortran.dg/round_3.f08: Add more cases. + 2014-01-20 Richard Sandiford <rdsandiford@googlemail.com> * lib/target-supports.exp (force_conventional_output_for): New diff --git a/gcc/testsuite/gfortran.dg/round_3.f08 b/gcc/testsuite/gfortran.dg/round_3.f08 index 5650dab..2bb36d9 100644 --- a/gcc/testsuite/gfortran.dg/round_3.f08 +++ b/gcc/testsuite/gfortran.dg/round_3.f08 @@ -27,6 +27,11 @@ program pr48615 call checkfmt("(RU,G9.3)", 891.1, " 892.") ! pr59836 call checkfmt("(RD,G9.3)", -891.1, "-892.") ! pr59836 + + call checkfmt("(RU,F6.4)", 0.00006, "0.0001")! 0. + call checkfmt("(RU,F5.3)", 0.0007, "0.001") ! 0. + call checkfmt("(RU,F4.2)", 0.008, "0.01") ! 0. + call checkfmt("(RU,F3.1)", 0.09, "0.1") ! 0. call checkfmt("(RU,F2.0)", 0.09, "1.") ! 0. call checkfmt("(RD,F3.0)", -0.09, "-1.") ! -0. |