Commit 8ae354bd authored by yoogx's avatar yoogx

* Minor reformatting

parent 2de32618
......@@ -6,7 +6,7 @@
-- --
-- B o d y --
-- --
-- Copyright (C) 2005-2009 Telecom ParisTech, 2010-2012 ESA & ISAE. --
-- Copyright (C) 2005-2009 Telecom ParisTech, 2010-2013 ESA & ISAE. --
-- --
-- Ocarina is free software; you can redistribute it and/or modify --
-- it under terms of the GNU General Public License as published by the --
......@@ -212,9 +212,7 @@ package body Ocarina.Instances.Components is
-- Instantiate the component type
New_Instance := Instantiate_Component
(Instance_Root,
Component_Type,
New_Instance);
(Instance_Root, Component_Type, New_Instance);
end;
end if;
......@@ -414,8 +412,8 @@ package body Ocarina.Instances.Components is
if Present (Parent (Component)) then
declare
The_Parent : constant Node_Id := ATE.Get_Referenced_Entity
(Parent
(Component));
(Parent (Component));
begin
-- Annotate the parent component with the current
-- component.
......
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