+2002-12-15 Geert Bosch <bosch@gnat.com>
+
+ * sem_ch6.adb (Analyze_Subprogram_Body): Fix typo and formatting
+
2002-12-14 Geert Bosch <bosch@gnat.com>
* sem_ch6.adb (Analyze_Subprogram_Body): Recognize additional
if Present (Spec_Decl)
and then not Comes_From_Source (N)
-
and then
(Nkind (Original_Node (Spec_Decl)) =
- N_Subprogram_Renaming_Declaration
-
- or else (Present (Corresponding_Body (Spec_Decl))
- and then Nkind
- (Unit_Declaration_Node (Corresponding_Body (Spec_Decl))) = + N_Subprogram_Renaming_Declaration))
+ N_Subprogram_Renaming_Declaration
+ or else (Present (Corresponding_Body (Spec_Decl))
+ and then
+ Nkind (Unit_Declaration_Node
+ (Corresponding_Body (Spec_Decl))) =
+ N_Subprogram_Renaming_Declaration))
then
Conformant := True;
else