From a20bce35a9ee05e8e2a4599e510d08fe2fd9ebc5 Mon Sep 17 00:00:00 2001 From: Tristan Gingold Date: Sun, 22 Aug 2021 22:14:44 +0200 Subject: Rework inertial associations. Fix #1625 Fix #1672 --- src/vhdl/vhdl-sem.adb | 8 +++++--- 1 file changed, 5 insertions(+), 3 deletions(-) (limited to 'src/vhdl/vhdl-sem.adb') diff --git a/src/vhdl/vhdl-sem.adb b/src/vhdl/vhdl-sem.adb index 142a7706b..d223935d3 100644 --- a/src/vhdl/vhdl-sem.adb +++ b/src/vhdl/vhdl-sem.adb @@ -618,9 +618,11 @@ package body Vhdl.Sem is if Get_Expr_Staticness (Actual) < Globally then if Flags.Vhdl_Std >= Vhdl_08 then -- LRM08 6.5.6.3 Port clauses - Actual := Sem_Insert_Anonymous_Signal (Formal, Actual); - Set_Actual (Assoc, Actual); - Set_Collapse_Signal_Flag (Assoc, True); + if False then + Actual := Sem_Insert_Anonymous_Signal (Formal, Actual); + Set_Actual (Assoc, Actual); + Set_Collapse_Signal_Flag (Assoc, True); + end if; else Error_Msg_Sem (+Actual, "actual expression must be globally static"); -- cgit v1.2.3