aboutsummaryrefslogtreecommitdiffstats
path: root/src/grt
diff options
context:
space:
mode:
authorTristan Gingold <tgingold@free.fr>2022-08-24 21:47:43 +0200
committerTristan Gingold <tgingold@free.fr>2022-08-24 21:47:43 +0200
commit461261a43ef650a42d8a39018acbbd6a2cdff8a6 (patch)
tree5395e46617f545ee486532f23da5221c00b61032 /src/grt
parent4f40d9fa91fcb3fc5a178b6ed5f148faa79e57fd (diff)
downloadghdl-461261a43ef650a42d8a39018acbbd6a2cdff8a6.tar.gz
ghdl-461261a43ef650a42d8a39018acbbd6a2cdff8a6.tar.bz2
ghdl-461261a43ef650a42d8a39018acbbd6a2cdff8a6.zip
grt-disp_signals: also disp conversions ranges
Diffstat (limited to 'src/grt')
-rw-r--r--src/grt/grt-disp_signals.adb11
1 files changed, 11 insertions, 0 deletions
diff --git a/src/grt/grt-disp_signals.adb b/src/grt/grt-disp_signals.adb
index d7d5df4fa..bf3befe2f 100644
--- a/src/grt/grt-disp_signals.adb
+++ b/src/grt/grt-disp_signals.adb
@@ -472,6 +472,17 @@ package body Grt.Disp_Signals is
Put (" resolved");
end if;
end if;
+ if Sig.S.Mode_Sig = Mode_Conv_In or Sig.S.Mode_Sig = Mode_Conv_Out
+ then
+ Put (" conv: ");
+ Put_I32 (stdout, Ghdl_I32 (Sig.S.Conv.Src.First));
+ Put ("..");
+ Put_I32 (stdout, Ghdl_I32 (Sig.S.Conv.Src.Last));
+ Put ("->");
+ Put_I32 (stdout, Ghdl_I32 (Sig.S.Conv.Dest.First));
+ Put ("..");
+ Put_I32 (stdout, Ghdl_I32 (Sig.S.Conv.Dest.Last));
+ end if;
if Boolean'(False) then
Put (" link: ");
Put (stdout, Sig.Link.all'Address);