From 7e75a64512de5af5d23b13ac898cdf00377289d8 Mon Sep 17 00:00:00 2001 From: Yann Herklotz Date: Tue, 25 Dec 2018 13:25:41 +0100 Subject: Fix main and improve speed of run script --- app/Main.hs | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) (limited to 'app/Main.hs') diff --git a/app/Main.hs b/app/Main.hs index cbe570b..a7e3d7e 100644 --- a/app/Main.hs +++ b/app/Main.hs @@ -20,4 +20,4 @@ main = do -- _ <- runGraphviz (graphToDot quickParams $ emap (const "") gr) Png "output.png", -- T.putStrLn $ generate gr --g <- QC.generate (QC.arbitrary :: QC.Gen SourceText) - render . genSourceText . nestSource (Identifier "w96") . generateAST $ Circuit gr + render . genSourceText . addTestBench . nestUpTo 20 . generateAST $ Circuit gr -- cgit