+2010-09-10 Robert Dewar <dewar@adacore.com>
+
+ * sem.adb: Minor reformatting.
+
2010-09-10 Bob Duff <duff@adacore.com>
* s-os_lib.ads, g-expect.ads: Add comments.
Action (Lib_Unit);
-- If the context item indicates that a package body is needed
- -- because of an instantiation in CU, traverse the body now,
- -- even if CU is not related to the main unit. If the generic
- -- itself appears in a package body, the context item is this
- -- body, and it already appears in the traversal order, so we
- -- only need to examine the case where the context item is a
- -- package declaration.
+ -- because of an instantiation in CU, traverse the body now, even
+ -- if CU is not related to the main unit. If the generic itself
+ -- appears in a package body, the context item is this body, and
+ -- it already appears in the traversal order, so we only need to
+ -- examine the case of a context item being a package declaration.
if Present (Withed_Body (Context_Item))
and then Nkind (Unit (Lib_Unit)) = N_Package_Declaration