diff options
Diffstat (limited to 'src')
| -rw-r--r-- | src/vhdl/vhdl-sem_expr.adb | 3 |
1 files changed, 3 insertions, 0 deletions
diff --git a/src/vhdl/vhdl-sem_expr.adb b/src/vhdl/vhdl-sem_expr.adb index 8ca0503fe..c05dcb618 100644 --- a/src/vhdl/vhdl-sem_expr.adb +++ b/src/vhdl/vhdl-sem_expr.adb @@ -4222,6 +4222,9 @@ package body Vhdl.Sem_Expr is null; end case; + -- Emit a warning if the value is known not to be within the bounds. + Eval_Check_Bound (Res, N_Type); + return Expr; end Sem_Qualified_Expression; |