diff options
| author | Yann Herklotz <git@yannherklotz.com> | 2020-03-16 13:12:30 +0000 |
|---|---|---|
| committer | Yann Herklotz <git@yannherklotz.com> | 2020-03-16 13:12:30 +0000 |
| commit | 472aedf5daeb1cb0d095a63eacf259b798f56586 (patch) | |
| tree | 8e7e32b3ff2d762b90d8b460926adb83408a6263 /src/Verismith/Tool/Quartus.hs | |
| parent | 010d7343133ebe53a472b9d26fdeb509db31d4c9 (diff) | |
| download | verismith-472aedf5daeb1cb0d095a63eacf259b798f56586.tar.gz verismith-472aedf5daeb1cb0d095a63eacf259b798f56586.zip | |
WIP changes to the AST types
Diffstat (limited to 'src/Verismith/Tool/Quartus.hs')
| -rw-r--r-- | src/Verismith/Tool/Quartus.hs | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/src/Verismith/Tool/Quartus.hs b/src/Verismith/Tool/Quartus.hs index 128ad70..fd999ee 100644 --- a/src/Verismith/Tool/Quartus.hs +++ b/src/Verismith/Tool/Quartus.hs @@ -49,7 +49,7 @@ instance NFData Quartus where defaultQuartus :: Quartus defaultQuartus = Quartus Nothing "quartus" "syn_quartus.v" -runSynthQuartus :: Quartus -> SourceInfo -> ResultSh () +runSynthQuartus :: Quartus -> (SourceInfo ann) -> ResultSh () runSynthQuartus sim (SourceInfo top src) = do dir <- liftSh pwd let ex = execute_ SynthFail dir "quartus" |