diff options
author | Tristan Gingold <tgingold@free.fr> | 2020-06-17 21:53:30 +0200 |
---|---|---|
committer | Tristan Gingold <tgingold@free.fr> | 2020-06-17 21:53:30 +0200 |
commit | 887496173322c262a976ac48d391d89255bf83f0 (patch) | |
tree | 82ff89fc4413cbc89b0132ed993c12f33a954524 /src/vhdl/translate/trans-chap8.adb | |
parent | 473c83961abe4e2fb52c8812e46bf19a41fe52cf (diff) | |
download | ghdl-887496173322c262a976ac48d391d89255bf83f0.tar.gz ghdl-887496173322c262a976ac48d391d89255bf83f0.tar.bz2 ghdl-887496173322c262a976ac48d391d89255bf83f0.zip |
vhdl: add ghdl_integer_index_check_failed. For #1257
Improve error message in case of (integer) index not in bounds.
Diffstat (limited to 'src/vhdl/translate/trans-chap8.adb')
-rw-r--r-- | src/vhdl/translate/trans-chap8.adb | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/src/vhdl/translate/trans-chap8.adb b/src/vhdl/translate/trans-chap8.adb index ecfd0d76b..ace7f61b6 100644 --- a/src/vhdl/translate/trans-chap8.adb +++ b/src/vhdl/translate/trans-chap8.adb @@ -1415,7 +1415,7 @@ package body Trans.Chap8 is Expr_Type), New_Lit (New_Index_Lit (Unsigned_64 (Sel_Length))), Ghdl_Bool_Type); - Chap6.Check_Bound_Error (Cond, Expr, 0); + Chap6.Check_Bound_Error (Cond, Expr); end if; end Translate_String_Case_Statement_Common; |