diff options
author | Yann Herklotz <git@yannherklotz.com> | 2019-05-21 15:24:45 +0100 |
---|---|---|
committer | Yann Herklotz <git@yannherklotz.com> | 2019-05-21 15:24:45 +0100 |
commit | 238ef567f11c0f07f6b9834ef2199117485ba273 (patch) | |
tree | be4c1a311dafc247d72dd4e81c893634a9c12aae /src/VeriFuzz/Sim/Quartus.hs | |
parent | 57e33ccdefd25619facddb4ba4a247ff14158380 (diff) | |
download | verismith-238ef567f11c0f07f6b9834ef2199117485ba273.tar.gz verismith-238ef567f11c0f07f6b9834ef2199117485ba273.zip |
Remove logging from within tools
Diffstat (limited to 'src/VeriFuzz/Sim/Quartus.hs')
-rw-r--r-- | src/VeriFuzz/Sim/Quartus.hs | 5 |
1 files changed, 1 insertions, 4 deletions
diff --git a/src/VeriFuzz/Sim/Quartus.hs b/src/VeriFuzz/Sim/Quartus.hs index ece00eb..4007004 100644 --- a/src/VeriFuzz/Sim/Quartus.hs +++ b/src/VeriFuzz/Sim/Quartus.hs @@ -52,9 +52,7 @@ runSynthQuartus :: Quartus -> SourceInfo -> ResultSh () runSynthQuartus sim (SourceInfo top src) = do dir <- liftSh pwd let ex = execute_ SynthFail dir "quartus" - liftSh $ do - writefile inpf $ genSource src - logger "Running Quartus synthesis" + liftSh . writefile inpf $ genSource src ex (exec "quartus_map") [top, "--source=" <> toTextIgnore inpf, "--family=Cyclone V"] ex (exec "quartus_fit") [top, "--part=5CGTFD9E5F35C7N"] @@ -68,7 +66,6 @@ runSynthQuartus sim (SourceInfo top src) = do , "s,^// DATE.*,,; s,^tri1 (.*);,wire \\1 = 1;,; /^\\/\\/ +synopsys/ d;" , toTextIgnore $ synthOutput sim ] - logger "Quartus synthesis done" where inpf = "rtl.v" exec s = maybe (fromText s) (</> fromText s) $ quartusBin sim |