exp_dist.adb (Add_RACW_TypeCode, [...]): Do not generate dummy access formal for...
authorThomas Quinot <quinot@adacore.com>
Mon, 5 Sep 2005 07:53:45 +0000 (09:53 +0200)
committerArnaud Charlet <charlet@gcc.gnu.org>
Mon, 5 Sep 2005 07:53:45 +0000 (09:53 +0200)
commit3eb8fddca96f1e6999a6c1e1d53e045f0221510d
tree01f1e55226746f8f5efb30d32d0ed8df86521107
parent04efc8a196dabed89d6a090da3a4b4f7a6fd6111
exp_dist.adb (Add_RACW_TypeCode, [...]): Do not generate dummy access formal for RACW/RAS TypeCode TSS.

2005-09-01  Thomas Quinot  <quinot@adacore.com>

* exp_dist.adb (Add_RACW_TypeCode, Add_RAS_TypeCode): Do not generate
dummy access formal for RACW/RAS TypeCode TSS.
(Build_TypeCode_Call): Do not generate dummy null access actual for
calls to the TypeCode TSS.

From-SVN: r103863
gcc/ada/exp_dist.adb