From fb30460433764b495dc05d5a1a90acb724a7706a Mon Sep 17 00:00:00 2001 From: Tristan Gingold Date: Thu, 26 Sep 2019 19:42:25 +0200 Subject: synth-environment-debug: improve. --- src/synth/synth-environment-debug.adb | 3 ++- 1 file changed, 2 insertions(+), 1 deletion(-) (limited to 'src/synth/synth-environment-debug.adb') diff --git a/src/synth/synth-environment-debug.adb b/src/synth/synth-environment-debug.adb index ca7c989b8..7f378130b 100644 --- a/src/synth/synth-environment-debug.adb +++ b/src/synth/synth-environment-debug.adb @@ -29,10 +29,11 @@ package body Synth.Environment.Debug is Put ("Wire:" & Wire_Id'Image (Id)); Put_Line (" kind: " & Wire_Kind'Image (W_Rec.Kind)); Put_Line (" decl:" & Source.Syn_Src'Image (W_Rec.Decl)); - Put (" Init: "); + Put (" gate: "); Dump_Net_Name (W_Rec.Gate); New_Line; Put_Line (" cur_assign:" & Seq_Assign'Image (W_Rec.Cur_Assign)); + Put_Line (" conc_assign:" & Conc_Assign'Image(W_Rec.Final_Assign)); end Dump_Wire_Id; procedure Dump_Assign (Asgn : Seq_Assign) -- cgit v1.2.3