[Ada] Fix alignment warning in System.Fat_Gen unit

gcc/ada/

	* libgnat/s-fatgen.adb (Tiny80): Add alignment clause.

diff --git a/gcc/ada/libgnat/s-fatgen.adb b/gcc/ada/libgnat/s-fatgen.adb
index 512b7b21ecdaa16f10e19211508496a0350953da..950b377bb3892d38712d5b49a730a55e130148e8 100644 (file)
--- a/gcc/ada/libgnat/s-fatgen.adb
+++ b/gcc/ada/libgnat/s-fatgen.adb
@@ -68,6 +68,7 @@ package body System.Fat_Gen is
    Tiny80 : constant array (1 .. 2) of Interfaces.Unsigned_64 :=
               (1 * Standard'Default_Bit_Order,
                2**48 * (1 - Standard'Default_Bit_Order));
+   for Tiny80'Alignment use Standard'Maximum_Alignment;
    --  We cannot use the direct declaration because it cannot be translated
    --  into C90, as the hexadecimal floating constants were introduced in C99.
    --  So we work around this by using an overlay of the integer constant.