aboutsummaryrefslogtreecommitdiffstats
path: root/src
diff options
context:
space:
mode:
authorYann Herklotz <git@yannherklotz.com>2020-11-02 19:38:43 +0000
committerYann Herklotz <git@yannherklotz.com>2020-11-09 19:38:17 +0000
commit39638453bf0405b2ae58277ff3c4879b8d6d784d (patch)
treee7ac4c929c346d9e5f6fd71c3515dc380379a604 /src
parent82ee873033f51e856e69cea95db95e292bd0aea9 (diff)
downloadvericert-kvx-39638453bf0405b2ae58277ff3c4879b8d6d784d.tar.gz
vericert-kvx-39638453bf0405b2ae58277ff3c4879b8d6d784d.zip
Fix pretty printing bug in Verilog
Diffstat (limited to 'src')
-rw-r--r--src/verilog/PrintVerilog.ml4
1 files changed, 2 insertions, 2 deletions
diff --git a/src/verilog/PrintVerilog.ml b/src/verilog/PrintVerilog.ml
index 353bfac..44710b8 100644
--- a/src/verilog/PrintVerilog.ml
+++ b/src/verilog/PrintVerilog.ml
@@ -65,7 +65,7 @@ let pprint_binop l r =
| Vshru -> unsigned ">>"
let unop = function
- | Vneg -> " ~ "
+ | Vneg -> " - "
| Vnot -> " ! "
let register a = sprintf "reg_%d" (P.to_int a)
@@ -177,7 +177,7 @@ let testbench = "module testbench;
always @(posedge clk) begin
if (finish == 1) begin
- $display(\"finished: %d\", return_val);
+ $display(\"finished: %0d\", return_val);
$finish;
end
end