State newtype has been moved to CLasH.HardwareTypes

[matthijs/master-project/cλash.git] / cλash / CLasH / HardwareTypes.hs

diff --git a/cλash/CLasH/HardwareTypes.hs b/cλash/CLasH/HardwareTypes.hs
index 9209086db466642dde74e6d4967f418b1ea5a3e9..682cd05c46fbd2a1718216b3847d30e9b42360f2 100644 (file)
--- a/cλash/CLasH/HardwareTypes.hs
+++ b/cλash/CLasH/HardwareTypes.hs
@@ -8,6 +8,7 @@ module CLasH.HardwareTypes
   , module Data.SizedWord
   , module Prelude
   , Bit(..)
+  , State(..)
   , Vector
   , hwand
   , hwor
@@ -29,6 +30,8 @@ import Data.SizedWord
 import Language.Haskell.TH.Lift
 import Data.Typeable
 
+newtype State s = State s deriving (P.Show)
+
 type Vector = TFVec.TFVec
 
 -- The plain Bit type