diff options
Diffstat (limited to 'src/Test/VeriFuzz/Simulator')
-rw-r--r-- | src/Test/VeriFuzz/Simulator/Icarus.hs | 4 | ||||
-rw-r--r-- | src/Test/VeriFuzz/Simulator/Xst.hs | 2 | ||||
-rw-r--r-- | src/Test/VeriFuzz/Simulator/Yosys.hs | 2 |
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" |