diff options
| -rw-r--r-- | src/vhdl/translate/trans-chap4.adb | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/src/vhdl/translate/trans-chap4.adb b/src/vhdl/translate/trans-chap4.adb index 61479932a..330900118 100644 --- a/src/vhdl/translate/trans-chap4.adb +++ b/src/vhdl/translate/trans-chap4.adb @@ -565,7 +565,7 @@ package body Trans.Chap4 is end if; end; else - Chap3.Translate_Object_Copy (Name, Value_Node, Obj_Type); + Chap7.Translate_Assign (Name, Value_Node, Value, Obj_Type, Obj); end if; end if; end Elab_Object_Init; |