diff options
author | Tristan Gingold <tgingold@free.fr> | 2021-03-17 21:19:15 +0100 |
---|---|---|
committer | Tristan Gingold <tgingold@free.fr> | 2021-03-17 21:19:15 +0100 |
commit | 8eb6eb35ae475be271cef614af0256282286606b (patch) | |
tree | 2ba9c18c618278d25f66fa566d2ccf8b6e1672b6 /src/synth/netlists-dump.ads | |
parent | b38003fe6a2a12af7f2e13b4ac8c28245a48575e (diff) | |
download | ghdl-8eb6eb35ae475be271cef614af0256282286606b.tar.gz ghdl-8eb6eb35ae475be271cef614af0256282286606b.tar.bz2 ghdl-8eb6eb35ae475be271cef614af0256282286606b.zip |
netlists-dump: also dump attributes
Diffstat (limited to 'src/synth/netlists-dump.ads')
-rw-r--r-- | src/synth/netlists-dump.ads | 7 |
1 files changed, 7 insertions, 0 deletions
diff --git a/src/synth/netlists-dump.ads b/src/synth/netlists-dump.ads index afef798b3..2fcb429be 100644 --- a/src/synth/netlists-dump.ads +++ b/src/synth/netlists-dump.ads @@ -23,6 +23,13 @@ package Netlists.Dump is -- If set, print nets/instances/modules identifier. Flag_Disp_Id : Boolean := True; + Bchar : constant array (Uns32 range 0 .. 3) of Character := "01ZX"; + + procedure Put_Id (N : Name_Id); + procedure Disp_Binary_Digits (Va : Uns32; Zx : Uns32; W : Natural); + procedure Disp_Pval_Binary (Pv : Pval); + procedure Disp_Pval_String (Pv : Pval); + procedure Dump_Name (N : Sname); procedure Dump_Net_Name (N : Net; With_Id : Boolean := False); |