diff options
| author | jvdelisle <jvdelisle@138bc75d-0d04-0410-961f-82ee72b054a4> | 2005-07-18 00:07:53 +0000 |
|---|---|---|
| committer | jvdelisle <jvdelisle@138bc75d-0d04-0410-961f-82ee72b054a4> | 2005-07-18 00:07:53 +0000 |
| commit | ffde3577c66b084f71f00d645de848f8f7b99856 (patch) | |
| tree | f172ba7a943ac65efa1b2e667c3eb0a04d48d1d7 | |
| parent | 5cbeb6fbeb95037e0b9b9d0c27a102916850f4d6 (diff) | |
| download | gcc-ffde3577c66b084f71f00d645de848f8f7b99856.tar.gz | |
2005-07-17 Jerry DeLisle <jvdelisle@verizon.net>
* gfortran.fortran-torture/execute/nan_inf_fmt.f90: Change case of field
width of 8 to +Inf and -Inf.
git-svn-id: svn+ssh://gcc.gnu.org/svn/gcc/trunk@102124 138bc75d-0d04-0410-961f-82ee72b054a4
| -rw-r--r-- | gcc/testsuite/ChangeLog | 4 | ||||
| -rw-r--r-- | gcc/testsuite/gfortran.fortran-torture/execute/nan_inf_fmt.f90 | 4 |
2 files changed, 6 insertions, 2 deletions
diff --git a/gcc/testsuite/ChangeLog b/gcc/testsuite/ChangeLog index 2f186052745..80b9604ecbf 100644 --- a/gcc/testsuite/ChangeLog +++ b/gcc/testsuite/ChangeLog @@ -1,3 +1,7 @@ +2005-07-17 Jerry DeLisle <jvdelisle@verizon.net> + * gfortran.fortran-torture/execute/nan_inf_fmt.f90: Change case of field + width of 8 to +Inf and -Inf. + 2005-07-17 Mark Mitchell <mark@codesourcery.com> PR c++/22139 diff --git a/gcc/testsuite/gfortran.fortran-torture/execute/nan_inf_fmt.f90 b/gcc/testsuite/gfortran.fortran-torture/execute/nan_inf_fmt.f90 index 84322c60679..86e6916a0c4 100644 --- a/gcc/testsuite/gfortran.fortran-torture/execute/nan_inf_fmt.f90 +++ b/gcc/testsuite/gfortran.fortran-torture/execute/nan_inf_fmt.f90 @@ -52,9 +52,9 @@ ! check a field width = 8 fmt = '(F8.0)' write(l,fmt=fmt)pos_inf - if (l.ne.'Infinity') call abort + if (l.ne.' +Inf') call abort write(l,fmt=fmt)neg_inf - if (l.ne.'Infinity') call abort + if (l.ne.' -Inf') call abort write(l,fmt=fmt)nan if (l.ne.' NaN') call abort |