2008-05-26 Doug Rupp <rupp@adacore.com>
authorcharlet <charlet@138bc75d-0d04-0410-961f-82ee72b054a4>
Mon, 26 May 2008 15:15:05 +0000 (15:15 +0000)
committercharlet <charlet@138bc75d-0d04-0410-961f-82ee72b054a4>
Mon, 26 May 2008 15:15:05 +0000 (15:15 +0000)
commita5093862059fbc434fc70fa576e93c6adc0d116a
tree5e0a6811cf8fd2ec5c50fc4076e9568d472fb65b
parent6dfb88d8a9c82289878fc79da01dffda8cba4f8d
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.

git-svn-id: svn+ssh://gcc.gnu.org/svn/gcc/trunk@135937 138bc75d-0d04-0410-961f-82ee72b054a4
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