This is the mail archive of the
gcc-bugs@gcc.gnu.org
mailing list for the GCC project.
[Bug libfortran/25139] [4.1/4.2 regression] "Invalid argument" error on I/O
- From: "dir at lanl dot gov" <gcc-bugzilla at gcc dot gnu dot org>
- To: gcc-bugs at gcc dot gnu dot org
- Date: 13 Dec 2005 14:39:16 -0000
- Subject: [Bug libfortran/25139] [4.1/4.2 regression] "Invalid argument" error on I/O
- References: <bug-25139-10129@http.gcc.gnu.org/bugzilla/>
- Reply-to: gcc-bugzilla at gcc dot gnu dot org
------- Comment #9 from dir at lanl dot gov 2005-12-13 14:39 -------
I generated random I/O sequences doing 100,000 tests at each I/O operation
count staring at five here is the shortest one to fail (somewhere in the
eights) -
[dranta:~/tests/gfortran-D] dir% gfortran -o write10 write10.f
[dranta:~/tests/gfortran-D] dir% write10
At line 18 of file write10.f
Fortran runtime error: Invalid argument
[dranta:~/tests/gfortran-D] dir% cat write10.f
integer :: i = 1
dimension data(500)
do 10 i=1,500
data(i)=i
10 continue
open(unit=11,status='scratch',form='unformatted')
write(11)data
write(11)data
rewind 11
write(11)data
backspace 11
read(11,end= 1000 )data
1000 continue
read(11,end= 1001 )data
1001 continue
backspace 11
backspace 11
backspace 11
close(11)
end
--
http://gcc.gnu.org/bugzilla/show_bug.cgi?id=25139