Commit 4159401a by Francois-Xavier Coudert Committed by François-Xavier Coudert

backspace.f90: Check after backspace and read was incorrect.


        * gfortran.fortran-torture/execute/backspace.f90: Check
        after backspace and read was incorrect.

From-SVN: r97397
parent 6dbce538
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> 2005-04-01 Kaveh R. Ghazi <ghazi@caip.rutgers.edu>
* gcc.c-torture/execute/builtins/strcat.c: Check the result * gcc.c-torture/execute/builtins/strcat.c: Check the result
......
...@@ -9,6 +9,6 @@ ...@@ -9,6 +9,6 @@
read(10,*)C read(10,*)C
backspace(10) backspace(10)
read(10,*) C read(10,*) C
if (C.ne.'b') call abort if (C.ne.'a') call abort
close(10,STATUS='DELETE') close(10,STATUS='DELETE')
end end
Markdown is supported
0% or
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment