From 108c98263d15c50fd19fd39926dd6aa213d30b52 Mon Sep 17 00:00:00 2001
From: Tristan Gingold <tgingold@free.fr>
Date: Sat, 21 Sep 2019 08:51:51 +0200
Subject: netlists-dump: disp width of outputs in instances.

---
 src/synth/netlists-dump.adb | 6 ++++--
 1 file changed, 4 insertions(+), 2 deletions(-)

(limited to 'src')

diff --git a/src/synth/netlists-dump.adb b/src/synth/netlists-dump.adb
index 8e1550dc9..9592dd5ea 100644
--- a/src/synth/netlists-dump.adb
+++ b/src/synth/netlists-dump.adb
@@ -167,9 +167,11 @@ package body Netlists.Dump is
       if Get_Nbr_Outputs (Inst) > 0 then
          Put_Indent (Indent + 1);
          Put ("outputs");
-         for I of Outputs (Inst) loop
+         for O of Outputs (Inst) loop
             Put (' ');
-            Dump_Net_Name (I, True);
+            Dump_Net_Name (O, True);
+            Put (':');
+            Put_Trim (Width'Image (Get_Width (O)));
          end loop;
          New_Line;
       end if;
-- 
cgit v1.2.3