diff options
Diffstat (limited to 'simulate/simulation.adb')
| -rw-r--r-- | simulate/simulation.adb | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/simulate/simulation.adb b/simulate/simulation.adb index d951324fc..3f3f8715b 100644 --- a/simulate/simulation.adb +++ b/simulate/simulation.adb @@ -1246,7 +1246,7 @@ package body Simulation is is pragma Unreferenced (Formal_Instance); Formal : constant Iir := Get_Formal (Assoc); - Inter : constant Iir := Get_Base_Name (Formal); + Inter : constant Iir := Get_Association_Interface (Assoc); begin if False and Trace_Elaboration then Put ("connect formal "); |