aboutsummaryrefslogtreecommitdiffstats
path: root/src/synth/synth-environment.adb
diff options
context:
space:
mode:
Diffstat (limited to 'src/synth/synth-environment.adb')
-rw-r--r--src/synth/synth-environment.adb2
1 files changed, 1 insertions, 1 deletions
diff --git a/src/synth/synth-environment.adb b/src/synth/synth-environment.adb
index 9c9385dd4..bd5202e6a 100644
--- a/src/synth/synth-environment.adb
+++ b/src/synth/synth-environment.adb
@@ -415,7 +415,7 @@ package body Synth.Environment is
Partial_Assign_Table.Table (P);
begin
if Synth.Flags.Flag_Debug_Noinference then
- Res := Pa.Value;
+ Add_Conc_Assign (Wid, Pa.Value, Pa.Offset);
elsif Wire_Rec.Kind = Wire_Enable then
-- Possibly infere a idff/iadff.
pragma Assert (Pa.Offset = 0);