diff options
| author | Yann Herklotz <git@ymhg.org> | 2019-04-18 23:42:48 +0100 |
|---|---|---|
| committer | Yann Herklotz <git@ymhg.org> | 2019-04-18 23:42:48 +0100 |
| commit | 72ca7b273a8adf421d481e0caa97caa8a565187a (patch) | |
| tree | 7b243629884be5104a61f7378973d6b38e22a998 /src/VeriFuzz/Sim/XST.hs | |
| parent | 97398438902d42b33aef475e3e357781582bec16 (diff) | |
| download | verismith-72ca7b273a8adf421d481e0caa97caa8a565187a.tar.gz verismith-72ca7b273a8adf421d481e0caa97caa8a565187a.zip | |
Add output information to Type
Diffstat (limited to 'src/VeriFuzz/Sim/XST.hs')
| -rw-r--r-- | src/VeriFuzz/Sim/XST.hs | 12 |
1 files changed, 6 insertions, 6 deletions
diff --git a/src/VeriFuzz/Sim/XST.hs b/src/VeriFuzz/Sim/XST.hs index b5b1b8b..e5e3e06 100644 --- a/src/VeriFuzz/Sim/XST.hs +++ b/src/VeriFuzz/Sim/XST.hs @@ -42,13 +42,13 @@ instance Tool XST where instance Synthesiser XST where runSynth = runSynthXST synthOutput = xstOutput - setSynthOutput (XST a b _) f = XST a b f + setSynthOutput (XST a b _) = XST a b defaultXST :: XST -defaultXST = XST "xst" "netgen" "xst/syn_xst.v" +defaultXST = XST "xst" "netgen" "syn_xst.v" -runSynthXST :: XST -> SourceInfo -> FilePath -> ResultSh () -runSynthXST sim (SourceInfo top src) outf = do +runSynthXST :: XST -> SourceInfo -> ResultSh () +runSynthXST sim (SourceInfo top src) = do dir <- liftSh pwd let exec = execute_ SynthFail dir "xst" liftSh $ do @@ -64,7 +64,7 @@ runSynthXST sim (SourceInfo top src) outf = do , "-ofmt" , "verilog" , toTextIgnore $ modFile <.> "ngc" - , toTextIgnore outf + , toTextIgnore $ synthOutput sim ] liftSh $ do echoP "XST: clean" @@ -72,7 +72,7 @@ runSynthXST sim (SourceInfo top src) outf = do "sed" [ "-i" , "/^`ifndef/,/^`endif/ d; s/ *Timestamp: .*//;" - , toTextIgnore outf + , toTextIgnore $ synthOutput sim ] echoP "XST: done" where |