diff options
| author | Eric Botcazou <ebotcazou@adacore.com> | 2023-05-25 16:40:35 +0200 |
|---|---|---|
| committer | Marc Poulhiès <poulhies@adacore.com> | 2023-06-20 09:30:48 +0200 |
| commit | 298a486c58180adddd99c81217b394f7e4d4bd35 (patch) | |
| tree | 2731434d273547bb7062f9702109d585594bd181 /gcc/ada/usage.adb | |
| parent | adc853f0661dcb4d1204d1a89ed49446ec01a980 (diff) | |
| download | gcc-298a486c58180adddd99c81217b394f7e4d4bd35.zip gcc-298a486c58180adddd99c81217b394f7e4d4bd35.tar.gz gcc-298a486c58180adddd99c81217b394f7e4d4bd35.tar.bz2 | |
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.
Diffstat (limited to 'gcc/ada/usage.adb')
| -rw-r--r-- | gcc/ada/usage.adb | 5 |
1 files changed, 5 insertions, 0 deletions
diff --git a/gcc/ada/usage.adb b/gcc/ada/usage.adb index 58cfa78..681ece5 100644 --- a/gcc/ada/usage.adb +++ b/gcc/ada/usage.adb @@ -199,6 +199,11 @@ begin Write_Switch_Char ("eG"); Write_Line ("Generate preprocessed source"); + -- Line for -gnateH switch + + Write_Switch_Char ("eH"); + Write_Line ("Set reverse Bit_Order threshold to 64"); + -- Line for -gnatei switch Write_Switch_Char ("einn"); |