2008-05-26 Thomas Quinot <quinot@adacore.com>
authorThomas Quinot <quinot@adacore.com>
Mon, 26 May 2008 14:43:50 +0000 (14:43 +0000)
committerArnaud Charlet <charlet@gcc.gnu.org>
Mon, 26 May 2008 14:43:50 +0000 (16:43 +0200)
commitd693e39d020f8707434fe2e9f07849a9177fc5c5
tree1252cc9ff2c492f632b13bafa339638c0658108b
parent76fe54f07ae1d8e9a8a3bbc54dd9aaeee4105d18
2008-05-26  Thomas Quinot  <quinot@adacore.com>

* rtsfind.ads, rtsfind.adb:
(RE_Get_RACW): New runtime library entity provided by PolyORB s-parint.
(Check_RPC): Support per-PCS-kind API versioning.

exp_dist.ads, exp_dist.adb:
(Build_Stub_Tag, Get_Stub_Elements): New utility subprograms.
(PolyORB_Support.Add_RACW_From_Any): Offload common code to new runtime
 library function Get_RACW.
(PolyORB_Support.Add_RACW_To_Any): Offload common code to new runtime
library function Get_Reference.
(PolyORB_Support.Add_RACW_Read_Attribute): Use Get_RACW instead of going
through an intermediate Any.
(PolyORB_Support.Add_RACW_Write_Attribute): Use Get_Reference instead of
going through an intermediate Any.

* sem_dist.adb: Minor reformatting.

From-SVN: r135932
gcc/ada/ChangeLog
gcc/ada/exp_dist.adb
gcc/ada/exp_dist.ads
gcc/ada/rtsfind.adb
gcc/ada/rtsfind.ads
gcc/ada/sem_dist.adb