Commit aed798db authored by yoogx's avatar yoogx
Browse files

* Minor reformatting

parent 98379f03
...@@ -157,11 +157,7 @@ package body Ocarina.Backends.PO_HI_C.Runtime is ...@@ -157,11 +157,7 @@ package body Ocarina.Backends.PO_HI_C.Runtime is
N := New_Node (K_Defining_Identifier); N := New_Node (K_Defining_Identifier);
Set_Name (N, Name); Set_Name (N, Name);
if E = RH_Subprograms then Local := E = Rh_Subprograms;
Local := True;
else
Local := False;
end if;
RHD (E) := Make_Include_Clause (N, Local); RHD (E) := Make_Include_Clause (N, Local);
end loop; end loop;
......
...@@ -2313,6 +2313,7 @@ package body Ocarina.Backends.Properties is ...@@ -2313,6 +2313,7 @@ package body Ocarina.Backends.Properties is
(Parent_Component (Get_Referenced_Entity (AIN.Source (C))))) (Parent_Component (Get_Referenced_Entity (AIN.Source (C)))))
then then
return No_Node; return No_Node;
elsif not Is_Defined_List_Property (C, Connection_Binding) then elsif not Is_Defined_List_Property (C, Connection_Binding) then
if Check then if Check then
Display_Located_Error Display_Located_Error
......
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