ada: Remove Is_Descendant_Of_Address flag from Standard_Address
commit1a9c7e9ca214d107b52d4ecd6cbb54b3bea62158
authorEric Botcazou <ebotcazou@adacore.com>
Sat, 18 Mar 2023 23:24:54 +0000 (19 00:24 +0100)
committerMarc Poulhiès <poulhies@adacore.com>
Fri, 26 May 2023 07:29:16 +0000 (26 09:29 +0200)
tree3e11a7053ea49124e294fb4dedadca640a7db12b
parent0e1bba09231634176893908f4402d57ef21477f8
ada: Remove Is_Descendant_Of_Address flag from Standard_Address

It breaks the Allow_Integer_Address special mode.

Add new standard_address parameters to gigi and alphabetize others, this is
necessary when addresses are not treated like integers.

gcc/ada/

* back_end.adb (Call_Back_End): Add gigi_standard_address to the
signature of the gigi procedure and alphabetize other parameters.
Pass Standard_Address as actual parameter for it.
* cstand.adb (Create_Standard): Do not set Is_Descendant_Of_Address
on Standard_Address.
* gcc-interface/gigi.h (gigi): Add a standard_address parameter and
alphabetize others.
* gcc-interface/trans.cc (gigi): Likewise.  Record a builtin address
type and save it as the type for Standard.Address.
gcc/ada/back_end.adb
gcc/ada/cstand.adb
gcc/ada/gcc-interface/gigi.h
gcc/ada/gcc-interface/trans.cc