aboutsummaryrefslogtreecommitdiffstats
path: root/src/vhdl/translate/trans-chap8.adb
diff options
context:
space:
mode:
Diffstat (limited to 'src/vhdl/translate/trans-chap8.adb')
-rw-r--r--src/vhdl/translate/trans-chap8.adb2
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;