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

[Jerry DeLisle]

Tobias Burnus wrote:
> Jerry,
> 
> thanks for the update, but I think the output is unfortunately not yet
> is standard conform. Compare the output of g<w> for w = 0 and w != 0:
> 
> PRINT '(g10.5)', 1d1
> PRINT '(g10.5)', 1d100
> PRINT '(g0.5)', 1d1
> PRINT '(g0.5)', 1d100
> end
> 
> The output is:
> 
> 10.000
> .10000+101
> 10.00000
> 10000000000000000159029000000000000000000000000000000000000000000000000000000000000000000000000000000.00000
> 
> I would expect for the last line some "E" ouput.
> 
OK working on it.  Thanks for this review.  I am doing thirteen things at once 
today.  Hard for me to see all the cases at once.

Jerry