diff options
Diffstat (limited to 'src')
| -rw-r--r-- | src/vhdl/simulate/simul-execution.adb | 3 |
1 files changed, 3 insertions, 0 deletions
diff --git a/src/vhdl/simulate/simul-execution.adb b/src/vhdl/simulate/simul-execution.adb index 3aa08abcf..b953d6d51 100644 --- a/src/vhdl/simulate/simul-execution.adb +++ b/src/vhdl/simulate/simul-execution.adb @@ -2321,6 +2321,9 @@ package body Simul.Execution is when Iir_Kinds_Denoting_Name => return Execute_Bounds (Block, Get_Named_Entity (Prefix)); + when Iir_Kind_Subtype_Attribute => + return Execute_Bounds (Block, Get_Type (Prefix)); + when others => -- Error_Kind ("execute_bounds", Get_Kind (Prefix)); declare |