Commit cce309d7 by Eric Botcazou Committed by Eric Botcazou

trans.c (elaborate_all_entities_for_package): Also skip formal objects.

	* gcc-interface/trans.c (elaborate_all_entities_for_package): Also skip
	formal objects.

From-SVN: r236280
parent b3f75672
2016-05-16 Eric Botcazou <ebotcazou@adacore.com>
* gcc-interface/trans.c (elaborate_all_entities_for_package): Also skip
formal objects.
2016-05-16 Eric Botcazou <ebotcazou@adacore.com>
* doc/gnat_rm/implementation_defined_attributes.rst
(Scalar_Storage_Order): Adjust restriction for packed array types.
* einfo.ads (Is_Bit_Packed_Array): Adjust description.
......
......@@ -8446,6 +8446,10 @@ elaborate_all_entities_for_package (Entity_Id gnat_package)
if (IN (kind, Generic_Unit_Kind))
continue;
/* Skip formal objects. */
if (IN (kind, Formal_Object_Kind))
continue;
/* Skip package bodies. */
if (kind == E_Package_Body)
continue;
......
Markdown is supported
0% or
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment