diff options
author | Tristan Gingold <tgingold@free.fr> | 2019-10-06 08:45:30 +0200 |
---|---|---|
committer | Tristan Gingold <tgingold@free.fr> | 2019-10-06 08:45:30 +0200 |
commit | d444e0db133898308795ffbf8081330e6a33ed4f (patch) | |
tree | f75236803875b414516ca6435f1df46716c498c3 /src/synth/netlists-dump.adb | |
parent | a98fae8775c39688e70b526f9e332740b2e380e4 (diff) | |
download | ghdl-d444e0db133898308795ffbf8081330e6a33ed4f.tar.gz ghdl-d444e0db133898308795ffbf8081330e6a33ed4f.tar.bz2 ghdl-d444e0db133898308795ffbf8081330e6a33ed4f.zip |
netlists-dump: add prefix to numbers.
Diffstat (limited to 'src/synth/netlists-dump.adb')
-rw-r--r-- | src/synth/netlists-dump.adb | 16 |
1 files changed, 8 insertions, 8 deletions
diff --git a/src/synth/netlists-dump.adb b/src/synth/netlists-dump.adb index cfd0bd3a7..e2b6f7ee8 100644 --- a/src/synth/netlists-dump.adb +++ b/src/synth/netlists-dump.adb @@ -92,9 +92,9 @@ package body Netlists.Dump is Dump_Name (Get_Input_Desc (Get_Module (Inst), Idx).Name); end if; if With_Id then - Put ('('); + Put ("{p"); Put_Trim (Input'Image (I)); - Put (')'); + Put ('}'); end if; end Dump_Input_Name; @@ -111,9 +111,9 @@ package body Netlists.Dump is Dump_Name (Get_Output_Desc (Get_Module (Inst), Idx).Name); end if; if With_Id then - Put ('('); + Put ("{n"); Put_Trim (Net'Image (N)); - Put (')'); + Put ('}'); end if; end Dump_Net_Name; @@ -136,9 +136,9 @@ package body Netlists.Dump is Put_Indent (Indent); Put ("instance "); Dump_Name (Get_Name (Inst)); - Put (" ("); + Put (" {i"); Put_Trim (Instance'Image (Inst)); - Put (')'); + Put ('}'); Put (": "); Dump_Name (Get_Name (Get_Module (Inst))); New_Line; @@ -195,9 +195,9 @@ package body Netlists.Dump is begin -- Module id and name. Put_Indent (Indent); - Put ("module @"); + Put ("module {m"); Put_Trim (Module'Image (M)); - Put (" "); + Put ("} "); Dump_Name (Get_Name (M)); New_Line; |