2008-05-26 Doug Rupp <rupp@adacore.com>
authorDoug Rupp <rupp@adacore.com>
Mon, 26 May 2008 15:15:05 +0000 (17:15 +0200)
committerArnaud Charlet <charlet@gcc.gnu.org>
Mon, 26 May 2008 15:15:05 +0000 (17:15 +0200)
commitc986420eb0a0d4a31192dc483dee3ced6edf513b
tree5e0a6811cf8fd2ec5c50fc4076e9568d472fb65b
parenta66996b300c2b5e0f50e1eeec02cb1c898de4f19
2008-05-26  Doug Rupp  <rupp@adacore.com>

* s-vaflop.adb:
(Return_D, Return_F, Return_G): New functions.

* s-vaflop.ads:
(Return_D, Return_F, Return_G): New functions.

* exp_vfpt.adb:
(Expand_Vax_Foreign_Return): New procedure

* exp_vfpt.ads:
(Expand_Vax_Foreign_Return): New procedure

* rtsfind.ads:
(RE_Return_D, RE_Return_F, RE_Return_G): New RE_Ids
(RE_Return_D, RE_Return_F, RE_Return_G): New RE_Unit_Table elements

* exp_ch6.adb:
Import Exp_Vfpt
(Expand_N_Function_Call): Call Expand_Vax_Foreign_Return.

* s-vaflop-vms-alpha.adb:
(Return_D, Return_F, Return_G): New functions.

From-SVN: r135937
gcc/ada/exp_ch6.adb
gcc/ada/exp_vfpt.adb
gcc/ada/exp_vfpt.ads
gcc/ada/rtsfind.ads
gcc/ada/s-vaflop-vms-alpha.adb
gcc/ada/s-vaflop.adb
gcc/ada/s-vaflop.ads