[Bug fortran/36420] Fortran 2008: g0 edit descriptor

[jvdelisle at gcc dot gnu dot org]

------- Comment #5 from jvdelisle at gcc dot gnu dot org  2008-06-08 00:00 -------
Subject: Bug 36420

Author: jvdelisle
Date: Sat Jun  7 23:59:53 2008
New Revision: 136545

URL: http://gcc.gnu.org/viewcvs?root=gcc&view=rev&rev=136545
Log:
2008-06-07  Jerry DeLisle  <jvdelisle@gcc.gnu.org>

        PR libfortran/36420
        PR libfortran/36421
        PR libfortran/36422
        * io/io.h: Add prototype for write_real.
        * io/transfer.c (formatted_transfer_scalar): For FMT_G and width zero,
        use write_real.
        * io/format.c: Add zero width error message. (parse_format_list): Use
        error message for FMT_A if followed by FMT_ZERO. Use zero width error
        message for FMT_G if mode is READ or if -std=f95 or f2003. (fmormat0):
        Fix typo in comment.
        * io/write.c (write_a): Set wlen to len if FMT_G and length is zero.
        (write_l): Add wlen variable and use it if FMT_G and width is zero.
        (write_decimal): If FMT_G, set m to -1 to flag processor dependent
        formatting. (write_real): Remove static declaration.

Modified:
    trunk/libgfortran/ChangeLog
    trunk/libgfortran/io/format.c
    trunk/libgfortran/io/io.h
    trunk/libgfortran/io/transfer.c
    trunk/libgfortran/io/write.c


-- 


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