aboutsummaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorRobert Dewar <dewar@adacore.com>2008-08-04 10:37:40 +0200
committerArnaud Charlet <charlet@gcc.gnu.org>2008-08-04 10:37:40 +0200
commit2ca90ff00c7d0fbfc8107ab2a8a3f565c6d7727c (patch)
treeacde14bcd5eae85a7ffccfd494429bc16d7a9b8e
parent9b7c38af5a3a50ab65167bac2940ddb287811acd (diff)
downloadgcc-2ca90ff00c7d0fbfc8107ab2a8a3f565c6d7727c.zip
gcc-2ca90ff00c7d0fbfc8107ab2a8a3f565c6d7727c.tar.gz
gcc-2ca90ff00c7d0fbfc8107ab2a8a3f565c6d7727c.tar.bz2
system-darwin-x86.ads: Correct bad definition of Max_Nonbinary_Modulus
2008-08-04 Robert Dewar <dewar@adacore.com> * system-darwin-x86.ads: Correct bad definition of Max_Nonbinary_Modulus From-SVN: r138576
-rw-r--r--gcc/ada/system-darwin-x86.ads2
1 files changed, 1 insertions, 1 deletions
diff --git a/gcc/ada/system-darwin-x86.ads b/gcc/ada/system-darwin-x86.ads
index 04cdbbc..1b84681 100644
--- a/gcc/ada/system-darwin-x86.ads
+++ b/gcc/ada/system-darwin-x86.ads
@@ -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;