aboutsummaryrefslogtreecommitdiffstats
path: root/src/Test/VeriFuzz/Simulator
diff options
context:
space:
mode:
Diffstat (limited to 'src/Test/VeriFuzz/Simulator')
-rw-r--r--src/Test/VeriFuzz/Simulator/Icarus.hs4
-rw-r--r--src/Test/VeriFuzz/Simulator/Xst.hs2
-rw-r--r--src/Test/VeriFuzz/Simulator/Yosys.hs2
3 files changed, 3 insertions, 5 deletions
diff --git a/src/Test/VeriFuzz/Simulator/Icarus.hs b/src/Test/VeriFuzz/Simulator/Icarus.hs
index 5a4a12d..156d1fc 100644
--- a/src/Test/VeriFuzz/Simulator/Icarus.hs
+++ b/src/Test/VeriFuzz/Simulator/Icarus.hs
@@ -10,8 +10,6 @@ Portability : POSIX
Icarus verilog module.
-}
-{-# LANGUAGE QuasiQuotes #-}
-
module Test.VeriFuzz.Simulator.Icarus where
import Data.ByteString (ByteString)
@@ -25,7 +23,7 @@ import Test.VeriFuzz.Simulator.General
import Test.VeriFuzz.Verilog
import Text.Shakespeare.Text (st)
-data Icarus = Icarus { icarusPath :: FilePath }
+newtype Icarus = Icarus { icarusPath :: FilePath }
instance Simulator Icarus where
toText _ = "iverilog"
diff --git a/src/Test/VeriFuzz/Simulator/Xst.hs b/src/Test/VeriFuzz/Simulator/Xst.hs
index 3372ae0..17efb47 100644
--- a/src/Test/VeriFuzz/Simulator/Xst.hs
+++ b/src/Test/VeriFuzz/Simulator/Xst.hs
@@ -24,7 +24,7 @@ import Test.VeriFuzz.Verilog.AST
import Test.VeriFuzz.Verilog.CodeGen
import Text.Shakespeare.Text (st)
-data Xst = Xst { xstPath :: FilePath }
+newtype Xst = Xst { xstPath :: FilePath }
instance Simulator Xst where
toText _ = "xst"
diff --git a/src/Test/VeriFuzz/Simulator/Yosys.hs b/src/Test/VeriFuzz/Simulator/Yosys.hs
index 778918d..bcded2f 100644
--- a/src/Test/VeriFuzz/Simulator/Yosys.hs
+++ b/src/Test/VeriFuzz/Simulator/Yosys.hs
@@ -25,7 +25,7 @@ import Test.VeriFuzz.Verilog.AST
import Test.VeriFuzz.Verilog.CodeGen
import Text.Shakespeare.Text (st)
-data Yosys = Yosys { yosysPath :: FilePath }
+newtype Yosys = Yosys { yosysPath :: FilePath }
instance Simulator Yosys where
toText _ = "yosys"