module Database.PostgreSQL.PQTypes.ExtrasOptions
  ( ExtrasOptions(..)
  , defaultExtrasOptions
  ) where

data ExtrasOptions =
    ExtrasOptions
    { ExtrasOptions -> Bool
eoForceCommit :: Bool
      -- ^ Force commit after every migration
    , ExtrasOptions -> Bool
eoEnforcePKs :: Bool
      -- ^ Validate that every handled table has a primary key
    } 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
defaultExtrasOptions :: ExtrasOptions
defaultExtrasOptions = ExtrasOptions :: Bool -> Bool -> ExtrasOptions
ExtrasOptions
  { eoForceCommit :: Bool
eoForceCommit = Bool
False
  , eoEnforcePKs :: Bool
eoEnforcePKs  = Bool
False
  }