module Database.PostgreSQL.PQTypes.ExtrasOptions
( ExtrasOptions(..)
, defaultExtrasOptions
, ObjectsValidationMode(..)
) where
data =
{ ExtrasOptions -> Bool
eoCommitAfterEachMigration :: Bool
, ExtrasOptions -> Bool
eoEnforcePKs :: Bool
, ExtrasOptions -> ObjectsValidationMode
eoObjectsValidationMode :: !ObjectsValidationMode
, ExtrasOptions -> Bool
eoAllowHigherTableVersions :: !Bool
} deriving ExtrasOptions -> ExtrasOptions -> Bool
(ExtrasOptions -> ExtrasOptions -> Bool)
-> (ExtrasOptions -> ExtrasOptions -> Bool) -> Eq ExtrasOptions
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
/= :: ExtrasOptions -> ExtrasOptions -> Bool
$c/= :: ExtrasOptions -> ExtrasOptions -> Bool
== :: ExtrasOptions -> ExtrasOptions -> Bool
$c== :: ExtrasOptions -> ExtrasOptions -> Bool
Eq
defaultExtrasOptions :: ExtrasOptions
= ExtrasOptions :: Bool -> Bool -> ObjectsValidationMode -> Bool -> ExtrasOptions
ExtrasOptions
{ eoCommitAfterEachMigration :: Bool
eoCommitAfterEachMigration = Bool
False
, eoEnforcePKs :: Bool
eoEnforcePKs = Bool
False
, eoObjectsValidationMode :: ObjectsValidationMode
eoObjectsValidationMode = ObjectsValidationMode
DontAllowUnknownObjects
, eoAllowHigherTableVersions :: Bool
eoAllowHigherTableVersions = Bool
False
}
data ObjectsValidationMode = AllowUnknownObjects | DontAllowUnknownObjects
deriving ObjectsValidationMode -> ObjectsValidationMode -> Bool
(ObjectsValidationMode -> ObjectsValidationMode -> Bool)
-> (ObjectsValidationMode -> ObjectsValidationMode -> Bool)
-> Eq ObjectsValidationMode
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
/= :: ObjectsValidationMode -> ObjectsValidationMode -> Bool
$c/= :: ObjectsValidationMode -> ObjectsValidationMode -> Bool
== :: ObjectsValidationMode -> ObjectsValidationMode -> Bool
$c== :: ObjectsValidationMode -> ObjectsValidationMode -> Bool
Eq