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.adb4
1 files changed, 2 insertions, 2 deletions
diff --git a/src/vhdl/translate/trans-chap8.adb b/src/vhdl/translate/trans-chap8.adb
index 29441bca8..2d74663e5 100644
--- a/src/vhdl/translate/trans-chap8.adb
+++ b/src/vhdl/translate/trans-chap8.adb
@@ -2665,7 +2665,7 @@ package body Trans.Chap8 is
In_Conv := Null_Iir;
when Iir_Kind_Association_Element_By_Expression =>
Act := Get_Actual (El);
- In_Conv := Get_In_Conversion (El);
+ In_Conv := Get_Actual_Conversion (El);
when Iir_Kind_Association_Element_By_Individual =>
Actual_Type := Get_Actual_Type (El);
@@ -3216,7 +3216,7 @@ package body Trans.Chap8 is
end case;
end if;
- Out_Conv := Get_Out_Conversion (El);
+ Out_Conv := Get_Formal_Conversion (El);
if Out_Conv = Null_Iir then
Out_Expr := Formal;
Val := M2E (Param);