aboutsummaryrefslogtreecommitdiffstats
path: root/src/synth/synth-environment-debug.adb
diff options
context:
space:
mode:
Diffstat (limited to 'src/synth/synth-environment-debug.adb')
-rw-r--r--src/synth/synth-environment-debug.adb4
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;