From 96764ede5649630f4aec7d8a1491427ed2bf6716 Mon Sep 17 00:00:00 2001 From: "H.J. Lu" Date: Wed, 10 May 2017 17:36:50 +0000 Subject: [PATCH] Ada/x32: PR ada/80626: Correct Memory_Size X32 uses 64 as word size instead of 32. This must not affect the Address type definition which is based on Memory_Size. Back port from mainline PR ada/80626 * system-linux-x86.ads (Memory_Size): Use Long_Integer'Size instead of Word_Size. From-SVN: r247850 --- gcc/ada/ChangeLog | 9 +++++++++ gcc/ada/system-linux-x86.ads | 2 +- 2 files changed, 10 insertions(+), 1 deletion(-) diff --git a/gcc/ada/ChangeLog b/gcc/ada/ChangeLog index c8ff9626a31..2a6951f564a 100644 --- a/gcc/ada/ChangeLog +++ b/gcc/ada/ChangeLog @@ -1,3 +1,12 @@ +2017-05-10 H.J. Lu + + Back port from mainline + 2017-05-10 H.J. Lu + + PR ada/80626 + * system-linux-x86.ads (Memory_Size): Use Long_Integer'Size + instead of Word_Size. + 2017-05-02 Release Manager * GCC 7.1.0 released. diff --git a/gcc/ada/system-linux-x86.ads b/gcc/ada/system-linux-x86.ads index 22a212e265a..533d94efcb5 100644 --- a/gcc/ada/system-linux-x86.ads +++ b/gcc/ada/system-linux-x86.ads @@ -70,7 +70,7 @@ package System is Storage_Unit : constant := 8; Word_Size : constant := Standard'Word_Size; - Memory_Size : constant := 2 ** Word_Size; + Memory_Size : constant := 2 ** Long_Integer'Size; -- Address comparison