[Bug fortran/37498] [4.4 Regression] Incorrect array value returned - 4.3 ABI Broken

["jvdelisle at gcc dot gnu dot org" <gcc-bugzilla at gcc dot gnu dot org>]

------- Comment #20 from jvdelisle at gcc dot gnu dot org  2008-09-26 06:21 -------
Subject: Bug 37498

Author: jvdelisle
Date: Fri Sep 26 06:19:42 2008
New Revision: 140684

URL: http://gcc.gnu.org/viewcvs?root=gcc&view=rev&rev=140684
Log:
2008-09-25  Jerry DeLisle  <jvdelisle@gcc.gnu.org

        PR libfortran/37498
        * list_read.c (eat_separator): Revert previous patch and move
        delim_status, decimal_status, and pad_status to gfc_unit.
        (parse_real): Ditto. (read_real): Ditto.
        * read.c (read_a): Likewise. (read_a_char4): Likewise.
        (read_f): Likewise.
        * inquire.c (inquire_via_unit): Add missing check for
        IOPARM_INQUIRE_HAS_FLAGS2. (inquire_via_filename): Likewise.
        * io.h (unit_sign_s): Move delim_status, decimal_status, and pad_status
        to gfc_unit.
        * transfer.c (read_sf): Ditto. (read_block_form): Ditto.
        (formatted_transfer_scalar): Ditto. (data_transfer_init): Ditto.
        * write.c (write_default_char4): Ditto. (write_utf8_char4): Ditto.
        (write_character): Ditto. (write_real_g0): Ditto.
        (list_formatted_write_scalar): Ditto. (nml_write_obj): Ditto.
        (namelist_write): Ditto.
        * write_float.def (calculate_sign): Ditto. (output_float): Ditto.

Modified:
    trunk/libgfortran/ChangeLog
    trunk/libgfortran/io/inquire.c
    trunk/libgfortran/io/io.h
    trunk/libgfortran/io/list_read.c
    trunk/libgfortran/io/read.c
    trunk/libgfortran/io/transfer.c
    trunk/libgfortran/io/write.c
    trunk/libgfortran/io/write_float.def


-- 


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