diff options
Diffstat (limited to 'src/vhdl/vhdl-sem_inst.ads')
| -rw-r--r-- | src/vhdl/vhdl-sem_inst.ads | 11 |
1 files changed, 10 insertions, 1 deletions
diff --git a/src/vhdl/vhdl-sem_inst.ads b/src/vhdl/vhdl-sem_inst.ads index 6d8a76300..1099479de 100644 --- a/src/vhdl/vhdl-sem_inst.ads +++ b/src/vhdl/vhdl-sem_inst.ads @@ -21,7 +21,16 @@ package Vhdl.Sem_Inst is -- If N is not an instance, this function returns Null_Iir. function Get_Origin (N : Iir) return Iir; - -- Create declaration chain and generic declarations for INST from PKG. + -- Create declaration chain and generic declarations for INTER from PKG, + -- so the the parent of INTER can be analyzed and references to PKG + -- points to an instance. + -- It is necessary to create an instance because two interface packages + -- are different even if they have the same uninstantiated package. + procedure Instantiate_Interface_Package_Declaration + (Inter : Iir; Pkg : Iir); + + -- - package instantiations + -- instantiate each node. procedure Instantiate_Package_Declaration (Inst : Iir; Pkg : Iir); -- Create interface parameters of INST from SUBPRG. |