aboutsummaryrefslogtreecommitdiffstats
path: root/src/synth/netlists-dump.adb
diff options
context:
space:
mode:
authorTristan Gingold <tgingold@free.fr>2019-10-06 08:45:30 +0200
committerTristan Gingold <tgingold@free.fr>2019-10-06 08:45:30 +0200
commitd444e0db133898308795ffbf8081330e6a33ed4f (patch)
treef75236803875b414516ca6435f1df46716c498c3 /src/synth/netlists-dump.adb
parenta98fae8775c39688e70b526f9e332740b2e380e4 (diff)
downloadghdl-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.adb16
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;