This is the mail archive of the
cygwin@cygwin.com
mailing list for the Cygwin project.
[OT]Re: BUG BUG BUG -- cygwin1.dll v1.3.11
What a banner day! I am pleased to announce that even after having had
a class in Fortran (15 years ago), I did not immediately recognize the
included code as Fortran code. My brain has been completely purged of
Fortran! Hurray!
program prova1
call uno
call due
end
subroutine uno
character*256 vvv
open(unit=32, file='requests.db', form='unformatted',status='unknown')
n=162
write(32) n
do i=1,n
write(*,*) 'uno ',i
write(32) i,vvv
end do
close(32)
return
end
subroutine due
character*256 vvv
open(unit=32, file='requests.db', form='unformatted',status='old')
read(32) n
write(*,*) 'due TOT:',n
do i=1,n
read(32) ii,vvv
write(*,*) 'due ',i,ii
end do
close(32)
return
end
--
Jason Dufair - jase@dufair.org
http://www.dufair.org/
"The oldest one despairs: Will I die in this place?
The one of middle years searches: How did I come to this place?
The youngest one wonders: What is this place?"
-- ToasterLeavings
--
Unsubscribe info: http://cygwin.com/ml/#unsubscribe-simple
Bug reporting: http://cygwin.com/bugs.html
Documentation: http://cygwin.com/docs.html
FAQ: http://cygwin.com/faq/