diff options
| -rw-r--r-- | src/vhdl/translate/trans-chap5.adb | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/src/vhdl/translate/trans-chap5.adb b/src/vhdl/translate/trans-chap5.adb index b91d6a21c..b53896033 100644 --- a/src/vhdl/translate/trans-chap5.adb +++ b/src/vhdl/translate/trans-chap5.adb @@ -582,7 +582,7 @@ package body Trans.Chap5 is -- Actual type is unconstrained, but as this is an object reads -- bounds from the object. return Chap3.Get_Composite_Bounds - (Chap6.Translate_Name (Actual, Mode_Signal)); + (Chap6.Translate_Name (Actual, Mode_Value)); end if; end Get_Actual_Bounds; |