[Bug libfortran/59771] Cleanup handling of Gw.0 and Gw.0Ee format

[jvdelisle at gcc dot gnu.org]

http://gcc.gnu.org/bugzilla/show_bug.cgi?id=59771

Jerry DeLisle <jvdelisle at gcc dot gnu.org> changed:

           What    |Removed                     |Added
----------------------------------------------------------------------------
             Status|UNCONFIRMED                 |NEW
   Last reconfirmed|                            |2014-01-11
     Ever confirmed|0                           |1

--- Comment #1 from Jerry DeLisle <jvdelisle at gcc dot gnu.org> ---
A simple test case:

 PRINT '(6(1X,1PG9.0e2))', 0.0, 0.04, 0.06, 0.4, 0.6, 243.0
 PRINT '(6(1X,1PE9.0e2))', 0.0, 0.04, 0.06, 0.4, 0.6, 243.0

end

Without patch:

 ./a.out 
At line 1 of file pr48906.f90 (unit = 6, file = 'stdout')
Internal Error: Unspecified precision

With patch:

 ./a.out 
    0.E+00    4.E-02    6.E-02    4.E-01    6.E-01    2.E+02
    0.E+00    4.E-02    6.E-02    4.E-01    6.E-01    2.E+02