diff options
| author | Tristan Gingold <tgingold@free.fr> | 2017-05-18 07:58:22 +0200 |
|---|---|---|
| committer | Tristan Gingold <tgingold@free.fr> | 2017-05-18 07:59:34 +0200 |
| commit | 095eb34ca4a8fbda0ed2aaaa90bb5aec1d10d621 (patch) | |
| tree | a43a5f69c49c368bd1b0f04cc56818fb2ad7b6a9 | |
| parent | b8655214d98075df0147015a0fab864b3f2abc86 (diff) | |
| download | ghdl-095eb34ca4a8fbda0ed2aaaa90bb5aec1d10d621.tar.gz ghdl-095eb34ca4a8fbda0ed2aaaa90bb5aec1d10d621.tar.bz2 ghdl-095eb34ca4a8fbda0ed2aaaa90bb5aec1d10d621.zip | |
Add comments.
| -rw-r--r-- | src/vhdl/translate/trans-chap2.adb | 2 |
1 files changed, 2 insertions, 0 deletions
diff --git a/src/vhdl/translate/trans-chap2.adb b/src/vhdl/translate/trans-chap2.adb index e7cc1a43f..83bc97b31 100644 --- a/src/vhdl/translate/trans-chap2.adb +++ b/src/vhdl/translate/trans-chap2.adb @@ -1528,11 +1528,13 @@ package body Trans.Chap2 is Info : constant Ortho_Info_Acc := Get_Info (Inst); Constr : O_Assoc_List; begin + -- Macro-expanded instances are handled like a regular package. if Get_Macro_Expanded_Flag (Spec) then Elab_Package (Inst, Inst); return; end if; + -- Package body is reachable through the instance. Set_Scope_Via_Var (Pkg_Info.Package_Body_Scope, Info.Package_Instance_Body_Var); |