aboutsummaryrefslogtreecommitdiffstats
path: root/src/vhdl/translate/trans-chap3.adb
diff options
context:
space:
mode:
Diffstat (limited to 'src/vhdl/translate/trans-chap3.adb')
-rw-r--r--src/vhdl/translate/trans-chap3.adb2
1 files changed, 1 insertions, 1 deletions
diff --git a/src/vhdl/translate/trans-chap3.adb b/src/vhdl/translate/trans-chap3.adb
index 928af48a0..35bd8044e 100644
--- a/src/vhdl/translate/trans-chap3.adb
+++ b/src/vhdl/translate/trans-chap3.adb
@@ -2736,7 +2736,7 @@ package body Trans.Chap3 is
(New_Selected_Element (M2Lv (Obj),
Info.B.Bounds_Field (Kind)),
Info,
- Mode_Value,
+ Kind,
Info.B.Bounds_Type,
Info.B.Bounds_Ptr_Type);
end;