{- | Copyright : Will Thompson, Iñaki García Etxebarria and Jonas Platte License : LGPL-2.1 Maintainer : Iñaki García Etxebarria (inaki@blueleaf.cc) -} #define ENABLE_OVERLOADING (MIN_VERSION_haskell_gi_overloading(1,0,0) \ && !defined(__HADDOCK_VERSION__)) module GI.Ggit.Flags ( -- * Flags -- ** AttributeCheckFlags #flag:AttributeCheckFlags# AttributeCheckFlags(..) , -- ** BlameFlags #flag:BlameFlags# BlameFlags(..) , -- ** CheckoutNotifyFlags #flag:CheckoutNotifyFlags# CheckoutNotifyFlags(..) , -- ** CheckoutStrategy #flag:CheckoutStrategy# CheckoutStrategy(..) , -- ** CreateFlags #flag:CreateFlags# CreateFlags(..) , -- ** Credtype #flag:Credtype# Credtype(..) , -- ** DiffFindFlags #flag:DiffFindFlags# DiffFindFlags(..) , -- ** DiffFlag #flag:DiffFlag# DiffFlag(..) , -- ** DiffFormatEmailFlags #flag:DiffFormatEmailFlags# DiffFormatEmailFlags(..) , -- ** DiffOption #flag:DiffOption# DiffOption(..) , -- ** FeatureFlags #flag:FeatureFlags# FeatureFlags(..) , -- ** MergeFileFlags #flag:MergeFileFlags# MergeFileFlags(..) , -- ** MergeFlags #flag:MergeFlags# MergeFlags(..) , -- ** SortMode #flag:SortMode# SortMode(..) , -- ** StashFlags #flag:StashFlags# StashFlags(..) , -- ** StatusFlags #flag:StatusFlags# StatusFlags(..) , -- ** StatusOption #flag:StatusOption# StatusOption(..) , -- ** SubmoduleStatus #flag:SubmoduleStatus# 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 -- Flags SubmoduleStatus {- | FIXME -} data SubmoduleStatus = SubmoduleStatusInHead {- ^ /No description available in the introspection data./ -} | SubmoduleStatusInIndex {- ^ /No description available in the introspection data./ -} | SubmoduleStatusInConfig {- ^ /No description available in the introspection data./ -} | SubmoduleStatusInWd {- ^ /No description available in the introspection data./ -} | SubmoduleStatusIndexAdded {- ^ /No description available in the introspection data./ -} | SubmoduleStatusIndexDeleted {- ^ /No description available in the introspection data./ -} | SubmoduleStatusIndexModified {- ^ /No description available in the introspection data./ -} | SubmoduleStatusWdUninitialized {- ^ /No description available in the introspection data./ -} | SubmoduleStatusWdAdded {- ^ /No description available in the introspection data./ -} | SubmoduleStatusWdDeleted {- ^ /No description available in the introspection data./ -} | SubmoduleStatusWdModified {- ^ /No description available in the introspection data./ -} | SubmoduleStatusWdIndexModified {- ^ /No description available in the introspection data./ -} | SubmoduleStatusWdWdModified {- ^ /No description available in the introspection data./ -} | SubmoduleStatusWdUntracked {- ^ /No description available in the introspection data./ -} | AnotherSubmoduleStatus Int -- ^ Catch-all for unknown values 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 -- Flags StatusOption {- | GGIT_STATUS_OPTION_INCLUDE_UNTRACKED: include untracked files (default). GGIT_STATUS_OPTION_INCLUDE_IGNORED: include ignored files (default). GGIT_STATUS_OPTION_INCLUDE_UNMODIFIED: include unmodified files. GGIT_STATUS_OPTION_EXCLUDE_SUBMODULES: exclude submodules. GGIT_STATUS_OPTION_RECURSE_UNTRACKED_DIRS: search untracked directories recursively (default). GGIT_STATUS_OPTION_DISABLE_PATHSPEC_MATCH: do not match path specifications. GGIT_STATUS_OPTION_RECURSE_IGNORED_DIRS: search ignored directories recursively. GGIT_STATUS_OPTION_RENAMES_HEAD_TO_INDEX: indicates that rename detection should be processed between the head and the index and enables the GIT_STATUS_INDEX_RENAMED as a possible status flag. GGIT_STATUS_OPTION_RENAMES_INDEX_TO_WORKDIR: indicates tha rename detection should be run between the index and the working directory and enabled GIT_STATUS_WT_RENAMED as a possible status flag. GGIT_STATUS_OPTION_SORT_CASE_SENSITIVELY: sort case sensitive. GGIT_STATUS_OPTION_SORT_CASE_INSENSITIVELY: sort case insensitive. GGIT_STATUS_OPTION_DEFAULT: default flags. Status options specified when using @/ggit_repository_file_status_foreach/@. -} data StatusOption = StatusOptionIncludeUntracked {- ^ /No description available in the introspection data./ -} | StatusOptionIncludeIgnored {- ^ /No description available in the introspection data./ -} | StatusOptionIncludeUnmodified {- ^ /No description available in the introspection data./ -} | StatusOptionExcludeSubmodules {- ^ /No description available in the introspection data./ -} | StatusOptionRecurseUntrackedDirs {- ^ /No description available in the introspection data./ -} | StatusOptionDisablePathspecMatch {- ^ /No description available in the introspection data./ -} | StatusOptionRecurseIgnoredDirs {- ^ /No description available in the introspection data./ -} | StatusOptionRenamesHeadToIndex {- ^ /No description available in the introspection data./ -} | StatusOptionRenamesIndexToWorkdir {- ^ /No description available in the introspection data./ -} | StatusOptionSortCaseSensitively {- ^ /No description available in the introspection data./ -} | StatusOptionSortCaseInsensitively {- ^ /No description available in the introspection data./ -} | StatusOptionDefault {- ^ /No description available in the introspection data./ -} | AnotherStatusOption Int -- ^ Catch-all for unknown values 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 -- Flags StatusFlags {- | Describes a file\'s status. -} data StatusFlags = StatusFlagsCurrent {- ^ file is current. -} | StatusFlagsIndexNew {- ^ file in index is new. -} | StatusFlagsIndexModified {- ^ file in index is modified. -} | StatusFlagsIndexDeleted {- ^ file in index is deleted. -} | StatusFlagsIndexRenamed {- ^ /No description available in the introspection data./ -} | StatusFlagsIndexTypechange {- ^ /No description available in the introspection data./ -} | StatusFlagsWorkingTreeNew {- ^ file in working tree is new. -} | StatusFlagsWorkingTreeModified {- ^ file in working tree is modified. -} | StatusFlagsWorkingTreeDeleted {- ^ file in working tree is deleted. -} | StatusFlagsWorkingTreeTypechange {- ^ /No description available in the introspection data./ -} | StatusFlagsIgnored {- ^ file is ignored. -} | AnotherStatusFlags Int -- ^ Catch-all for unknown values 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 -- Flags StashFlags {- | Describes how a stash should be applied. -} data StashFlags = StashFlagsDefault {- ^ default stash. -} | StashFlagsKeepIndex {- ^ All changes already added to the index are left intact in the working directory. -} | StashFlagsIncludeUntracked {- ^ All untracked files are also stashed and then cleaned up from the working directory. -} | StashFlagsIncludeIgnored {- ^ All ignored files are also stashed and then cleaned up from the working directory. -} | AnotherStashFlags Int -- ^ Catch-all for unknown values 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 -- Flags SortMode {- | The type of sorting mode for the revision walker. -} data SortMode = SortModeNone {- ^ Sorts the repository contents in no particular ordering; this sorting is arbitrary, implementation-specific and subject to change at any time. -} | SortModeTopological {- ^ Sorts the repository contents in topological order (parents before children); this sorting mode can be combined with time sorting. -} | SortModeTime {- ^ Sort the repository contents by commit time; this sorting mode can be combined with topological sorting. -} | SortModeReverse {- ^ Iterate through the repository contents in reverse order; this sorting mode can be combined with any of the above. -} | AnotherSortMode Int -- ^ Catch-all for unknown values 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 -- Flags MergeFlags {- | /No description available in the introspection data./ -} data MergeFlags = MergeFlagsFindRenames {- ^ detect renames that occur between the common ancestor and the \"ours\" side or the common ancestor and the \"theirs\" side. This will enable the ability to merge between a modified and renamed file. -} | MergeFlagsFailOnConflict {- ^ If a conflict occurs, exit immediately instead of attempting to continue resolving conflicts. The merge operation will fail with /@gGITEMERGECONFLICT@/ and no index will be returned. -} | MergeFlagsSkipReuc {- ^ do not write the REUC extension on the generated index. -} | MergeFlagsNoRecursive {- ^ If the commits being merged have multiple merge bases, do not build a recursive merge base (by merging the multiple merge bases), instead simply use the first base. This flag provides a similar merge base to @git-merge-resolve@. -} | AnotherMergeFlags Int -- ^ Catch-all for unknown values 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 -- Flags MergeFileFlags {- | GGIT_MERGE_FILE_DEFAULT: Defaults. GGIT_MERGE_FILE_STYLE_MERGE: Create standard conflicted merge files. GGIT_MERGE_FILE_STYLE_DIFF3: Create diff3-style files. GGIT_MERGE_FILE_SIMPLIFY_ALNUM: Condense non-alphanumeric regions for simplified diff file. GGIT_MERGE_FILE_IGNORE_WHITESPACE: Ignore all whitespace. GGIT_MERGE_FILE_IGNORE_WHITESPACE_CHANGE: Ignore changes in amount of whitespace. GGIT_MERGE_FILE_IGNORE_WHITESPACE_EOL: Ignore whitespace at end of line. GGIT_MERGE_FILE_DIFF_PATIENCE: Use the \"patience diff\" algorithm. GGIT_MERGE_FILE_DIFF_MINIMAL: Take extra time to find minimal diff. -} data MergeFileFlags = MergeFileFlagsDefault {- ^ /No description available in the introspection data./ -} | MergeFileFlagsStyleMerge {- ^ /No description available in the introspection data./ -} | MergeFileFlagsStyleDiff3 {- ^ /No description available in the introspection data./ -} | MergeFileFlagsSimplifyAlnum {- ^ /No description available in the introspection data./ -} | MergeFileFlagsIgnoreWhitespace {- ^ /No description available in the introspection data./ -} | MergeFileFlagsIgnoreWhitespaceChange {- ^ /No description available in the introspection data./ -} | MergeFileFlagsIgnoreWhitespaceEol {- ^ /No description available in the introspection data./ -} | MergeFileFlagsDiffPatience {- ^ /No description available in the introspection data./ -} | MergeFileFlagsDiffMinimal {- ^ /No description available in the introspection data./ -} | AnotherMergeFileFlags Int -- ^ Catch-all for unknown values 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 -- Flags FeatureFlags {- | /No description available in the introspection data./ -} data FeatureFlags = FeatureFlagsThreads {- ^ /No description available in the introspection data./ -} | FeatureFlagsHttps {- ^ /No description available in the introspection data./ -} | FeatureFlagsSsh {- ^ /No description available in the introspection data./ -} | AnotherFeatureFlags Int -- ^ Catch-all for unknown values 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 -- Flags DiffOption {- | How the diff should be generated. -} data DiffOption = DiffOptionNormal {- ^ normal. -} | DiffOptionReverse {- ^ reverse the sides of the diff. -} | DiffOptionIncludeIgnored {- ^ include ignored files. -} | DiffOptionRecurseIgnoredDirs {- ^ also add all files under ignored dirs. -} | DiffOptionIncludeUntracked {- ^ include untracked files. -} | DiffOptionRecurseUntrackedDirs {- ^ recurse to untracked directories. -} | DiffOptionIncludeUnmodified {- ^ include unmodified files. -} | DiffOptionIncludeTypechange {- ^ enable generation of typechange detal records. -} | DiffOptionIncludeTypechangeTrees {- ^ try to label tree transitions as type changes. -} | DiffOptionIgnoreFileMode {- ^ ignore file mode changes. -} | DiffOptionIgnoreSubmodules {- ^ ignore submodules. -} | DiffOptionIgnoreCase {- ^ use case insensitive filename comparison. -} | DiffOptionDisablePathspecMatch {- ^ use exact path matching. -} | DiffOptionSkipBinaryCheck {- ^ disable updating the binary flag in delta records. -} | DiffOptionEnableFastUntrackedDirs {- ^ immediately label untracked directories as untracked, without checking inside. -} | DiffOptionForceText {- ^ force text. -} | DiffOptionForceBinary {- ^ treat all files as binary, disabling text diffs. -} | DiffOptionIgnoreWhitespace {- ^ ignore whitespace. -} | DiffOptionIgnoreWhitespaceChange {- ^ ignore whitespace change. -} | DiffOptionIgnoreWhitespaceEol {- ^ ignore whitespace at end-of-line. -} | DiffOptionShowUntrackedContent {- ^ include content of untracked files. this implies GGIT_DIFF_INCLUDE_UNTRACKED but not GGIT_DIFF_RECURSE_UNTRACKED_DIRS. -} | DiffOptionShowUnmodified {- ^ show unmodified files. -} | DiffOptionPatience {- ^ generate using the \"patience diff\" algorithm. -} | DiffOptionMinimal {- ^ take extra time to find minimal diff. -} | DiffOptionShowBinary {- ^ include deflate\/delta information for binary files. -} | AnotherDiffOption Int -- ^ Catch-all for unknown values 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 -- Flags DiffFormatEmailFlags {- | /No description available in the introspection data./ -} data DiffFormatEmailFlags = DiffFormatEmailFlagsNone {- ^ /No description available in the introspection data./ -} | DiffFormatEmailFlagsExcludeSubjectPatchMarker {- ^ /No description available in the introspection data./ -} | AnotherDiffFormatEmailFlags Int -- ^ Catch-all for unknown values 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 -- Flags DiffFlag {- | Describes the diff file and\/or delta flags -} data DiffFlag = DiffFlagBinary {- ^ if the file is binary. -} | DiffFlagNotBinary {- ^ if the file is not binary. -} | DiffFlagValidId {- ^ if the ID is valid. -} | AnotherDiffFlag Int -- ^ Catch-all for unknown values 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 -- Flags DiffFindFlags {- | /No description available in the introspection data./ -} data DiffFindFlags = DiffFindFlagsFindByConfig {- ^ /No description available in the introspection data./ -} | DiffFindFlagsFindRenames {- ^ /No description available in the introspection data./ -} | DiffFindFlagsFindRenamesFromRewrites {- ^ /No description available in the introspection data./ -} | DiffFindFlagsFindCopies {- ^ /No description available in the introspection data./ -} | DiffFindFlagsFindCopiesFromUnmodified {- ^ /No description available in the introspection data./ -} | DiffFindFlagsFindRewrites {- ^ /No description available in the introspection data./ -} | DiffFindFlagsBreakRewrites {- ^ /No description available in the introspection data./ -} | DiffFindFlagsFindAndBreakRewrites {- ^ /No description available in the introspection data./ -} | DiffFindFlagsFindForUntracked {- ^ /No description available in the introspection data./ -} | DiffFindFlagsFindAll {- ^ /No description available in the introspection data./ -} | DiffFindFlagsFindIgnoreLeadingWhitespace {- ^ /No description available in the introspection data./ -} | DiffFindFlagsFindIgnoreWhitespace {- ^ /No description available in the introspection data./ -} | DiffFindFlagsFindDontIgnoreWhitespace {- ^ /No description available in the introspection data./ -} | DiffFindFlagsFindExactMatchOnly {- ^ /No description available in the introspection data./ -} | DiffFindFlagsBreakRewritesForRenamesOnly {- ^ /No description available in the introspection data./ -} | DiffFindFlagsFindRemoveUnmodified {- ^ /No description available in the introspection data./ -} | AnotherDiffFindFlags Int -- ^ Catch-all for unknown values 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 -- Flags Credtype {- | /No description available in the introspection data./ -} data Credtype = CredtypeUserpassPlaintext {- ^ /No description available in the introspection data./ -} | CredtypeSshKey {- ^ /No description available in the introspection data./ -} | CredtypeSshCustom {- ^ /No description available in the introspection data./ -} | CredtypeDefault {- ^ /No description available in the introspection data./ -} | CredtypeSshInteractive {- ^ /No description available in the introspection data./ -} | AnotherCredtype Int -- ^ Catch-all for unknown values 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 -- Flags CreateFlags {- | Describes how something should be created. -} data CreateFlags = CreateFlagsNone {- ^ attempt to create. -} | CreateFlagsForce {- ^ force creation. -} | AnotherCreateFlags Int -- ^ Catch-all for unknown values 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 -- Flags CheckoutStrategy {- | /No description available in the introspection data./ -} data CheckoutStrategy = CheckoutStrategyNone {- ^ /No description available in the introspection data./ -} | CheckoutStrategySafe {- ^ /No description available in the introspection data./ -} | CheckoutStrategyForce {- ^ /No description available in the introspection data./ -} | CheckoutStrategyRecreateMissing {- ^ /No description available in the introspection data./ -} | CheckoutStrategyAllowConflicts {- ^ /No description available in the introspection data./ -} | CheckoutStrategyRemoveUntracked {- ^ /No description available in the introspection data./ -} | CheckoutStrategyRemoveIgnored {- ^ /No description available in the introspection data./ -} | CheckoutStrategyUpdateOnly {- ^ /No description available in the introspection data./ -} | CheckoutStrategyDontUpdateIndex {- ^ /No description available in the introspection data./ -} | CheckoutStrategyNoRefresh {- ^ /No description available in the introspection data./ -} | CheckoutStrategySkipUnmerged {- ^ /No description available in the introspection data./ -} | CheckoutStrategyUseOurs {- ^ /No description available in the introspection data./ -} | CheckoutStrategyUseTheirs {- ^ /No description available in the introspection data./ -} | CheckoutStrategyDisablePathspecMatch {- ^ /No description available in the introspection data./ -} | CheckoutStrategySkipLockedDirectories {- ^ /No description available in the introspection data./ -} | CheckoutStrategyDontOverwriteIgnored {- ^ /No description available in the introspection data./ -} | CheckoutStrategyConflictStyleMerge {- ^ /No description available in the introspection data./ -} | CheckoutStrategyConflictStyleDiff3 {- ^ /No description available in the introspection data./ -} | CheckoutStrategyDontRemoveExisting {- ^ /No description available in the introspection data./ -} | CheckoutStrategyDontWriteIndex {- ^ /No description available in the introspection data./ -} | CheckoutStrategyUpdateSubmodules {- ^ /No description available in the introspection data./ -} | CheckoutStrategyUpdateSubmodulesIfChanged {- ^ /No description available in the introspection data./ -} | AnotherCheckoutStrategy Int -- ^ Catch-all for unknown values 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 -- Flags CheckoutNotifyFlags {- | /No description available in the introspection data./ -} data CheckoutNotifyFlags = CheckoutNotifyFlagsNone {- ^ /No description available in the introspection data./ -} | CheckoutNotifyFlagsConflict {- ^ /No description available in the introspection data./ -} | CheckoutNotifyFlagsDirty {- ^ /No description available in the introspection data./ -} | CheckoutNotifyFlagsUpdated {- ^ /No description available in the introspection data./ -} | CheckoutNotifyFlagsUntracked {- ^ /No description available in the introspection data./ -} | CheckoutNotifyFlagsIgnored {- ^ /No description available in the introspection data./ -} | CheckoutNotifyFlagsAll {- ^ /No description available in the introspection data./ -} | AnotherCheckoutNotifyFlags Int -- ^ Catch-all for unknown values 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 -- Flags BlameFlags {- | /No description available in the introspection data./ -} data BlameFlags = BlameFlagsNormal {- ^ Normal blame, the default. -} | BlameFlagsTrackCopiesSameFile {- ^ Track lines that have moved within a file (like git blame -M) -} | AnotherBlameFlags Int -- ^ Catch-all for unknown values 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 -- Flags AttributeCheckFlags {- | Attribute check flags indicate the order in which to check for gitattributes. git core uses /@gGITATTRIBUTECHECKFILETHENINDEX@/ for all operations, except on checkout, where it uses /@gGITATTRIBUTECHECKINDEXTHENFILE@/. -} data AttributeCheckFlags = AttributeCheckFlagsFileThenIndex {- ^ check working directory, then index. -} | AttributeCheckFlagsIndexThenFile {- ^ check index, then working directory. -} | AttributeCheckFlagsIndexOnly {- ^ check only index. -} | AttributeCheckFlagsNoSystem {- ^ ignore system wide attributes. -} | AnotherAttributeCheckFlags Int -- ^ Catch-all for unknown values 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