module GI.OSTree.Enums
(
StaticDeltaGenerateOpt(..) ,
RepoResolveRevExtFlags(..) ,
RepoRemoteChange(..) ,
RepoPruneFlags(..) ,
RepoMode(..) ,
RepoListRefsExtFlags(..) ,
RepoCommitIterResult(..) ,
RepoCommitFilterResult(..) ,
RepoCheckoutOverwriteMode(..) ,
RepoCheckoutMode(..) ,
ObjectType(..) ,
GpgSignatureFormatFlags(..) ,
GpgSignatureAttr(..) ,
DeploymentUnlockedState(..) ,
) where
import Data.GI.Base.ShortPrelude
import qualified Data.GI.Base.ShortPrelude as SP
import qualified Data.GI.Base.Overloading as O
import qualified Prelude as P
import qualified Data.GI.Base.Attributes as GI.Attributes
import qualified Data.GI.Base.ManagedPtr as B.ManagedPtr
import qualified Data.GI.Base.GError as B.GError
import qualified Data.GI.Base.GVariant as B.GVariant
import qualified Data.GI.Base.GParamSpec as B.GParamSpec
import qualified Data.GI.Base.CallStack as B.CallStack
import qualified Data.Text as T
import qualified Data.ByteString.Char8 as B
import qualified Data.Map as Map
import qualified Foreign.Ptr as FP
data StaticDeltaGenerateOpt =
StaticDeltaGenerateOptLowlatency
| StaticDeltaGenerateOptMajor
| AnotherStaticDeltaGenerateOpt Int
deriving (Show, Eq)
instance P.Enum StaticDeltaGenerateOpt where
fromEnum StaticDeltaGenerateOptLowlatency = 0
fromEnum StaticDeltaGenerateOptMajor = 1
fromEnum (AnotherStaticDeltaGenerateOpt k) = k
toEnum 0 = StaticDeltaGenerateOptLowlatency
toEnum 1 = StaticDeltaGenerateOptMajor
toEnum k = AnotherStaticDeltaGenerateOpt k
instance P.Ord StaticDeltaGenerateOpt where
compare a b = P.compare (P.fromEnum a) (P.fromEnum b)
data RepoResolveRevExtFlags =
RepoResolveRevExtFlagsRepoResolveRevExtNone
| AnotherRepoResolveRevExtFlags Int
deriving (Show, Eq)
instance P.Enum RepoResolveRevExtFlags where
fromEnum RepoResolveRevExtFlagsRepoResolveRevExtNone = 0
fromEnum (AnotherRepoResolveRevExtFlags k) = k
toEnum 0 = RepoResolveRevExtFlagsRepoResolveRevExtNone
toEnum k = AnotherRepoResolveRevExtFlags k
instance P.Ord RepoResolveRevExtFlags where
compare a b = P.compare (P.fromEnum a) (P.fromEnum b)
data RepoRemoteChange =
RepoRemoteChangeAdd
| RepoRemoteChangeAddIfNotExists
| RepoRemoteChangeDelete
| RepoRemoteChangeDeleteIfExists
| AnotherRepoRemoteChange Int
deriving (Show, Eq)
instance P.Enum RepoRemoteChange where
fromEnum RepoRemoteChangeAdd = 0
fromEnum RepoRemoteChangeAddIfNotExists = 1
fromEnum RepoRemoteChangeDelete = 2
fromEnum RepoRemoteChangeDeleteIfExists = 3
fromEnum (AnotherRepoRemoteChange k) = k
toEnum 0 = RepoRemoteChangeAdd
toEnum 1 = RepoRemoteChangeAddIfNotExists
toEnum 2 = RepoRemoteChangeDelete
toEnum 3 = RepoRemoteChangeDeleteIfExists
toEnum k = AnotherRepoRemoteChange k
instance P.Ord RepoRemoteChange where
compare a b = P.compare (P.fromEnum a) (P.fromEnum b)
data RepoPruneFlags =
RepoPruneFlagsNone
| RepoPruneFlagsNoPrune
| RepoPruneFlagsRefsOnly
| AnotherRepoPruneFlags Int
deriving (Show, Eq)
instance P.Enum RepoPruneFlags where
fromEnum RepoPruneFlagsNone = 0
fromEnum RepoPruneFlagsNoPrune = 1
fromEnum RepoPruneFlagsRefsOnly = 2
fromEnum (AnotherRepoPruneFlags k) = k
toEnum 0 = RepoPruneFlagsNone
toEnum 1 = RepoPruneFlagsNoPrune
toEnum 2 = RepoPruneFlagsRefsOnly
toEnum k = AnotherRepoPruneFlags k
instance P.Ord RepoPruneFlags where
compare a b = P.compare (P.fromEnum a) (P.fromEnum b)
data RepoMode =
RepoModeBare
| RepoModeArchiveZ2
| RepoModeBareUser
| AnotherRepoMode Int
deriving (Show, Eq)
instance P.Enum RepoMode where
fromEnum RepoModeBare = 0
fromEnum RepoModeArchiveZ2 = 1
fromEnum RepoModeBareUser = 2
fromEnum (AnotherRepoMode k) = k
toEnum 0 = RepoModeBare
toEnum 1 = RepoModeArchiveZ2
toEnum 2 = RepoModeBareUser
toEnum k = AnotherRepoMode k
instance P.Ord RepoMode where
compare a b = P.compare (P.fromEnum a) (P.fromEnum b)
data RepoListRefsExtFlags =
RepoListRefsExtFlagsRepoListRefsExtNone
| AnotherRepoListRefsExtFlags Int
deriving (Show, Eq)
instance P.Enum RepoListRefsExtFlags where
fromEnum RepoListRefsExtFlagsRepoListRefsExtNone = 0
fromEnum (AnotherRepoListRefsExtFlags k) = k
toEnum 0 = RepoListRefsExtFlagsRepoListRefsExtNone
toEnum k = AnotherRepoListRefsExtFlags k
instance P.Ord RepoListRefsExtFlags where
compare a b = P.compare (P.fromEnum a) (P.fromEnum b)
data RepoCommitIterResult =
RepoCommitIterResultError
| RepoCommitIterResultEnd
| RepoCommitIterResultFile
| RepoCommitIterResultDir
| AnotherRepoCommitIterResult Int
deriving (Show, Eq)
instance P.Enum RepoCommitIterResult where
fromEnum RepoCommitIterResultError = 0
fromEnum RepoCommitIterResultEnd = 1
fromEnum RepoCommitIterResultFile = 2
fromEnum RepoCommitIterResultDir = 3
fromEnum (AnotherRepoCommitIterResult k) = k
toEnum 0 = RepoCommitIterResultError
toEnum 1 = RepoCommitIterResultEnd
toEnum 2 = RepoCommitIterResultFile
toEnum 3 = RepoCommitIterResultDir
toEnum k = AnotherRepoCommitIterResult k
instance P.Ord RepoCommitIterResult where
compare a b = P.compare (P.fromEnum a) (P.fromEnum b)
data RepoCommitFilterResult =
RepoCommitFilterResultAllow
| RepoCommitFilterResultSkip
| AnotherRepoCommitFilterResult Int
deriving (Show, Eq)
instance P.Enum RepoCommitFilterResult where
fromEnum RepoCommitFilterResultAllow = 0
fromEnum RepoCommitFilterResultSkip = 1
fromEnum (AnotherRepoCommitFilterResult k) = k
toEnum 0 = RepoCommitFilterResultAllow
toEnum 1 = RepoCommitFilterResultSkip
toEnum k = AnotherRepoCommitFilterResult k
instance P.Ord RepoCommitFilterResult where
compare a b = P.compare (P.fromEnum a) (P.fromEnum b)
data RepoCheckoutOverwriteMode =
RepoCheckoutOverwriteModeNone
| RepoCheckoutOverwriteModeUnionFiles
| RepoCheckoutOverwriteModeAddFiles
| AnotherRepoCheckoutOverwriteMode Int
deriving (Show, Eq)
instance P.Enum RepoCheckoutOverwriteMode where
fromEnum RepoCheckoutOverwriteModeNone = 0
fromEnum RepoCheckoutOverwriteModeUnionFiles = 1
fromEnum RepoCheckoutOverwriteModeAddFiles = 2
fromEnum (AnotherRepoCheckoutOverwriteMode k) = k
toEnum 0 = RepoCheckoutOverwriteModeNone
toEnum 1 = RepoCheckoutOverwriteModeUnionFiles
toEnum 2 = RepoCheckoutOverwriteModeAddFiles
toEnum k = AnotherRepoCheckoutOverwriteMode k
instance P.Ord RepoCheckoutOverwriteMode where
compare a b = P.compare (P.fromEnum a) (P.fromEnum b)
data RepoCheckoutMode =
RepoCheckoutModeNone
| RepoCheckoutModeUser
| AnotherRepoCheckoutMode Int
deriving (Show, Eq)
instance P.Enum RepoCheckoutMode where
fromEnum RepoCheckoutModeNone = 0
fromEnum RepoCheckoutModeUser = 1
fromEnum (AnotherRepoCheckoutMode k) = k
toEnum 0 = RepoCheckoutModeNone
toEnum 1 = RepoCheckoutModeUser
toEnum k = AnotherRepoCheckoutMode k
instance P.Ord RepoCheckoutMode where
compare a b = P.compare (P.fromEnum a) (P.fromEnum b)
data ObjectType =
ObjectTypeFile
| ObjectTypeDirTree
| ObjectTypeDirMeta
| ObjectTypeCommit
| ObjectTypeTombstoneCommit
| ObjectTypeCommitMeta
| AnotherObjectType Int
deriving (Show, Eq)
instance P.Enum ObjectType where
fromEnum ObjectTypeFile = 1
fromEnum ObjectTypeDirTree = 2
fromEnum ObjectTypeDirMeta = 3
fromEnum ObjectTypeCommit = 4
fromEnum ObjectTypeTombstoneCommit = 5
fromEnum ObjectTypeCommitMeta = 6
fromEnum (AnotherObjectType k) = k
toEnum 1 = ObjectTypeFile
toEnum 2 = ObjectTypeDirTree
toEnum 3 = ObjectTypeDirMeta
toEnum 4 = ObjectTypeCommit
toEnum 5 = ObjectTypeTombstoneCommit
toEnum 6 = ObjectTypeCommitMeta
toEnum k = AnotherObjectType k
instance P.Ord ObjectType where
compare a b = P.compare (P.fromEnum a) (P.fromEnum b)
data GpgSignatureFormatFlags =
GpgSignatureFormatFlagsGpgSignatureFormatDefault
| AnotherGpgSignatureFormatFlags Int
deriving (Show, Eq)
instance P.Enum GpgSignatureFormatFlags where
fromEnum GpgSignatureFormatFlagsGpgSignatureFormatDefault = 0
fromEnum (AnotherGpgSignatureFormatFlags k) = k
toEnum 0 = GpgSignatureFormatFlagsGpgSignatureFormatDefault
toEnum k = AnotherGpgSignatureFormatFlags k
instance P.Ord GpgSignatureFormatFlags where
compare a b = P.compare (P.fromEnum a) (P.fromEnum b)
data GpgSignatureAttr =
GpgSignatureAttrValid
| GpgSignatureAttrSigExpired
| GpgSignatureAttrKeyExpired
| GpgSignatureAttrKeyRevoked
| GpgSignatureAttrKeyMissing
| GpgSignatureAttrFingerprint
| GpgSignatureAttrTimestamp
| GpgSignatureAttrExpTimestamp
| GpgSignatureAttrPubkeyAlgoName
| GpgSignatureAttrHashAlgoName
| GpgSignatureAttrUserName
| GpgSignatureAttrUserEmail
| AnotherGpgSignatureAttr Int
deriving (Show, Eq)
instance P.Enum GpgSignatureAttr where
fromEnum GpgSignatureAttrValid = 0
fromEnum GpgSignatureAttrSigExpired = 1
fromEnum GpgSignatureAttrKeyExpired = 2
fromEnum GpgSignatureAttrKeyRevoked = 3
fromEnum GpgSignatureAttrKeyMissing = 4
fromEnum GpgSignatureAttrFingerprint = 5
fromEnum GpgSignatureAttrTimestamp = 6
fromEnum GpgSignatureAttrExpTimestamp = 7
fromEnum GpgSignatureAttrPubkeyAlgoName = 8
fromEnum GpgSignatureAttrHashAlgoName = 9
fromEnum GpgSignatureAttrUserName = 10
fromEnum GpgSignatureAttrUserEmail = 11
fromEnum (AnotherGpgSignatureAttr k) = k
toEnum 0 = GpgSignatureAttrValid
toEnum 1 = GpgSignatureAttrSigExpired
toEnum 2 = GpgSignatureAttrKeyExpired
toEnum 3 = GpgSignatureAttrKeyRevoked
toEnum 4 = GpgSignatureAttrKeyMissing
toEnum 5 = GpgSignatureAttrFingerprint
toEnum 6 = GpgSignatureAttrTimestamp
toEnum 7 = GpgSignatureAttrExpTimestamp
toEnum 8 = GpgSignatureAttrPubkeyAlgoName
toEnum 9 = GpgSignatureAttrHashAlgoName
toEnum 10 = GpgSignatureAttrUserName
toEnum 11 = GpgSignatureAttrUserEmail
toEnum k = AnotherGpgSignatureAttr k
instance P.Ord GpgSignatureAttr where
compare a b = P.compare (P.fromEnum a) (P.fromEnum b)
data DeploymentUnlockedState =
DeploymentUnlockedStateNone
| DeploymentUnlockedStateDevelopment
| DeploymentUnlockedStateHotfix
| AnotherDeploymentUnlockedState Int
deriving (Show, Eq)
instance P.Enum DeploymentUnlockedState where
fromEnum DeploymentUnlockedStateNone = 0
fromEnum DeploymentUnlockedStateDevelopment = 1
fromEnum DeploymentUnlockedStateHotfix = 2
fromEnum (AnotherDeploymentUnlockedState k) = k
toEnum 0 = DeploymentUnlockedStateNone
toEnum 1 = DeploymentUnlockedStateDevelopment
toEnum 2 = DeploymentUnlockedStateHotfix
toEnum k = AnotherDeploymentUnlockedState k
instance P.Ord DeploymentUnlockedState where
compare a b = P.compare (P.fromEnum a) (P.fromEnum b)