aboutsummaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorAndrew Waterman2016-01-23 21:09:25 -0800
committerAndrew Waterman2016-01-23 21:09:25 -0800
commit559cc89a69db6c3b64cac2bdfbf7f78c83ae0e8c (patch)
treef0a97cbc25d4cc5c17118a9d9e407591abaee720
parent2dd174cedc7e7923e2492fdec79a6f9045f2429e (diff)
Fix Verilog syntax errors for print/stop
-rw-r--r--src/main/stanza/passes.stanza4
1 files changed, 2 insertions, 2 deletions
diff --git a/src/main/stanza/passes.stanza b/src/main/stanza/passes.stanza
index eae4aff2..570e271e 100644
--- a/src/main/stanza/passes.stanza
+++ b/src/main/stanza/passes.stanza
@@ -2452,10 +2452,10 @@ defn emit-verilog (m:InModule) -> Module :
add(at-clock[clk],[tab "end"])
add(at-clock[clk],["`endif"])
defn stop (ret:Int) -> Streamable :
- ["$fdisplay(32/'h80000002," ret ");$finish;"]
+ ["$fdisplay(32'h80000002,\"" ret "\");$finish;"]
defn printf (str:String,args:List<Expression>) -> Streamable :
val str* = join(List(escape(str),args),",")
- ["$fwrite(32/'h80000002," str* ");"]
+ ["$fwrite(32'h80000002," str* ");"]
defn delay (e:Expression, n:Int, clk:Expression) -> Expression :
var e* = e
for i in 0 to n do :