X-Git-Url: https://git.stderr.nl/gitweb?a=blobdiff_plain;f=clash%2FCLasH%2FVHDL%2FTestbench.hs;h=46271463bb18fcdebbe221fadfe6db6bc359f1ea;hb=70654a9d134697f4d3703ff4a8747a1e078afd7b;hp=fa2e9dc7bde21544cc4236db4a0a319309c0f06e;hpb=ef7d876bddac1ebf8ae72dfac9aff33023650f53;p=matthijs%2Fmaster-project%2Fc%CE%BBash.git

diff --git a/clash/CLasH/VHDL/Testbench.hs b/clash/CLasH/VHDL/Testbench.hs
index fa2e9dc..4627146 100644
--- a/clash/CLasH/VHDL/Testbench.hs
+++ b/clash/CLasH/VHDL/Testbench.hs
@@ -170,4 +170,4 @@ createOutputProc outs =
        writeOut outSig suffix = 
          genExprPCall2 writeId
                         (AST.PrimName $ AST.NSimple outputId)
-                        ((genExprFCall showId (AST.PrimName $ AST.NSimple outSig)) AST.:&: suffix)
+                        ((genExprFCall2 showId (AST.PrimName $ AST.NSimple outSig, AST.PrimLit "false")) AST.:&: suffix)