diff options
| author | Eric Botcazou <ebotcazou@adacore.com> | 2020-11-22 12:00:02 +0100 |
|---|---|---|
| committer | Pierre-Marie de Rodat <derodat@adacore.com> | 2020-12-14 10:51:54 -0500 |
| commit | 90b2d3fafb965f1f557966b5842c324d19f5c131 (patch) | |
| tree | ebd106316a6b277222465bb4dce1ef9459e879c7 /gcc | |
| parent | b9348660558358303d4cba070aef8590fde4894d (diff) | |
| download | gcc-90b2d3fafb965f1f557966b5842c324d19f5c131.zip gcc-90b2d3fafb965f1f557966b5842c324d19f5c131.tar.gz gcc-90b2d3fafb965f1f557966b5842c324d19f5c131.tar.bz2 | |
[Ada] Fix alignment warning in System.Fat_Gen unit
gcc/ada/
* libgnat/s-fatgen.adb (Tiny80): Add alignment clause.
Diffstat (limited to 'gcc')
| -rw-r--r-- | gcc/ada/libgnat/s-fatgen.adb | 1 |
1 files changed, 1 insertions, 0 deletions
diff --git a/gcc/ada/libgnat/s-fatgen.adb b/gcc/ada/libgnat/s-fatgen.adb index 512b7b2..950b377 100644 --- 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. |