system-darwin-x86.ads: Correct bad definition of Max_Nonbinary_Modulus
authorRobert Dewar <dewar@adacore.com>
Mon, 4 Aug 2008 08:37:40 +0000 (10:37 +0200)
committerArnaud Charlet <charlet@gcc.gnu.org>
Mon, 4 Aug 2008 08:37:40 +0000 (10:37 +0200)
2008-08-04  Robert Dewar  <dewar@adacore.com>

* system-darwin-x86.ads: Correct bad definition of Max_Nonbinary_Modulus

From-SVN: r138576

gcc/ada/system-darwin-x86.ads

index 04cdbbcf94f8bd7b441d75f086f412d5ea6218fc..1b846813d4b2c9954607769d80e3615e080ca289 100644 (file)
@@ -51,7 +51,7 @@ package System is
    Max_Int               : constant := Long_Long_Integer'Last;
 
    Max_Binary_Modulus    : constant := 2 ** Long_Long_Integer'Size;
-   Max_Nonbinary_Modulus : constant := Integer'Last;
+   Max_Nonbinary_Modulus : constant := 2 ** Integer'Size - 1;
 
    Max_Base_Digits       : constant := Long_Long_Float'Digits;
    Max_Digits            : constant := Long_Long_Float'Digits;