diff options
Diffstat (limited to 'translate/grt')
-rw-r--r-- | translate/grt/grt-signals.adb | 4 |
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 => |