diff options
Diffstat (limited to 'src/synth/synth-environment-debug.adb')
-rw-r--r-- | src/synth/synth-environment-debug.adb | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/src/synth/synth-environment-debug.adb b/src/synth/synth-environment-debug.adb index f4a8c719b..c92b0d73d 100644 --- a/src/synth/synth-environment-debug.adb +++ b/src/synth/synth-environment-debug.adb @@ -44,7 +44,7 @@ package body Synth.Environment.Debug is Dump_Net_Name (N); Put ("{w=" & Uns32'Image (Get_Width (N)) & '}'); Put (" := "); - Disp_Instance (Get_Parent (N), False); + Disp_Instance (Get_Net_Parent (N), False); else Put ("unassigned"); end if; @@ -108,7 +108,7 @@ package body Synth.Environment.Debug is Put (", width:" & Width'Image (Get_Width (Arec.Value))); New_Line; Put (" value: "); - Disp_Instance (Get_Parent (Arec.Value), False); + Disp_Instance (Get_Net_Parent (Arec.Value), False); Asgn := Arec.Next; end; New_Line; |