* Check fully qualified name iff using AADLv2

546e3e33 · yoogx · e1996081 · 546e3e33
Commit 546e3e33 authored Nov 30, 2015 by yoogx
Hide whitespace changes
Inline Side-by-side

Showing with 1 addition and 1 deletion

src/core/tree/ocarina-me_aadl-aadl_tree-entities.adb src/core/tree/ocarina-me_aadl-aadl_tree-entities.adb +1 -1

No files found.
--- a/src/core/tree/ocarina-me_aadl-aadl_tree-entities.adb
+++ b/src/core/tree/ocarina-me_aadl-aadl_tree-entities.adb
@@ -172,7 +172,7 @@ package body Ocarina.ME_AADL.AADL_Tree.Entities is
         return No_Name;
      end if;

-      if Fully_Qualified then
+      if Fully_Qualified and then AADL_Version = AADL_V2 then
         Package_Name :=
           Display_Name (Identifier (Namespace (Entity)));