aboutsummaryrefslogtreecommitdiffstats
path: root/translate/ghdldrv/ghdlsimul.adb
diff options
context:
space:
mode:
Diffstat (limited to 'translate/ghdldrv/ghdlsimul.adb')
-rw-r--r--translate/ghdldrv/ghdlsimul.adb3
1 files changed, 2 insertions, 1 deletions
diff --git a/translate/ghdldrv/ghdlsimul.adb b/translate/ghdldrv/ghdlsimul.adb
index 27b1ce62c..17cece726 100644
--- a/translate/ghdldrv/ghdlsimul.adb
+++ b/translate/ghdldrv/ghdlsimul.adb
@@ -32,6 +32,7 @@ with Std_Package;
with Libraries;
with Canon;
with Configuration;
+with Iirs_Utils;
with Annotations;
with Elaboration;
with Sim_Be;
@@ -109,7 +110,7 @@ package body Ghdlsimul is
Conf_Unit : constant Iir := Get_Library_Unit (Top_Conf);
Arch : constant Iir :=
Get_Block_Specification (Get_Block_Configuration (Conf_Unit));
- Entity : constant Iir := Get_Entity (Arch);
+ Entity : constant Iir := Iirs_Utils.Get_Entity (Arch);
begin
Configuration.Check_Entity_Declaration_Top (Entity);
if Nbr_Errors > 0 then