[patch, fortran] PR38398 g0.w edit descriptor: Update for F2008 Tokyo meeting changes

[Jerry DeLisle]

Hi all

I have this little tweak to fortran/io.c that nails the error loci for formats 
and adjusts the g0 behaviour at run-time.

I have not had a chance to test the error loci aspect on very many test cases, 
so please feel free to exercise this.  Here is an example output:

fmt_g0_4.f90:5.17:

write(*,'(a,g0.4e4,a)') ">",3.45e65_8,"<"
                 1
Error: E specifier not allowed with g0 descriptor in format string at (1)

I think its safe for 4.4 and it is part of the g0 patch which is a wrong code 
bug fix.

Regression tested on x86-64.  I need to dejagnu the test case and make a change 
log entry.

OK for trunk or wait for 4.5?

Jerry
-------------- next part --------------
A non-text attachment was scrubbed...
Name: pr38398.diff
Type: text/x-diff
Size: 2060 bytes
Desc: not available
URL: <http://gcc.gnu.org/pipermail/fortran/attachments/20081214/ea4bee86/attachment.bin>
-------------- next part --------------
An embedded and charset-unspecified text was scrubbed...
Name: fmt_g0_4.f90
URL: <http://gcc.gnu.org/pipermail/fortran/attachments/20081214/ea4bee86/attachment.f90>