Commit 67a82805 authored by Bechir Zalila's avatar Bechir Zalila

* (ocarina-me_aadl-aadl_tree-debug.adb): Fixsed a bug that caused

	infinite loop when dumping a tree with a recognized annex
parent 886c0455
......@@ -190,9 +190,11 @@ package body Ocarina.ME_AADL.AADL_Tree.Debug is
Write_Line (V);
end if;
-- XXX Why skipping these cases ?
-- We skip these cases to avoid infinite loop when dumping a tree.
if A /= "Corresponding_Entity"
and then A /= "Corresponding_Declaration"
and then A /= "Corresponding_Annex"
and then A /= "Container_Component"
and then A /= "Item"
and then A /= "Extra_Item"
......
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