2005-09-01 Thomas Quinot <quinot@adacore.com>
authorcharlet <charlet@138bc75d-0d04-0410-961f-82ee72b054a4>
Mon, 5 Sep 2005 07:53:45 +0000 (07:53 +0000)
committercharlet <charlet@138bc75d-0d04-0410-961f-82ee72b054a4>
Mon, 5 Sep 2005 07:53:45 +0000 (07:53 +0000)
commit0f3718343b79a1d8e5b542e255d617412d5b8399
tree01f1e55226746f8f5efb30d32d0ed8df86521107
parent6c292d3a44e3ee1f31ff0432e6be2f06e18aab8c
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.

git-svn-id: svn+ssh://gcc.gnu.org/svn/gcc/trunk@103863 138bc75d-0d04-0410-961f-82ee72b054a4
gcc/ada/exp_dist.adb