------- Comment #23 from fxcoudert at gcc dot gnu dot org 2008-02-08 08:58
-------
(In reply to comment #19)
> I would not mind seeing a threaded example where
> this could be tested and that confirms we need to lock internal units. :)
Me too :) I think I got confused between locking the file/string and locking
the unit. I agree that internal units don't need to be locked.
(In reply to comment #21)
> The other is to keep track of
> units assigned as internal and not create a new unit structure, but reuse the
> old. Stay tuned.
This might be desirable for other reasons, but it will not fix the problem
completely. My comment #7 shows that this problem is also present for exernal
units:
program test
do
open(10,file="foo",status="replace")
write(10,'()')
close(10)
end do
end program test
(and watch the Handle count grow).
--
http://gcc.gnu.org/bugzilla/show_bug.cgi?id=35063
