diff --git a/src/Data/Abstract/Value.hs b/src/Data/Abstract/Value.hs index ddeb74a54..5838361c6 100644 --- a/src/Data/Abstract/Value.hs +++ b/src/Data/Abstract/Value.hs @@ -39,21 +39,21 @@ instance Eq1 Unit where liftEq = genericLiftEq instance Ord1 Unit where liftCompare = genericLiftCompare instance Show1 Unit where liftShowsPrec = genericLiftShowsPrec -data Boolean term = Boolean Prelude.Bool +newtype Boolean term = Boolean Prelude.Bool deriving (Eq, Generic1, Ord, Show) instance Eq1 Boolean where liftEq = genericLiftEq instance Ord1 Boolean where liftCompare = genericLiftCompare instance Show1 Boolean where liftShowsPrec = genericLiftShowsPrec -data Integer term = Integer Prelude.Integer +newtype Integer term = Integer Prelude.Integer deriving (Eq, Generic1, Ord, Show) instance Eq1 Integer where liftEq = genericLiftEq instance Ord1 Integer where liftCompare = genericLiftCompare instance Show1 Integer where liftShowsPrec = genericLiftShowsPrec -data String term = String ByteString +newtype String term = String ByteString deriving (Eq, Generic1, Ord, Show) instance Eq1 String where liftEq = genericLiftEq