diff options
Diffstat (limited to 'gcc/ada/g-alleve.adb')
| -rw-r--r-- | gcc/ada/g-alleve.adb | 16 |
1 files changed, 8 insertions, 8 deletions
diff --git a/gcc/ada/g-alleve.adb b/gcc/ada/g-alleve.adb index 329106f8ece..33a8d49fbcc 100644 --- a/gcc/ada/g-alleve.adb +++ b/gcc/ada/g-alleve.adb @@ -1864,7 +1864,7 @@ package body GNAT.Altivec.Low_Level_Vectors is function To_Pixel (Source : unsigned_short) return Pixel_16 is - -- This conversion should not depend on the host endianess; + -- This conversion should not depend on the host endianness; -- therefore, we cannot use an unchecked conversion. Target : Pixel_16; @@ -1879,7 +1879,7 @@ package body GNAT.Altivec.Low_Level_Vectors is function To_Pixel (Source : unsigned_int) return Pixel_32 is - -- This conversion should not depend on the host endianess; + -- This conversion should not depend on the host endianness; -- therefore, we cannot use an unchecked conversion. Target : Pixel_32; @@ -1898,10 +1898,10 @@ package body GNAT.Altivec.Low_Level_Vectors is function To_unsigned_int (Source : Pixel_32) return unsigned_int is - -- This conversion should not depend on the host endianess; + -- This conversion should not depend on the host endianness; -- therefore, we cannot use an unchecked conversion. -- It should also be the same result, value-wise, on two hosts - -- with the same endianess. + -- with the same endianness. Target : unsigned_int := 0; @@ -1930,10 +1930,10 @@ package body GNAT.Altivec.Low_Level_Vectors is function To_unsigned_short (Source : Pixel_16) return unsigned_short is - -- This conversion should not depend on the host endianess; + -- This conversion should not depend on the host endianness; -- therefore, we cannot use an unchecked conversion. -- It should also be the same result, value-wise, on two hosts - -- with the same endianess. + -- with the same endianness. Target : unsigned_short := 0; @@ -2765,9 +2765,9 @@ package body GNAT.Altivec.Low_Level_Vectors is -- ??? Check the precision of the operation. -- As described in [PEM-6 vexptefp]: - -- If theorical_result is equal to 2 at the power of A (J) with + -- If theoretical_result is equal to 2 at the power of A (J) with -- infinite precision, we should have: - -- abs ((D (J) - theorical_result) / theorical_result) <= 1/16 + -- abs ((D (J) - theoretical_result) / theoretical_result) <= 1/16 D.Values (J) := 2.0 ** NJ_Truncate (VA.Values (J)); end loop; |