[patch,libgfortran] PR32456 regression on darwin

[Jerry DeLisle]

:ADDPATCH fortran:

Hi,

Based on reported success of the attached patch from users and full regression 
testing on x86-64, I plan to commit the attached patch tomorrow to trunk.

The fixed approach avoids calling find_unit which gets into a bunch of mutex 
lock code.  Since all we are doing is getting the filename out of the unit 
structure, I extracted a short snippet from get_external_unit to do the deed.

Regards,

Jerry

2007-06-28  Jerry DeLisle  <jvdelisle@gcc.gnu.org>

	PR libgfortran/32456
	* io/unit.c (filename_from_unit): Don't use find_unit, instead search
	for unit directly.
-------------- next part --------------
A non-text attachment was scrubbed...
Name: take2.diff
Type: text/x-patch
Size: 1213 bytes
Desc: not available
URL: <http://gcc.gnu.org/pipermail/fortran/attachments/20070629/f3c02f3c/attachment.bin>