aboutsummaryrefslogtreecommitdiffstats
path: root/src
diff options
context:
space:
mode:
Diffstat (limited to 'src')
-rw-r--r--src/synth/netlists-disp_verilog.adb4
1 files changed, 2 insertions, 2 deletions
diff --git a/src/synth/netlists-disp_verilog.adb b/src/synth/netlists-disp_verilog.adb
index 133959e5f..1ab834fe9 100644
--- a/src/synth/netlists-disp_verilog.adb
+++ b/src/synth/netlists-disp_verilog.adb
@@ -301,7 +301,8 @@ package body Netlists.Disp_Verilog is
Nd : constant Width := W / 32;
Ld : constant Natural := Natural (W mod 32);
begin
- Put ('"');
+ Put_Uns32 (W);
+ Put ("'b");
if Ld > 0 then
Disp_Binary_Digits (Get_Param_Uns32 (Inst, Param_Idx (2 * Nd)),
Get_Param_Uns32 (Inst, Param_Idx (2 * Nd + 1)),
@@ -313,7 +314,6 @@ package body Netlists.Disp_Verilog is
Get_Param_Uns32 (Inst, Param_Idx (2 * (I - 1)) + 1),
32);
end loop;
- Put ('"');
end Disp_Const_Log;
procedure Disp_X_Lit (W : Width; C : Character) is