[Bug ada/65476] Long_Float array does not byte-swap correctly with reverse Scalar_Storage_Order

[ebotcazou at gcc dot gnu.org]

https://gcc.gnu.org/bugzilla/show_bug.cgi?id=65476

--- Comment #4 from Eric Botcazou <ebotcazou at gcc dot gnu.org> ---
Author: ebotcazou
Date: Thu Apr 30 15:01:49 2015
New Revision: 222633

URL: https://gcc.gnu.org/viewcvs?rev=222633&root=gcc&view=rev
Log:
        PR ada/65476
        * fold-const.c (native_encode_int): Revert all changes.
        (native_encode_real): Likewise.
        (native_encode_fixed): Likewise.
        (native_encode_complex): Likewise.
        (native_encode_vector): Likewise.
        (native_encode_expr): Likewise.
        (fold_flip_storage_order): Delete.
        (fold_view_convert_expr): Adjust call to native_encode_expr.
        (fold_ternary_loc): Adjust call to native_encode_expr.
        * fold-const.h (native_encode_expr): Adjust back prototype.
        (fold_flip_storage_order): Delete.
        * dwarf2out.c (native_encode_initializer): Adjust.
        * output.h (assemble_real): Adjust prototype.
        * varasm.c (assemble_real): Add REVERSE parameter.  Flip the storage
        order of the value if REVERSE is true.
        (output_constant_pool_2): Adjust call to assemble_real.
        (output_constant) <INTEGER_TYPE>: Adjust.
        <REAL_TYPE>: Adjust call to assemble_real.
        * config/arm/arm.md (consttable_4): Adjust call to assemble_real.
        (consttable_8): Likewise.
        (consttable_16): Likewise.
        * config/mips/mips.md (consttable_float): Likewise.
        * config/s390/s390.c (s390_output_pool_entry): Likewise.
        * config/sh/sh.md (consttable_sf): Likewise.
        (consttable_df): Likewise.
testsuite/
        * c-c++-common/sso/init9.h: New.
        * c-c++-common/sso/p9.c: Likewise.
        * c-c++-common/sso/q9.c: Likewise.
        * c-c++-common/sso/t9.c: Likewise.
        * gnat.dg/sso: Adjust.

Added:
    branches/scalar-storage-order/gcc/testsuite/c-c++-common/sso/init9.h
    branches/scalar-storage-order/gcc/testsuite/c-c++-common/sso/p9.c
    branches/scalar-storage-order/gcc/testsuite/c-c++-common/sso/q9.c
    branches/scalar-storage-order/gcc/testsuite/c-c++-common/sso/t9.c
    branches/scalar-storage-order/gcc/testsuite/gnat.dg/sso/init11.ads
    branches/scalar-storage-order/gcc/testsuite/gnat.dg/sso/p11.adb
    branches/scalar-storage-order/gcc/testsuite/gnat.dg/sso/q11.adb
    branches/scalar-storage-order/gcc/testsuite/gnat.dg/sso/r11.adb
    branches/scalar-storage-order/gcc/testsuite/gnat.dg/sso/s11.adb
    branches/scalar-storage-order/gcc/testsuite/gnat.dg/sso/t11.adb
    branches/scalar-storage-order/gcc/testsuite/gnat.dg/sso/u11.adb
Removed:
    branches/scalar-storage-order/gcc/testsuite/gnat.dg/sso/r10.adb
    branches/scalar-storage-order/gcc/testsuite/gnat.dg/sso/s10.adb
    branches/scalar-storage-order/gcc/testsuite/gnat.dg/sso/u10.adb
Modified:
    branches/scalar-storage-order/gcc/config/arm/arm.md
    branches/scalar-storage-order/gcc/config/mips/mips.md
    branches/scalar-storage-order/gcc/config/s390/s390.c
    branches/scalar-storage-order/gcc/config/sh/sh.md
    branches/scalar-storage-order/gcc/dwarf2out.c
    branches/scalar-storage-order/gcc/fold-const.c
    branches/scalar-storage-order/gcc/fold-const.h
    branches/scalar-storage-order/gcc/output.h
    branches/scalar-storage-order/gcc/testsuite/gnat.dg/sso/init10.ads
    branches/scalar-storage-order/gcc/testsuite/gnat.dg/sso/init9.ads
    branches/scalar-storage-order/gcc/testsuite/gnat.dg/sso/p10.adb
    branches/scalar-storage-order/gcc/testsuite/gnat.dg/sso/p9.adb
    branches/scalar-storage-order/gcc/testsuite/gnat.dg/sso/q1.adb
    branches/scalar-storage-order/gcc/testsuite/gnat.dg/sso/q10.adb
    branches/scalar-storage-order/gcc/testsuite/gnat.dg/sso/q2.adb
    branches/scalar-storage-order/gcc/testsuite/gnat.dg/sso/q3.adb
    branches/scalar-storage-order/gcc/testsuite/gnat.dg/sso/q4.adb
    branches/scalar-storage-order/gcc/testsuite/gnat.dg/sso/q5.adb
    branches/scalar-storage-order/gcc/testsuite/gnat.dg/sso/q6.adb
    branches/scalar-storage-order/gcc/testsuite/gnat.dg/sso/q7.adb
    branches/scalar-storage-order/gcc/testsuite/gnat.dg/sso/q8.adb
    branches/scalar-storage-order/gcc/testsuite/gnat.dg/sso/q9.adb
    branches/scalar-storage-order/gcc/testsuite/gnat.dg/sso/t10.adb
    branches/scalar-storage-order/gcc/testsuite/gnat.dg/sso/t9.adb
    branches/scalar-storage-order/gcc/varasm.c