| commit | 298a486c58180adddd99c81217b394f7e4d4bd35 | |
| author | Eric Botcazou <ebotcazou@adacore.com> | |
| Thu, 25 May 2023 14:40:35 +0000 (25 16:40 +0200) | ||
| committer | Marc Poulhiès <poulhies@adacore.com> | |
| Tue, 20 Jun 2023 07:30:48 +0000 (20 09:30 +0200) | ||
| tree | 2731434d273547bb7062f9702109d585594bd181 | treesnapshot (tar.gz zip) |
| parent | adc853f0661dcb4d1204d1a89ed49446ec01a980 | commitdiff |
ada: Introduce -gnateH switch to force reverse Bit_Order threshold to 64
This can be helpful for legacy code that still makes use of an original
reverse Bit_Order clause, i.e. without a Scalar_Storage_Order clause.
gcc/ada/
* doc/gnat_ugn/building_executable_programs_with_gnat.rst (Compiler
Switches): Document -gnateH.
* opt.ads (Reverse_Bit_Order_Threshold): New variable.
* sem_ch13.adb (Adjust_Record_For_Reverse_Bit_Order): Use its value
if it is nonnegative instead of System_Max_Integer_Size.
* switch-c.adb (Scan_Front_End_Switches): Deal with -gnateH.
* usage.adb (Usage): Print -gnateH.
* gnat_ugn.texi: Regenerate.
This can be helpful for legacy code that still makes use of an original
reverse Bit_Order clause, i.e. without a Scalar_Storage_Order clause.
gcc/ada/
* doc/gnat_ugn/building_executable_programs_with_gnat.rst (Compiler
Switches): Document -gnateH.
* opt.ads (Reverse_Bit_Order_Threshold): New variable.
* sem_ch13.adb (Adjust_Record_For_Reverse_Bit_Order): Use its value
if it is nonnegative instead of System_Max_Integer_Size.
* switch-c.adb (Scan_Front_End_Switches): Deal with -gnateH.
* usage.adb (Usage): Print -gnateH.
* gnat_ugn.texi: Regenerate.