* Minor reformatting

git-svn-id: https://tecsw.estec.esa.int/svn/taste/trunk/ocarina@1743 129961e7-ef38-4bb5-a8f7-c9a525a55882

src/core/model/ocarina-analyzer-aadl-finder.adb

@@ -1085,8 +1085,8 @@ package body Ocarina.Analyzer.AADL.Finder is
       Pointed_Node : Node_Id := No_Node;
    begin
       if Kind (Component) = K_Subcomponent_Access
-        and then  Component_Category'Val (Subcomponent_Category
-                                            (Component)) = CC_Subprogram
+        and then Component_Category'Val (Subcomponent_Category
+                                           (Component)) = CC_Subprogram
       then
          Pointed_Node := Node_In_Scope
            (Declaration_Identifier, Entity_Scope

src/core/model/ocarina-analyzer-real.ads

@@ -49,7 +49,7 @@ package Ocarina.Analyzer.REAL is
    --  Root procedure of analysis
 
    function Analyze_Model (Root : Node_Id) return Boolean;
-   --  Proceed to both REAL expension and analysis on the whole
+   --  Proceed to both REAL expansion and analysis on the whole
    --  AADL model
 
    procedure Register_Library_Theorems (REAL_Library : Node_Id);

src/core/tree/ocarina-me_aadl-aadl_instances-nutils.adb

@@ -416,10 +416,11 @@ package body Ocarina.ME_AADL.AADL_Instances.Nutils is
 
                --  2 - If we deal with a subprogram.
 
-               --  FIXME: This needs more effort scince a subprogram
+               --  FIXME: This needs more effort since a subprogram
                --  name should be Namespace1_Namespace2_..._Spg.
 
                Full_Name := Get_Name_Of_Entity (Instance, Display_Name);
+
             elsif Get_Category_Of_Component
               (Parent_Component (Parent_Subcomponent (Instance))) = CC_System
               and then not Keep_Root_System