#define ENABLE_OVERLOADING (MIN_VERSION_haskell_gi_overloading(1,0,0) \
&& !defined(__HADDOCK_VERSION__))
module GI.Ggit.Flags
(
AttributeCheckFlags(..) ,
BlameFlags(..) ,
CheckoutNotifyFlags(..) ,
CheckoutStrategy(..) ,
CreateFlags(..) ,
Credtype(..) ,
DiffFindFlags(..) ,
DiffFlag(..) ,
DiffFormatEmailFlags(..) ,
DiffOption(..) ,
FeatureFlags(..) ,
MergeFileFlags(..) ,
MergeFlags(..) ,
SortMode(..) ,
StashFlags(..) ,
StatusFlags(..) ,
StatusOption(..) ,
SubmoduleStatus(..) ,
) 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.GClosure as B.GClosure
import qualified Data.GI.Base.GError as B.GError
import qualified Data.GI.Base.GVariant as B.GVariant
import qualified Data.GI.Base.GValue as B.GValue
import qualified Data.GI.Base.GParamSpec as B.GParamSpec
import qualified Data.GI.Base.CallStack as B.CallStack
import qualified Data.GI.Base.Properties as B.Properties
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
import qualified GHC.OverloadedLabels as OL
data SubmoduleStatus =
SubmoduleStatusInHead
| SubmoduleStatusInIndex
| SubmoduleStatusInConfig
| SubmoduleStatusInWd
| SubmoduleStatusIndexAdded
| SubmoduleStatusIndexDeleted
| SubmoduleStatusIndexModified
| SubmoduleStatusWdUninitialized
| SubmoduleStatusWdAdded
| SubmoduleStatusWdDeleted
| SubmoduleStatusWdModified
| SubmoduleStatusWdIndexModified
| SubmoduleStatusWdWdModified
| SubmoduleStatusWdUntracked
| AnotherSubmoduleStatus Int
deriving (Show, Eq)
instance P.Enum SubmoduleStatus where
fromEnum SubmoduleStatusInHead = 1
fromEnum SubmoduleStatusInIndex = 2
fromEnum SubmoduleStatusInConfig = 4
fromEnum SubmoduleStatusInWd = 8
fromEnum SubmoduleStatusIndexAdded = 16
fromEnum SubmoduleStatusIndexDeleted = 32
fromEnum SubmoduleStatusIndexModified = 64
fromEnum SubmoduleStatusWdUninitialized = 128
fromEnum SubmoduleStatusWdAdded = 256
fromEnum SubmoduleStatusWdDeleted = 512
fromEnum SubmoduleStatusWdModified = 1024
fromEnum SubmoduleStatusWdIndexModified = 2048
fromEnum SubmoduleStatusWdWdModified = 4096
fromEnum SubmoduleStatusWdUntracked = 8192
fromEnum (AnotherSubmoduleStatus k) = k
toEnum 1 = SubmoduleStatusInHead
toEnum 2 = SubmoduleStatusInIndex
toEnum 4 = SubmoduleStatusInConfig
toEnum 8 = SubmoduleStatusInWd
toEnum 16 = SubmoduleStatusIndexAdded
toEnum 32 = SubmoduleStatusIndexDeleted
toEnum 64 = SubmoduleStatusIndexModified
toEnum 128 = SubmoduleStatusWdUninitialized
toEnum 256 = SubmoduleStatusWdAdded
toEnum 512 = SubmoduleStatusWdDeleted
toEnum 1024 = SubmoduleStatusWdModified
toEnum 2048 = SubmoduleStatusWdIndexModified
toEnum 4096 = SubmoduleStatusWdWdModified
toEnum 8192 = SubmoduleStatusWdUntracked
toEnum k = AnotherSubmoduleStatus k
instance P.Ord SubmoduleStatus where
compare a b = P.compare (P.fromEnum a) (P.fromEnum b)
foreign import ccall "ggit_submodule_status_get_type" c_ggit_submodule_status_get_type ::
IO GType
instance BoxedFlags SubmoduleStatus where
boxedFlagsType _ = c_ggit_submodule_status_get_type
instance IsGFlag SubmoduleStatus
data StatusOption =
StatusOptionIncludeUntracked
| StatusOptionIncludeIgnored
| StatusOptionIncludeUnmodified
| StatusOptionExcludeSubmodules
| StatusOptionRecurseUntrackedDirs
| StatusOptionDisablePathspecMatch
| StatusOptionRecurseIgnoredDirs
| StatusOptionRenamesHeadToIndex
| StatusOptionRenamesIndexToWorkdir
| StatusOptionSortCaseSensitively
| StatusOptionSortCaseInsensitively
| StatusOptionDefault
| AnotherStatusOption Int
deriving (Show, Eq)
instance P.Enum StatusOption where
fromEnum StatusOptionIncludeUntracked = 1
fromEnum StatusOptionIncludeIgnored = 2
fromEnum StatusOptionIncludeUnmodified = 4
fromEnum StatusOptionExcludeSubmodules = 8
fromEnum StatusOptionRecurseUntrackedDirs = 16
fromEnum StatusOptionDisablePathspecMatch = 32
fromEnum StatusOptionRecurseIgnoredDirs = 64
fromEnum StatusOptionRenamesHeadToIndex = 128
fromEnum StatusOptionRenamesIndexToWorkdir = 256
fromEnum StatusOptionSortCaseSensitively = 512
fromEnum StatusOptionSortCaseInsensitively = 1024
fromEnum StatusOptionDefault = 19
fromEnum (AnotherStatusOption k) = k
toEnum 1 = StatusOptionIncludeUntracked
toEnum 2 = StatusOptionIncludeIgnored
toEnum 4 = StatusOptionIncludeUnmodified
toEnum 8 = StatusOptionExcludeSubmodules
toEnum 16 = StatusOptionRecurseUntrackedDirs
toEnum 32 = StatusOptionDisablePathspecMatch
toEnum 64 = StatusOptionRecurseIgnoredDirs
toEnum 128 = StatusOptionRenamesHeadToIndex
toEnum 256 = StatusOptionRenamesIndexToWorkdir
toEnum 512 = StatusOptionSortCaseSensitively
toEnum 1024 = StatusOptionSortCaseInsensitively
toEnum 19 = StatusOptionDefault
toEnum k = AnotherStatusOption k
instance P.Ord StatusOption where
compare a b = P.compare (P.fromEnum a) (P.fromEnum b)
foreign import ccall "ggit_status_option_get_type" c_ggit_status_option_get_type ::
IO GType
instance BoxedFlags StatusOption where
boxedFlagsType _ = c_ggit_status_option_get_type
instance IsGFlag StatusOption
data StatusFlags =
StatusFlagsCurrent
| StatusFlagsIndexNew
| StatusFlagsIndexModified
| StatusFlagsIndexDeleted
| StatusFlagsIndexRenamed
| StatusFlagsIndexTypechange
| StatusFlagsWorkingTreeNew
| StatusFlagsWorkingTreeModified
| StatusFlagsWorkingTreeDeleted
| StatusFlagsWorkingTreeTypechange
| StatusFlagsIgnored
| AnotherStatusFlags Int
deriving (Show, Eq)
instance P.Enum StatusFlags where
fromEnum StatusFlagsCurrent = 0
fromEnum StatusFlagsIndexNew = 1
fromEnum StatusFlagsIndexModified = 2
fromEnum StatusFlagsIndexDeleted = 4
fromEnum StatusFlagsIndexRenamed = 8
fromEnum StatusFlagsIndexTypechange = 16
fromEnum StatusFlagsWorkingTreeNew = 128
fromEnum StatusFlagsWorkingTreeModified = 256
fromEnum StatusFlagsWorkingTreeDeleted = 512
fromEnum StatusFlagsWorkingTreeTypechange = 1024
fromEnum StatusFlagsIgnored = 16384
fromEnum (AnotherStatusFlags k) = k
toEnum 0 = StatusFlagsCurrent
toEnum 1 = StatusFlagsIndexNew
toEnum 2 = StatusFlagsIndexModified
toEnum 4 = StatusFlagsIndexDeleted
toEnum 8 = StatusFlagsIndexRenamed
toEnum 16 = StatusFlagsIndexTypechange
toEnum 128 = StatusFlagsWorkingTreeNew
toEnum 256 = StatusFlagsWorkingTreeModified
toEnum 512 = StatusFlagsWorkingTreeDeleted
toEnum 1024 = StatusFlagsWorkingTreeTypechange
toEnum 16384 = StatusFlagsIgnored
toEnum k = AnotherStatusFlags k
instance P.Ord StatusFlags where
compare a b = P.compare (P.fromEnum a) (P.fromEnum b)
foreign import ccall "ggit_status_flags_get_type" c_ggit_status_flags_get_type ::
IO GType
instance BoxedFlags StatusFlags where
boxedFlagsType _ = c_ggit_status_flags_get_type
instance IsGFlag StatusFlags
data StashFlags =
StashFlagsDefault
| StashFlagsKeepIndex
| StashFlagsIncludeUntracked
| StashFlagsIncludeIgnored
| AnotherStashFlags Int
deriving (Show, Eq)
instance P.Enum StashFlags where
fromEnum StashFlagsDefault = 0
fromEnum StashFlagsKeepIndex = 1
fromEnum StashFlagsIncludeUntracked = 2
fromEnum StashFlagsIncludeIgnored = 4
fromEnum (AnotherStashFlags k) = k
toEnum 0 = StashFlagsDefault
toEnum 1 = StashFlagsKeepIndex
toEnum 2 = StashFlagsIncludeUntracked
toEnum 4 = StashFlagsIncludeIgnored
toEnum k = AnotherStashFlags k
instance P.Ord StashFlags where
compare a b = P.compare (P.fromEnum a) (P.fromEnum b)
foreign import ccall "ggit_stash_flags_get_type" c_ggit_stash_flags_get_type ::
IO GType
instance BoxedFlags StashFlags where
boxedFlagsType _ = c_ggit_stash_flags_get_type
instance IsGFlag StashFlags
data SortMode =
SortModeNone
| SortModeTopological
| SortModeTime
| SortModeReverse
| AnotherSortMode Int
deriving (Show, Eq)
instance P.Enum SortMode where
fromEnum SortModeNone = 0
fromEnum SortModeTopological = 1
fromEnum SortModeTime = 2
fromEnum SortModeReverse = 4
fromEnum (AnotherSortMode k) = k
toEnum 0 = SortModeNone
toEnum 1 = SortModeTopological
toEnum 2 = SortModeTime
toEnum 4 = SortModeReverse
toEnum k = AnotherSortMode k
instance P.Ord SortMode where
compare a b = P.compare (P.fromEnum a) (P.fromEnum b)
foreign import ccall "ggit_sort_mode_get_type" c_ggit_sort_mode_get_type ::
IO GType
instance BoxedFlags SortMode where
boxedFlagsType _ = c_ggit_sort_mode_get_type
instance IsGFlag SortMode
data MergeFlags =
MergeFlagsFindRenames
| MergeFlagsFailOnConflict
| MergeFlagsSkipReuc
| MergeFlagsNoRecursive
| AnotherMergeFlags Int
deriving (Show, Eq)
instance P.Enum MergeFlags where
fromEnum MergeFlagsFindRenames = 1
fromEnum MergeFlagsFailOnConflict = 2
fromEnum MergeFlagsSkipReuc = 4
fromEnum MergeFlagsNoRecursive = 8
fromEnum (AnotherMergeFlags k) = k
toEnum 1 = MergeFlagsFindRenames
toEnum 2 = MergeFlagsFailOnConflict
toEnum 4 = MergeFlagsSkipReuc
toEnum 8 = MergeFlagsNoRecursive
toEnum k = AnotherMergeFlags k
instance P.Ord MergeFlags where
compare a b = P.compare (P.fromEnum a) (P.fromEnum b)
foreign import ccall "ggit_merge_flags_get_type" c_ggit_merge_flags_get_type ::
IO GType
instance BoxedFlags MergeFlags where
boxedFlagsType _ = c_ggit_merge_flags_get_type
instance IsGFlag MergeFlags
data MergeFileFlags =
MergeFileFlagsDefault
| MergeFileFlagsStyleMerge
| MergeFileFlagsStyleDiff3
| MergeFileFlagsSimplifyAlnum
| MergeFileFlagsIgnoreWhitespace
| MergeFileFlagsIgnoreWhitespaceChange
| MergeFileFlagsIgnoreWhitespaceEol
| MergeFileFlagsDiffPatience
| MergeFileFlagsDiffMinimal
| AnotherMergeFileFlags Int
deriving (Show, Eq)
instance P.Enum MergeFileFlags where
fromEnum MergeFileFlagsDefault = 0
fromEnum MergeFileFlagsStyleMerge = 1
fromEnum MergeFileFlagsStyleDiff3 = 2
fromEnum MergeFileFlagsSimplifyAlnum = 4
fromEnum MergeFileFlagsIgnoreWhitespace = 8
fromEnum MergeFileFlagsIgnoreWhitespaceChange = 16
fromEnum MergeFileFlagsIgnoreWhitespaceEol = 32
fromEnum MergeFileFlagsDiffPatience = 64
fromEnum MergeFileFlagsDiffMinimal = 128
fromEnum (AnotherMergeFileFlags k) = k
toEnum 0 = MergeFileFlagsDefault
toEnum 1 = MergeFileFlagsStyleMerge
toEnum 2 = MergeFileFlagsStyleDiff3
toEnum 4 = MergeFileFlagsSimplifyAlnum
toEnum 8 = MergeFileFlagsIgnoreWhitespace
toEnum 16 = MergeFileFlagsIgnoreWhitespaceChange
toEnum 32 = MergeFileFlagsIgnoreWhitespaceEol
toEnum 64 = MergeFileFlagsDiffPatience
toEnum 128 = MergeFileFlagsDiffMinimal
toEnum k = AnotherMergeFileFlags k
instance P.Ord MergeFileFlags where
compare a b = P.compare (P.fromEnum a) (P.fromEnum b)
foreign import ccall "ggit_merge_file_flags_get_type" c_ggit_merge_file_flags_get_type ::
IO GType
instance BoxedFlags MergeFileFlags where
boxedFlagsType _ = c_ggit_merge_file_flags_get_type
instance IsGFlag MergeFileFlags
data FeatureFlags =
FeatureFlagsThreads
| FeatureFlagsHttps
| FeatureFlagsSsh
| AnotherFeatureFlags Int
deriving (Show, Eq)
instance P.Enum FeatureFlags where
fromEnum FeatureFlagsThreads = 1
fromEnum FeatureFlagsHttps = 2
fromEnum FeatureFlagsSsh = 4
fromEnum (AnotherFeatureFlags k) = k
toEnum 1 = FeatureFlagsThreads
toEnum 2 = FeatureFlagsHttps
toEnum 4 = FeatureFlagsSsh
toEnum k = AnotherFeatureFlags k
instance P.Ord FeatureFlags where
compare a b = P.compare (P.fromEnum a) (P.fromEnum b)
foreign import ccall "ggit_feature_flags_get_type" c_ggit_feature_flags_get_type ::
IO GType
instance BoxedFlags FeatureFlags where
boxedFlagsType _ = c_ggit_feature_flags_get_type
instance IsGFlag FeatureFlags
data DiffOption =
DiffOptionNormal
| DiffOptionReverse
| DiffOptionIncludeIgnored
| DiffOptionRecurseIgnoredDirs
| DiffOptionIncludeUntracked
| DiffOptionRecurseUntrackedDirs
| DiffOptionIncludeUnmodified
| DiffOptionIncludeTypechange
| DiffOptionIncludeTypechangeTrees
| DiffOptionIgnoreFileMode
| DiffOptionIgnoreSubmodules
| DiffOptionIgnoreCase
| DiffOptionDisablePathspecMatch
| DiffOptionSkipBinaryCheck
| DiffOptionEnableFastUntrackedDirs
| DiffOptionForceText
| DiffOptionForceBinary
| DiffOptionIgnoreWhitespace
| DiffOptionIgnoreWhitespaceChange
| DiffOptionIgnoreWhitespaceEol
| DiffOptionShowUntrackedContent
| DiffOptionShowUnmodified
| DiffOptionPatience
| DiffOptionMinimal
| DiffOptionShowBinary
| AnotherDiffOption Int
deriving (Show, Eq)
instance P.Enum DiffOption where
fromEnum DiffOptionNormal = 0
fromEnum DiffOptionReverse = 1
fromEnum DiffOptionIncludeIgnored = 2
fromEnum DiffOptionRecurseIgnoredDirs = 4
fromEnum DiffOptionIncludeUntracked = 8
fromEnum DiffOptionRecurseUntrackedDirs = 16
fromEnum DiffOptionIncludeUnmodified = 32
fromEnum DiffOptionIncludeTypechange = 64
fromEnum DiffOptionIncludeTypechangeTrees = 128
fromEnum DiffOptionIgnoreFileMode = 256
fromEnum DiffOptionIgnoreSubmodules = 512
fromEnum DiffOptionIgnoreCase = 1024
fromEnum DiffOptionDisablePathspecMatch = 4096
fromEnum DiffOptionSkipBinaryCheck = 8192
fromEnum DiffOptionEnableFastUntrackedDirs = 16384
fromEnum DiffOptionForceText = 1048576
fromEnum DiffOptionForceBinary = 2097152
fromEnum DiffOptionIgnoreWhitespace = 4194304
fromEnum DiffOptionIgnoreWhitespaceChange = 8388608
fromEnum DiffOptionIgnoreWhitespaceEol = 16777216
fromEnum DiffOptionShowUntrackedContent = 33554432
fromEnum DiffOptionShowUnmodified = 67108864
fromEnum DiffOptionPatience = 268435456
fromEnum DiffOptionMinimal = 536870912
fromEnum DiffOptionShowBinary = 1073741824
fromEnum (AnotherDiffOption k) = k
toEnum 0 = DiffOptionNormal
toEnum 1 = DiffOptionReverse
toEnum 2 = DiffOptionIncludeIgnored
toEnum 4 = DiffOptionRecurseIgnoredDirs
toEnum 8 = DiffOptionIncludeUntracked
toEnum 16 = DiffOptionRecurseUntrackedDirs
toEnum 32 = DiffOptionIncludeUnmodified
toEnum 64 = DiffOptionIncludeTypechange
toEnum 128 = DiffOptionIncludeTypechangeTrees
toEnum 256 = DiffOptionIgnoreFileMode
toEnum 512 = DiffOptionIgnoreSubmodules
toEnum 1024 = DiffOptionIgnoreCase
toEnum 4096 = DiffOptionDisablePathspecMatch
toEnum 8192 = DiffOptionSkipBinaryCheck
toEnum 16384 = DiffOptionEnableFastUntrackedDirs
toEnum 1048576 = DiffOptionForceText
toEnum 2097152 = DiffOptionForceBinary
toEnum 4194304 = DiffOptionIgnoreWhitespace
toEnum 8388608 = DiffOptionIgnoreWhitespaceChange
toEnum 16777216 = DiffOptionIgnoreWhitespaceEol
toEnum 33554432 = DiffOptionShowUntrackedContent
toEnum 67108864 = DiffOptionShowUnmodified
toEnum 268435456 = DiffOptionPatience
toEnum 536870912 = DiffOptionMinimal
toEnum 1073741824 = DiffOptionShowBinary
toEnum k = AnotherDiffOption k
instance P.Ord DiffOption where
compare a b = P.compare (P.fromEnum a) (P.fromEnum b)
foreign import ccall "ggit_diff_option_get_type" c_ggit_diff_option_get_type ::
IO GType
instance BoxedFlags DiffOption where
boxedFlagsType _ = c_ggit_diff_option_get_type
instance IsGFlag DiffOption
data DiffFormatEmailFlags =
DiffFormatEmailFlagsNone
| DiffFormatEmailFlagsExcludeSubjectPatchMarker
| AnotherDiffFormatEmailFlags Int
deriving (Show, Eq)
instance P.Enum DiffFormatEmailFlags where
fromEnum DiffFormatEmailFlagsNone = 0
fromEnum DiffFormatEmailFlagsExcludeSubjectPatchMarker = 1
fromEnum (AnotherDiffFormatEmailFlags k) = k
toEnum 0 = DiffFormatEmailFlagsNone
toEnum 1 = DiffFormatEmailFlagsExcludeSubjectPatchMarker
toEnum k = AnotherDiffFormatEmailFlags k
instance P.Ord DiffFormatEmailFlags where
compare a b = P.compare (P.fromEnum a) (P.fromEnum b)
foreign import ccall "ggit_diff_format_email_flags_get_type" c_ggit_diff_format_email_flags_get_type ::
IO GType
instance BoxedFlags DiffFormatEmailFlags where
boxedFlagsType _ = c_ggit_diff_format_email_flags_get_type
instance IsGFlag DiffFormatEmailFlags
data DiffFlag =
DiffFlagBinary
| DiffFlagNotBinary
| DiffFlagValidId
| AnotherDiffFlag Int
deriving (Show, Eq)
instance P.Enum DiffFlag where
fromEnum DiffFlagBinary = 1
fromEnum DiffFlagNotBinary = 2
fromEnum DiffFlagValidId = 4
fromEnum (AnotherDiffFlag k) = k
toEnum 1 = DiffFlagBinary
toEnum 2 = DiffFlagNotBinary
toEnum 4 = DiffFlagValidId
toEnum k = AnotherDiffFlag k
instance P.Ord DiffFlag where
compare a b = P.compare (P.fromEnum a) (P.fromEnum b)
foreign import ccall "ggit_diff_flag_get_type" c_ggit_diff_flag_get_type ::
IO GType
instance BoxedFlags DiffFlag where
boxedFlagsType _ = c_ggit_diff_flag_get_type
instance IsGFlag DiffFlag
data DiffFindFlags =
DiffFindFlagsFindByConfig
| DiffFindFlagsFindRenames
| DiffFindFlagsFindRenamesFromRewrites
| DiffFindFlagsFindCopies
| DiffFindFlagsFindCopiesFromUnmodified
| DiffFindFlagsFindRewrites
| DiffFindFlagsBreakRewrites
| DiffFindFlagsFindAndBreakRewrites
| DiffFindFlagsFindForUntracked
| DiffFindFlagsFindAll
| DiffFindFlagsFindIgnoreLeadingWhitespace
| DiffFindFlagsFindIgnoreWhitespace
| DiffFindFlagsFindDontIgnoreWhitespace
| DiffFindFlagsFindExactMatchOnly
| DiffFindFlagsBreakRewritesForRenamesOnly
| DiffFindFlagsFindRemoveUnmodified
| AnotherDiffFindFlags Int
deriving (Show, Eq)
instance P.Enum DiffFindFlags where
fromEnum DiffFindFlagsFindByConfig = 0
fromEnum DiffFindFlagsFindRenames = 1
fromEnum DiffFindFlagsFindRenamesFromRewrites = 2
fromEnum DiffFindFlagsFindCopies = 4
fromEnum DiffFindFlagsFindCopiesFromUnmodified = 8
fromEnum DiffFindFlagsFindRewrites = 16
fromEnum DiffFindFlagsBreakRewrites = 32
fromEnum DiffFindFlagsFindAndBreakRewrites = 48
fromEnum DiffFindFlagsFindForUntracked = 64
fromEnum DiffFindFlagsFindAll = 255
fromEnum DiffFindFlagsFindIgnoreLeadingWhitespace = 0
fromEnum DiffFindFlagsFindIgnoreWhitespace = 4096
fromEnum DiffFindFlagsFindDontIgnoreWhitespace = 8192
fromEnum DiffFindFlagsFindExactMatchOnly = 16384
fromEnum DiffFindFlagsBreakRewritesForRenamesOnly = 32768
fromEnum DiffFindFlagsFindRemoveUnmodified = 65536
fromEnum (AnotherDiffFindFlags k) = k
toEnum 0 = DiffFindFlagsFindByConfig
toEnum 1 = DiffFindFlagsFindRenames
toEnum 2 = DiffFindFlagsFindRenamesFromRewrites
toEnum 4 = DiffFindFlagsFindCopies
toEnum 8 = DiffFindFlagsFindCopiesFromUnmodified
toEnum 16 = DiffFindFlagsFindRewrites
toEnum 32 = DiffFindFlagsBreakRewrites
toEnum 48 = DiffFindFlagsFindAndBreakRewrites
toEnum 64 = DiffFindFlagsFindForUntracked
toEnum 255 = DiffFindFlagsFindAll
toEnum 0 = DiffFindFlagsFindIgnoreLeadingWhitespace
toEnum 4096 = DiffFindFlagsFindIgnoreWhitespace
toEnum 8192 = DiffFindFlagsFindDontIgnoreWhitespace
toEnum 16384 = DiffFindFlagsFindExactMatchOnly
toEnum 32768 = DiffFindFlagsBreakRewritesForRenamesOnly
toEnum 65536 = DiffFindFlagsFindRemoveUnmodified
toEnum k = AnotherDiffFindFlags k
instance P.Ord DiffFindFlags where
compare a b = P.compare (P.fromEnum a) (P.fromEnum b)
foreign import ccall "ggit_diff_find_flags_get_type" c_ggit_diff_find_flags_get_type ::
IO GType
instance BoxedFlags DiffFindFlags where
boxedFlagsType _ = c_ggit_diff_find_flags_get_type
instance IsGFlag DiffFindFlags
data Credtype =
CredtypeUserpassPlaintext
| CredtypeSshKey
| CredtypeSshCustom
| CredtypeDefault
| CredtypeSshInteractive
| AnotherCredtype Int
deriving (Show, Eq)
instance P.Enum Credtype where
fromEnum CredtypeUserpassPlaintext = 1
fromEnum CredtypeSshKey = 2
fromEnum CredtypeSshCustom = 4
fromEnum CredtypeDefault = 8
fromEnum CredtypeSshInteractive = 16
fromEnum (AnotherCredtype k) = k
toEnum 1 = CredtypeUserpassPlaintext
toEnum 2 = CredtypeSshKey
toEnum 4 = CredtypeSshCustom
toEnum 8 = CredtypeDefault
toEnum 16 = CredtypeSshInteractive
toEnum k = AnotherCredtype k
instance P.Ord Credtype where
compare a b = P.compare (P.fromEnum a) (P.fromEnum b)
foreign import ccall "ggit_credtype_get_type" c_ggit_credtype_get_type ::
IO GType
instance BoxedFlags Credtype where
boxedFlagsType _ = c_ggit_credtype_get_type
instance IsGFlag Credtype
data CreateFlags =
CreateFlagsNone
| CreateFlagsForce
| AnotherCreateFlags Int
deriving (Show, Eq)
instance P.Enum CreateFlags where
fromEnum CreateFlagsNone = 0
fromEnum CreateFlagsForce = 1
fromEnum (AnotherCreateFlags k) = k
toEnum 0 = CreateFlagsNone
toEnum 1 = CreateFlagsForce
toEnum k = AnotherCreateFlags k
instance P.Ord CreateFlags where
compare a b = P.compare (P.fromEnum a) (P.fromEnum b)
foreign import ccall "ggit_create_flags_get_type" c_ggit_create_flags_get_type ::
IO GType
instance BoxedFlags CreateFlags where
boxedFlagsType _ = c_ggit_create_flags_get_type
instance IsGFlag CreateFlags
data CheckoutStrategy =
CheckoutStrategyNone
| CheckoutStrategySafe
| CheckoutStrategyForce
| CheckoutStrategyRecreateMissing
| CheckoutStrategyAllowConflicts
| CheckoutStrategyRemoveUntracked
| CheckoutStrategyRemoveIgnored
| CheckoutStrategyUpdateOnly
| CheckoutStrategyDontUpdateIndex
| CheckoutStrategyNoRefresh
| CheckoutStrategySkipUnmerged
| CheckoutStrategyUseOurs
| CheckoutStrategyUseTheirs
| CheckoutStrategyDisablePathspecMatch
| CheckoutStrategySkipLockedDirectories
| CheckoutStrategyDontOverwriteIgnored
| CheckoutStrategyConflictStyleMerge
| CheckoutStrategyConflictStyleDiff3
| CheckoutStrategyDontRemoveExisting
| CheckoutStrategyDontWriteIndex
| CheckoutStrategyUpdateSubmodules
| CheckoutStrategyUpdateSubmodulesIfChanged
| AnotherCheckoutStrategy Int
deriving (Show, Eq)
instance P.Enum CheckoutStrategy where
fromEnum CheckoutStrategyNone = 0
fromEnum CheckoutStrategySafe = 1
fromEnum CheckoutStrategyForce = 2
fromEnum CheckoutStrategyRecreateMissing = 4
fromEnum CheckoutStrategyAllowConflicts = 16
fromEnum CheckoutStrategyRemoveUntracked = 32
fromEnum CheckoutStrategyRemoveIgnored = 64
fromEnum CheckoutStrategyUpdateOnly = 128
fromEnum CheckoutStrategyDontUpdateIndex = 256
fromEnum CheckoutStrategyNoRefresh = 512
fromEnum CheckoutStrategySkipUnmerged = 1024
fromEnum CheckoutStrategyUseOurs = 2048
fromEnum CheckoutStrategyUseTheirs = 4096
fromEnum CheckoutStrategyDisablePathspecMatch = 8192
fromEnum CheckoutStrategySkipLockedDirectories = 262144
fromEnum CheckoutStrategyDontOverwriteIgnored = 524288
fromEnum CheckoutStrategyConflictStyleMerge = 1048576
fromEnum CheckoutStrategyConflictStyleDiff3 = 2097152
fromEnum CheckoutStrategyDontRemoveExisting = 4194304
fromEnum CheckoutStrategyDontWriteIndex = 8388608
fromEnum CheckoutStrategyUpdateSubmodules = 65536
fromEnum CheckoutStrategyUpdateSubmodulesIfChanged = 131072
fromEnum (AnotherCheckoutStrategy k) = k
toEnum 0 = CheckoutStrategyNone
toEnum 1 = CheckoutStrategySafe
toEnum 2 = CheckoutStrategyForce
toEnum 4 = CheckoutStrategyRecreateMissing
toEnum 16 = CheckoutStrategyAllowConflicts
toEnum 32 = CheckoutStrategyRemoveUntracked
toEnum 64 = CheckoutStrategyRemoveIgnored
toEnum 128 = CheckoutStrategyUpdateOnly
toEnum 256 = CheckoutStrategyDontUpdateIndex
toEnum 512 = CheckoutStrategyNoRefresh
toEnum 1024 = CheckoutStrategySkipUnmerged
toEnum 2048 = CheckoutStrategyUseOurs
toEnum 4096 = CheckoutStrategyUseTheirs
toEnum 8192 = CheckoutStrategyDisablePathspecMatch
toEnum 262144 = CheckoutStrategySkipLockedDirectories
toEnum 524288 = CheckoutStrategyDontOverwriteIgnored
toEnum 1048576 = CheckoutStrategyConflictStyleMerge
toEnum 2097152 = CheckoutStrategyConflictStyleDiff3
toEnum 4194304 = CheckoutStrategyDontRemoveExisting
toEnum 8388608 = CheckoutStrategyDontWriteIndex
toEnum 65536 = CheckoutStrategyUpdateSubmodules
toEnum 131072 = CheckoutStrategyUpdateSubmodulesIfChanged
toEnum k = AnotherCheckoutStrategy k
instance P.Ord CheckoutStrategy where
compare a b = P.compare (P.fromEnum a) (P.fromEnum b)
foreign import ccall "ggit_checkout_strategy_get_type" c_ggit_checkout_strategy_get_type ::
IO GType
instance BoxedFlags CheckoutStrategy where
boxedFlagsType _ = c_ggit_checkout_strategy_get_type
instance IsGFlag CheckoutStrategy
data CheckoutNotifyFlags =
CheckoutNotifyFlagsNone
| CheckoutNotifyFlagsConflict
| CheckoutNotifyFlagsDirty
| CheckoutNotifyFlagsUpdated
| CheckoutNotifyFlagsUntracked
| CheckoutNotifyFlagsIgnored
| CheckoutNotifyFlagsAll
| AnotherCheckoutNotifyFlags Int
deriving (Show, Eq)
instance P.Enum CheckoutNotifyFlags where
fromEnum CheckoutNotifyFlagsNone = 0
fromEnum CheckoutNotifyFlagsConflict = 1
fromEnum CheckoutNotifyFlagsDirty = 2
fromEnum CheckoutNotifyFlagsUpdated = 4
fromEnum CheckoutNotifyFlagsUntracked = 8
fromEnum CheckoutNotifyFlagsIgnored = 16
fromEnum CheckoutNotifyFlagsAll = 65535
fromEnum (AnotherCheckoutNotifyFlags k) = k
toEnum 0 = CheckoutNotifyFlagsNone
toEnum 1 = CheckoutNotifyFlagsConflict
toEnum 2 = CheckoutNotifyFlagsDirty
toEnum 4 = CheckoutNotifyFlagsUpdated
toEnum 8 = CheckoutNotifyFlagsUntracked
toEnum 16 = CheckoutNotifyFlagsIgnored
toEnum 65535 = CheckoutNotifyFlagsAll
toEnum k = AnotherCheckoutNotifyFlags k
instance P.Ord CheckoutNotifyFlags where
compare a b = P.compare (P.fromEnum a) (P.fromEnum b)
foreign import ccall "ggit_checkout_notify_flags_get_type" c_ggit_checkout_notify_flags_get_type ::
IO GType
instance BoxedFlags CheckoutNotifyFlags where
boxedFlagsType _ = c_ggit_checkout_notify_flags_get_type
instance IsGFlag CheckoutNotifyFlags
data BlameFlags =
BlameFlagsNormal
| BlameFlagsTrackCopiesSameFile
| AnotherBlameFlags Int
deriving (Show, Eq)
instance P.Enum BlameFlags where
fromEnum BlameFlagsNormal = 0
fromEnum BlameFlagsTrackCopiesSameFile = 1
fromEnum (AnotherBlameFlags k) = k
toEnum 0 = BlameFlagsNormal
toEnum 1 = BlameFlagsTrackCopiesSameFile
toEnum k = AnotherBlameFlags k
instance P.Ord BlameFlags where
compare a b = P.compare (P.fromEnum a) (P.fromEnum b)
foreign import ccall "ggit_blame_flags_get_type" c_ggit_blame_flags_get_type ::
IO GType
instance BoxedFlags BlameFlags where
boxedFlagsType _ = c_ggit_blame_flags_get_type
instance IsGFlag BlameFlags
data AttributeCheckFlags =
AttributeCheckFlagsFileThenIndex
| AttributeCheckFlagsIndexThenFile
| AttributeCheckFlagsIndexOnly
| AttributeCheckFlagsNoSystem
| AnotherAttributeCheckFlags Int
deriving (Show, Eq)
instance P.Enum AttributeCheckFlags where
fromEnum AttributeCheckFlagsFileThenIndex = 0
fromEnum AttributeCheckFlagsIndexThenFile = 1
fromEnum AttributeCheckFlagsIndexOnly = 2
fromEnum AttributeCheckFlagsNoSystem = 4
fromEnum (AnotherAttributeCheckFlags k) = k
toEnum 0 = AttributeCheckFlagsFileThenIndex
toEnum 1 = AttributeCheckFlagsIndexThenFile
toEnum 2 = AttributeCheckFlagsIndexOnly
toEnum 4 = AttributeCheckFlagsNoSystem
toEnum k = AnotherAttributeCheckFlags k
instance P.Ord AttributeCheckFlags where
compare a b = P.compare (P.fromEnum a) (P.fromEnum b)
foreign import ccall "ggit_attribute_check_flags_get_type" c_ggit_attribute_check_flags_get_type ::
IO GType
instance BoxedFlags AttributeCheckFlags where
boxedFlagsType _ = c_ggit_attribute_check_flags_get_type
instance IsGFlag AttributeCheckFlags