diff options
| author | jvdelisle <jvdelisle@138bc75d-0d04-0410-961f-82ee72b054a4> | 2014-01-21 02:44:13 +0000 |
|---|---|---|
| committer | jvdelisle <jvdelisle@138bc75d-0d04-0410-961f-82ee72b054a4> | 2014-01-21 02:44:13 +0000 |
| commit | 3f5c5d5b1fdb792a310eb7d7e61f4e1bdf03b376 (patch) | |
| tree | 7bcdf9ba086f09d21d5aa5b12d3e8af2f627ae2e | |
| parent | 805e2bf6cf9e0758a3a4e1a4b7ebb95916565d15 (diff) | |
| download | ppe42-gcc-3f5c5d5b1fdb792a310eb7d7e61f4e1bdf03b376.tar.gz ppe42-gcc-3f5c5d5b1fdb792a310eb7d7e61f4e1bdf03b376.zip | |
2014-01-20 Dominique d'Humieres <dominiq@lps.ens.fr>
* gfortran.dg/round_3.f08: Add more cases.
git-svn-id: svn+ssh://gcc.gnu.org/svn/gcc/trunk@206866 138bc75d-0d04-0410-961f-82ee72b054a4
| -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 10a7625da1a..9c06b5c4282 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 5650dab31ca..2bb36d9eeef 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. |
