diff options
| author | Robert Dewar <dewar@adacore.com> | 2015-05-22 10:32:15 +0000 |
|---|---|---|
| committer | Arnaud Charlet <charlet@gcc.gnu.org> | 2015-05-22 12:32:15 +0200 |
| commit | c2b2b2d7ab77e3c9ee9122b920c5c401151d0bca (patch) | |
| tree | 150ab6c8a17cfe56baba4c532fe7680fdabba6eb /gcc/ada/exp_ch4.adb | |
| parent | b502ba3c7b960e353e9226b69847adf368293009 (diff) | |
| download | gcc-c2b2b2d7ab77e3c9ee9122b920c5c401151d0bca.zip gcc-c2b2b2d7ab77e3c9ee9122b920c5c401151d0bca.tar.gz gcc-c2b2b2d7ab77e3c9ee9122b920c5c401151d0bca.tar.bz2 | |
exp_ch4.adb: Minor rewording.
2015-05-22 Robert Dewar <dewar@adacore.com>
* exp_ch4.adb: Minor rewording.
* exp_util.ads: Clarify that Find_Prim_Op is only for
tagged types.
From-SVN: r223539
Diffstat (limited to 'gcc/ada/exp_ch4.adb')
| -rw-r--r-- | gcc/ada/exp_ch4.adb | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/gcc/ada/exp_ch4.adb b/gcc/ada/exp_ch4.adb index b6326fc..9cf4391 100644 --- a/gcc/ada/exp_ch4.adb +++ b/gcc/ada/exp_ch4.adb @@ -7662,7 +7662,7 @@ package body Exp_Ch4 is if Is_Integer_Type (Rtyp) - -- The base value must be safe, compile-time known, and exactly 2 + -- The base value must be "safe compile-time known", and exactly 2 and then Nkind (Base) = N_Integer_Literal and then CRT_Safe_Compile_Time_Known_Value (Base) @@ -7674,7 +7674,7 @@ package body Exp_Ch4 is and then Esize (Root_Type (Exptyp)) <= Esize (Standard_Integer) -- This transformation is not applicable for a modular type with a - -- nonbinary modulus because we do not handle modular reduction in + -- non-binary modulus because we do not handle modular reduction in -- a correct manner if we attempt this transformation in this case. and then not Non_Binary_Modulus (Typ) |