OpenE2K/gcc
2
0
Fork 0
Code Issues Pull Requests Projects Releases Wiki Activity

exp_ch6.adb: Omit check for init proc.

Browse Source 
2013-04-22  Ed Schonberg  <schonberg@adacore.com>

	* exp_ch6.adb: Omit check for init proc.

From-SVN: r198131
This commit is contained in:
Ed Schonberg 2013-04-22 12:47:36 +02:00 committed by Arnaud Charlet
parent f6820c2d0e
commit 1de0ffecde
1 changed files with 1 additions and 0 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

1
gcc/ada/exp_ch6.adb
View File

@ -1709,6 +1709,7 @@ package body Exp_Ch6 is
if Is_By_Reference_Type (E_Formal)
and then Has_Predicates (E_Actual)
and then not Is_Init_Proc (Subp)
then
if Is_Derived_Type (E_Actual)
and then Is_Inherited_Operation_For_Type (Subp, E_Actual)