[gcc/devel/gccgo] [Ada] Add Address_Int declaration in s-auxdec.ads
Ian Lance Taylor
ian@gcc.gnu.org
Sun Jul 12 18:55:05 GMT 2020
https://gcc.gnu.org/g:c35b8eed79041b1d8f6001904a4c55d6e56ebb21
commit c35b8eed79041b1d8f6001904a4c55d6e56ebb21
Author: Arnaud Charlet <charlet@adacore.com>
Date: Fri Jan 3 11:18:18 2020 -0500
[Ada] Add Address_Int declaration in s-auxdec.ads
2020-06-03 Arnaud Charlet <charlet@adacore.com>
gcc/ada/
* libgnat/s-auxdec.ads (Address_Int): New.
Diff:
---
gcc/ada/libgnat/s-auxdec.ads | 2 ++
1 file changed, 2 insertions(+)
diff --git a/gcc/ada/libgnat/s-auxdec.ads b/gcc/ada/libgnat/s-auxdec.ads
index f421b2c0ec1..66a9c9e77c7 100644
--- a/gcc/ada/libgnat/s-auxdec.ads
+++ b/gcc/ada/libgnat/s-auxdec.ads
@@ -198,6 +198,8 @@ package System.Aux_DEC is
type Unsigned_Quadword_Array is
array (Integer range <>) of Unsigned_Quadword;
+ subtype Address_Int is Integer;
+
function To_Address (X : Integer) return Address;
pragma Pure_Function (To_Address);
More information about the Gcc-cvs
mailing list