diff options
| author | Tristan Gingold <tgingold@free.fr> | 2022-06-12 06:08:27 +0200 |
|---|---|---|
| committer | Tristan Gingold <tgingold@free.fr> | 2022-06-12 06:08:27 +0200 |
| commit | 4dc88dabe739571c3a8e5136fe7c97f8cc7c0bf3 (patch) | |
| tree | f007b3dcc4611a1959f3e4f9d63ece1b06b58f95 /src/vhdl/vhdl-sem.adb | |
| parent | ad930baf9525e4dddc1e4bd24435ba3fa8bd4625 (diff) | |
| download | ghdl-4dc88dabe739571c3a8e5136fe7c97f8cc7c0bf3.tar.gz ghdl-4dc88dabe739571c3a8e5136fe7c97f8cc7c0bf3.tar.bz2 ghdl-4dc88dabe739571c3a8e5136fe7c97f8cc7c0bf3.zip | |
vhdl-nodes: add Inertial_Flag for association_element_by_expression
Diffstat (limited to 'src/vhdl/vhdl-sem.adb')
| -rw-r--r-- | src/vhdl/vhdl-sem.adb | 3 |
1 files changed, 3 insertions, 0 deletions
diff --git a/src/vhdl/vhdl-sem.adb b/src/vhdl/vhdl-sem.adb index d24652797..804b11f8e 100644 --- a/src/vhdl/vhdl-sem.adb +++ b/src/vhdl/vhdl-sem.adb @@ -566,6 +566,9 @@ package body Vhdl.Sem is -- The actual, if an expression, must be a globally -- static expression. if Get_Expr_Staticness (Actual) < Globally then + -- This is an inertial association. + Set_Inertial_Flag (Assoc, True); + if Flags.Vhdl_Std < Vhdl_08 then -- LRM08 6.5.6.3 Port clauses Error_Msg_Sem |