aboutsummaryrefslogtreecommitdiffstats
path: root/translate/grt
diff options
context:
space:
mode:
Diffstat (limited to 'translate/grt')
-rw-r--r--translate/grt/grt-signals.adb4
1 files changed, 2 insertions, 2 deletions
diff --git a/translate/grt/grt-signals.adb b/translate/grt/grt-signals.adb
index 505b28198..1cdd1b58f 100644
--- a/translate/grt/grt-signals.adb
+++ b/translate/grt/grt-signals.adb
@@ -3052,8 +3052,8 @@ package body Grt.Signals is
Mark_Active (Sig);
Trans := Sig.S.Drivers (0).Last_Trans;
- Sig.Driving_Value := Trans.Val_Ptr.all;
- Sig.S.Drivers (0).First_Trans.Val := Trans.Val_Ptr.all;
+ Direct_Assign (Sig.Driving_Value, Trans.Val_Ptr, Sig.Mode);
+ Sig.S.Drivers (0).First_Trans.Val := Sig.Driving_Value;
Set_Effective_Value (Sig, Sig.Driving_Value);
when Net_One_Resolved =>