diff options
Diffstat (limited to 'gcc')
| -rw-r--r-- | gcc/testsuite/ChangeLog | 5 | ||||
| -rw-r--r-- | gcc/testsuite/gfortran.fortran-torture/execute/backspace.f90 | 2 |
2 files changed, 6 insertions, 1 deletions
diff --git a/gcc/testsuite/ChangeLog b/gcc/testsuite/ChangeLog index 4a21f16..116ae34 100644 --- a/gcc/testsuite/ChangeLog +++ b/gcc/testsuite/ChangeLog @@ -1,3 +1,8 @@ +2005-04-01 Francois-Xavier Coudert <coudert@clipper.ens.fr> + + * gfortran.fortran-torture/execute/backspace.f90: Check + after backspace and read was incorrect. + 2005-04-01 Kaveh R. Ghazi <ghazi@caip.rutgers.edu> * gcc.c-torture/execute/builtins/strcat.c: Check the result diff --git a/gcc/testsuite/gfortran.fortran-torture/execute/backspace.f90 b/gcc/testsuite/gfortran.fortran-torture/execute/backspace.f90 index 16f5523..8781fb2 100644 --- a/gcc/testsuite/gfortran.fortran-torture/execute/backspace.f90 +++ b/gcc/testsuite/gfortran.fortran-torture/execute/backspace.f90 @@ -9,6 +9,6 @@ read(10,*)C backspace(10) read(10,*) C - if (C.ne.'b') call abort + if (C.ne.'a') call abort close(10,STATUS='DELETE') end |