{-# LANGUAGE TypeApplications #-}


-- | Copyright  : Will Thompson and Iñaki García Etxebarria
-- License    : LGPL-2.1
-- Maintainer : Iñaki García Etxebarria
-- 
-- Represents a branch enumerator.

#if (MIN_VERSION_haskell_gi_overloading(1,0,0) && !defined(__HADDOCK_VERSION__))
#define ENABLE_OVERLOADING
#endif

module GI.Ggit.Structs.BranchEnumerator
    ( 

-- * Exported types
    BranchEnumerator(..)                    ,


 -- * Methods
-- | 
-- 
--  === __Click to display all available methods, including inherited ones__
-- ==== Methods
-- [get]("GI.Ggit.Structs.BranchEnumerator#g:method:get"), [iterator]("GI.Ggit.Structs.BranchEnumerator#g:method:iterator"), [next]("GI.Ggit.Structs.BranchEnumerator#g:method:next"), [ref]("GI.Ggit.Structs.BranchEnumerator#g:method:ref"), [unref]("GI.Ggit.Structs.BranchEnumerator#g:method:unref").
-- 
-- ==== Getters
-- /None/.
-- 
-- ==== Setters
-- /None/.

#if defined(ENABLE_OVERLOADING)
    ResolveBranchEnumeratorMethod           ,
#endif

-- ** get #method:get#

#if defined(ENABLE_OVERLOADING)
    BranchEnumeratorGetMethodInfo           ,
#endif
    branchEnumeratorGet                     ,


-- ** iterator #method:iterator#

#if defined(ENABLE_OVERLOADING)
    BranchEnumeratorIteratorMethodInfo      ,
#endif
    branchEnumeratorIterator                ,


-- ** next #method:next#

#if defined(ENABLE_OVERLOADING)
    BranchEnumeratorNextMethodInfo          ,
#endif
    branchEnumeratorNext                    ,


-- ** ref #method:ref#

#if defined(ENABLE_OVERLOADING)
    BranchEnumeratorRefMethodInfo           ,
#endif
    branchEnumeratorRef                     ,


-- ** unref #method:unref#

#if defined(ENABLE_OVERLOADING)
    BranchEnumeratorUnrefMethodInfo         ,
#endif
    branchEnumeratorUnref                   ,




    ) 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.BasicTypes as B.Types
import qualified Data.GI.Base.ManagedPtr as B.ManagedPtr
import qualified Data.GI.Base.GArray as B.GArray
import qualified Data.GI.Base.GClosure as B.GClosure
import qualified Data.GI.Base.GError as B.GError
import qualified Data.GI.Base.GHashTable as B.GHT
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.GI.Base.Signals as B.Signals
import qualified Control.Monad.IO.Class as MIO
import qualified Data.Coerce as Coerce
import qualified Data.Text as T
import qualified Data.Kind as DK
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
import qualified GHC.Records as R

import {-# SOURCE #-} qualified GI.Ggit.Objects.Ref as Ggit.Ref

-- | Memory-managed wrapper type.
newtype BranchEnumerator = BranchEnumerator (SP.ManagedPtr BranchEnumerator)
    deriving (BranchEnumerator -> BranchEnumerator -> Bool
(BranchEnumerator -> BranchEnumerator -> Bool)
-> (BranchEnumerator -> BranchEnumerator -> Bool)
-> Eq BranchEnumerator
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
$c== :: BranchEnumerator -> BranchEnumerator -> Bool
== :: BranchEnumerator -> BranchEnumerator -> Bool
$c/= :: BranchEnumerator -> BranchEnumerator -> Bool
/= :: BranchEnumerator -> BranchEnumerator -> Bool
Eq)

instance SP.ManagedPtrNewtype BranchEnumerator where
    toManagedPtr :: BranchEnumerator -> ManagedPtr BranchEnumerator
toManagedPtr (BranchEnumerator ManagedPtr BranchEnumerator
p) = ManagedPtr BranchEnumerator
p

foreign import ccall "ggit_branch_enumerator_get_type" c_ggit_branch_enumerator_get_type :: 
    IO GType

type instance O.ParentTypes BranchEnumerator = '[]
instance O.HasParentTypes BranchEnumerator

instance B.Types.TypedObject BranchEnumerator where
    glibType :: IO GType
glibType = IO GType
c_ggit_branch_enumerator_get_type

instance B.Types.GBoxed BranchEnumerator

-- | Convert 'BranchEnumerator' to and from 'Data.GI.Base.GValue.GValue'. See 'Data.GI.Base.GValue.toGValue' and 'Data.GI.Base.GValue.fromGValue'.
instance B.GValue.IsGValue (Maybe BranchEnumerator) where
    gvalueGType_ :: IO GType
gvalueGType_ = IO GType
c_ggit_branch_enumerator_get_type
    gvalueSet_ :: Ptr GValue -> Maybe BranchEnumerator -> IO ()
gvalueSet_ Ptr GValue
gv Maybe BranchEnumerator
P.Nothing = Ptr GValue -> Ptr BranchEnumerator -> IO ()
forall a. Ptr GValue -> Ptr a -> IO ()
B.GValue.set_boxed Ptr GValue
gv (Ptr BranchEnumerator
forall a. Ptr a
FP.nullPtr :: FP.Ptr BranchEnumerator)
    gvalueSet_ Ptr GValue
gv (P.Just BranchEnumerator
obj) = BranchEnumerator -> (Ptr BranchEnumerator -> IO ()) -> IO ()
forall a c.
(HasCallStack, ManagedPtrNewtype a) =>
a -> (Ptr a -> IO c) -> IO c
B.ManagedPtr.withManagedPtr BranchEnumerator
obj (Ptr GValue -> Ptr BranchEnumerator -> IO ()
forall a. Ptr GValue -> Ptr a -> IO ()
B.GValue.set_boxed Ptr GValue
gv)
    gvalueGet_ :: Ptr GValue -> IO (Maybe BranchEnumerator)
gvalueGet_ Ptr GValue
gv = do
        Ptr BranchEnumerator
ptr <- Ptr GValue -> IO (Ptr BranchEnumerator)
forall b. Ptr GValue -> IO (Ptr b)
B.GValue.get_boxed Ptr GValue
gv :: IO (Ptr BranchEnumerator)
        if Ptr BranchEnumerator
ptr Ptr BranchEnumerator -> Ptr BranchEnumerator -> Bool
forall a. Eq a => a -> a -> Bool
/= Ptr BranchEnumerator
forall a. Ptr a
FP.nullPtr
        then BranchEnumerator -> Maybe BranchEnumerator
forall a. a -> Maybe a
P.Just (BranchEnumerator -> Maybe BranchEnumerator)
-> IO BranchEnumerator -> IO (Maybe BranchEnumerator)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
<$> (ManagedPtr BranchEnumerator -> BranchEnumerator)
-> Ptr BranchEnumerator -> IO BranchEnumerator
forall a.
(HasCallStack, GBoxed a) =>
(ManagedPtr a -> a) -> Ptr a -> IO a
B.ManagedPtr.newBoxed ManagedPtr BranchEnumerator -> BranchEnumerator
BranchEnumerator Ptr BranchEnumerator
ptr
        else Maybe BranchEnumerator -> IO (Maybe BranchEnumerator)
forall a. a -> IO a
forall (m :: * -> *) a. Monad m => a -> m a
return Maybe BranchEnumerator
forall a. Maybe a
P.Nothing
        
    


#if defined(ENABLE_OVERLOADING)
instance O.HasAttributeList BranchEnumerator
type instance O.AttributeList BranchEnumerator = BranchEnumeratorAttributeList
type BranchEnumeratorAttributeList = ('[ ] :: [(Symbol, DK.Type)])
#endif

-- method BranchEnumerator::get
-- method type : OrdinaryMethod
-- Args: [ Arg
--           { argCName = "enumerator"
--           , argType =
--               TInterface Name { namespace = "Ggit" , name = "BranchEnumerator" }
--           , direction = DirectionIn
--           , mayBeNull = False
--           , argDoc =
--               Documentation
--                 { rawDocText = Just "a #GgitBranchEnumerator."
--                 , sinceVersion = Nothing
--                 }
--           , argScope = ScopeTypeInvalid
--           , argClosure = -1
--           , argDestroy = -1
--           , argCallerAllocates = False
--           , transfer = TransferNothing
--           }
--       ]
-- Lengths: []
-- returnType: Just (TInterface Name { namespace = "Ggit" , name = "Ref" })
-- throws : False
-- Skip return : False

foreign import ccall "ggit_branch_enumerator_get" ggit_branch_enumerator_get :: 
    Ptr BranchEnumerator ->                 -- enumerator : TInterface (Name {namespace = "Ggit", name = "BranchEnumerator"})
    IO (Ptr Ggit.Ref.Ref)

-- | Returns the currently being enumerated branch, or 'P.Nothing'. Note that the
-- returned GgitRef will be of type GgitBranch if the ref represents a local
-- branch.
branchEnumeratorGet ::
    (B.CallStack.HasCallStack, MonadIO m) =>
    BranchEnumerator
    -- ^ /@enumerator@/: a t'GI.Ggit.Structs.BranchEnumerator.BranchEnumerator'.
    -> m (Maybe Ggit.Ref.Ref)
    -- ^ __Returns:__ the branch ref or 'P.Nothing'.
branchEnumeratorGet :: forall (m :: * -> *).
(HasCallStack, MonadIO m) =>
BranchEnumerator -> m (Maybe Ref)
branchEnumeratorGet BranchEnumerator
enumerator = IO (Maybe Ref) -> m (Maybe Ref)
forall a. IO a -> m a
forall (m :: * -> *) a. MonadIO m => IO a -> m a
liftIO (IO (Maybe Ref) -> m (Maybe Ref))
-> IO (Maybe Ref) -> m (Maybe Ref)
forall a b. (a -> b) -> a -> b
$ do
    Ptr BranchEnumerator
enumerator' <- BranchEnumerator -> IO (Ptr BranchEnumerator)
forall a. (HasCallStack, ManagedPtrNewtype a) => a -> IO (Ptr a)
unsafeManagedPtrGetPtr BranchEnumerator
enumerator
    Ptr Ref
result <- Ptr BranchEnumerator -> IO (Ptr Ref)
ggit_branch_enumerator_get Ptr BranchEnumerator
enumerator'
    Maybe Ref
maybeResult <- Ptr Ref -> (Ptr Ref -> IO Ref) -> IO (Maybe Ref)
forall a b. Ptr a -> (Ptr a -> IO b) -> IO (Maybe b)
convertIfNonNull Ptr Ref
result ((Ptr Ref -> IO Ref) -> IO (Maybe Ref))
-> (Ptr Ref -> IO Ref) -> IO (Maybe Ref)
forall a b. (a -> b) -> a -> b
$ \Ptr Ref
result' -> do
        Ref
result'' <- ((ManagedPtr Ref -> Ref) -> Ptr Ref -> IO Ref
forall a b.
(HasCallStack, GObject a, GObject b) =>
(ManagedPtr a -> a) -> Ptr b -> IO a
wrapObject ManagedPtr Ref -> Ref
Ggit.Ref.Ref) Ptr Ref
result'
        Ref -> IO Ref
forall a. a -> IO a
forall (m :: * -> *) a. Monad m => a -> m a
return Ref
result''
    BranchEnumerator -> IO ()
forall a. ManagedPtrNewtype a => a -> IO ()
touchManagedPtr BranchEnumerator
enumerator
    Maybe Ref -> IO (Maybe Ref)
forall a. a -> IO a
forall (m :: * -> *) a. Monad m => a -> m a
return Maybe Ref
maybeResult

#if defined(ENABLE_OVERLOADING)
data BranchEnumeratorGetMethodInfo
instance (signature ~ (m (Maybe Ggit.Ref.Ref)), MonadIO m) => O.OverloadedMethod BranchEnumeratorGetMethodInfo BranchEnumerator signature where
    overloadedMethod = branchEnumeratorGet

instance O.OverloadedMethodInfo BranchEnumeratorGetMethodInfo BranchEnumerator where
    overloadedMethodInfo = P.Just (O.ResolvedSymbolInfo {
        O.resolvedSymbolName = "GI.Ggit.Structs.BranchEnumerator.branchEnumeratorGet",
        O.resolvedSymbolURL = "https://hackage.haskell.org/package/gi-ggit-1.0.14/docs/GI-Ggit-Structs-BranchEnumerator.html#v:branchEnumeratorGet"
        })


#endif

-- method BranchEnumerator::iterator
-- method type : OrdinaryMethod
-- Args: [ Arg
--           { argCName = "enumerator"
--           , argType =
--               TInterface Name { namespace = "Ggit" , name = "BranchEnumerator" }
--           , direction = DirectionIn
--           , mayBeNull = False
--           , argDoc =
--               Documentation
--                 { rawDocText = Just "a #GgitBranchEnumerator."
--                 , sinceVersion = Nothing
--                 }
--           , argScope = ScopeTypeInvalid
--           , argClosure = -1
--           , argDestroy = -1
--           , argCallerAllocates = False
--           , transfer = TransferNothing
--           }
--       ]
-- Lengths: []
-- returnType: Just
--               (TInterface
--                  Name { namespace = "Ggit" , name = "BranchEnumerator" })
-- throws : False
-- Skip return : False

foreign import ccall "ggit_branch_enumerator_iterator" ggit_branch_enumerator_iterator :: 
    Ptr BranchEnumerator ->                 -- enumerator : TInterface (Name {namespace = "Ggit", name = "BranchEnumerator"})
    IO (Ptr BranchEnumerator)

-- | Get an iterator for the enumerator.
branchEnumeratorIterator ::
    (B.CallStack.HasCallStack, MonadIO m) =>
    BranchEnumerator
    -- ^ /@enumerator@/: a t'GI.Ggit.Structs.BranchEnumerator.BranchEnumerator'.
    -> m (Maybe BranchEnumerator)
    -- ^ __Returns:__ a t'GI.Ggit.Structs.BranchEnumerator.BranchEnumerator' or 'P.Nothing'.
branchEnumeratorIterator :: forall (m :: * -> *).
(HasCallStack, MonadIO m) =>
BranchEnumerator -> m (Maybe BranchEnumerator)
branchEnumeratorIterator BranchEnumerator
enumerator = IO (Maybe BranchEnumerator) -> m (Maybe BranchEnumerator)
forall a. IO a -> m a
forall (m :: * -> *) a. MonadIO m => IO a -> m a
liftIO (IO (Maybe BranchEnumerator) -> m (Maybe BranchEnumerator))
-> IO (Maybe BranchEnumerator) -> m (Maybe BranchEnumerator)
forall a b. (a -> b) -> a -> b
$ do
    Ptr BranchEnumerator
enumerator' <- BranchEnumerator -> IO (Ptr BranchEnumerator)
forall a. (HasCallStack, ManagedPtrNewtype a) => a -> IO (Ptr a)
unsafeManagedPtrGetPtr BranchEnumerator
enumerator
    Ptr BranchEnumerator
result <- Ptr BranchEnumerator -> IO (Ptr BranchEnumerator)
ggit_branch_enumerator_iterator Ptr BranchEnumerator
enumerator'
    Maybe BranchEnumerator
maybeResult <- Ptr BranchEnumerator
-> (Ptr BranchEnumerator -> IO BranchEnumerator)
-> IO (Maybe BranchEnumerator)
forall a b. Ptr a -> (Ptr a -> IO b) -> IO (Maybe b)
convertIfNonNull Ptr BranchEnumerator
result ((Ptr BranchEnumerator -> IO BranchEnumerator)
 -> IO (Maybe BranchEnumerator))
-> (Ptr BranchEnumerator -> IO BranchEnumerator)
-> IO (Maybe BranchEnumerator)
forall a b. (a -> b) -> a -> b
$ \Ptr BranchEnumerator
result' -> do
        BranchEnumerator
result'' <- ((ManagedPtr BranchEnumerator -> BranchEnumerator)
-> Ptr BranchEnumerator -> IO BranchEnumerator
forall a.
(HasCallStack, GBoxed a) =>
(ManagedPtr a -> a) -> Ptr a -> IO a
newBoxed ManagedPtr BranchEnumerator -> BranchEnumerator
BranchEnumerator) Ptr BranchEnumerator
result'
        BranchEnumerator -> IO BranchEnumerator
forall a. a -> IO a
forall (m :: * -> *) a. Monad m => a -> m a
return BranchEnumerator
result''
    BranchEnumerator -> IO ()
forall a. ManagedPtrNewtype a => a -> IO ()
touchManagedPtr BranchEnumerator
enumerator
    Maybe BranchEnumerator -> IO (Maybe BranchEnumerator)
forall a. a -> IO a
forall (m :: * -> *) a. Monad m => a -> m a
return Maybe BranchEnumerator
maybeResult

#if defined(ENABLE_OVERLOADING)
data BranchEnumeratorIteratorMethodInfo
instance (signature ~ (m (Maybe BranchEnumerator)), MonadIO m) => O.OverloadedMethod BranchEnumeratorIteratorMethodInfo BranchEnumerator signature where
    overloadedMethod = branchEnumeratorIterator

instance O.OverloadedMethodInfo BranchEnumeratorIteratorMethodInfo BranchEnumerator where
    overloadedMethodInfo = P.Just (O.ResolvedSymbolInfo {
        O.resolvedSymbolName = "GI.Ggit.Structs.BranchEnumerator.branchEnumeratorIterator",
        O.resolvedSymbolURL = "https://hackage.haskell.org/package/gi-ggit-1.0.14/docs/GI-Ggit-Structs-BranchEnumerator.html#v:branchEnumeratorIterator"
        })


#endif

-- method BranchEnumerator::next
-- method type : OrdinaryMethod
-- Args: [ Arg
--           { argCName = "enumerator"
--           , argType =
--               TInterface Name { namespace = "Ggit" , name = "BranchEnumerator" }
--           , direction = DirectionIn
--           , mayBeNull = False
--           , argDoc =
--               Documentation
--                 { rawDocText = Just "a #GgitBranchEnumerator."
--                 , sinceVersion = Nothing
--                 }
--           , argScope = ScopeTypeInvalid
--           , argClosure = -1
--           , argDestroy = -1
--           , argCallerAllocates = False
--           , transfer = TransferNothing
--           }
--       ]
-- Lengths: []
-- returnType: Just (TBasicType TBoolean)
-- throws : False
-- Skip return : False

foreign import ccall "ggit_branch_enumerator_next" ggit_branch_enumerator_next :: 
    Ptr BranchEnumerator ->                 -- enumerator : TInterface (Name {namespace = "Ggit", name = "BranchEnumerator"})
    IO CInt

-- | Move the enumerator to the next branch.
branchEnumeratorNext ::
    (B.CallStack.HasCallStack, MonadIO m) =>
    BranchEnumerator
    -- ^ /@enumerator@/: a t'GI.Ggit.Structs.BranchEnumerator.BranchEnumerator'.
    -> m Bool
    -- ^ __Returns:__ 'P.True' if there is a next branch, 'P.False' otherwise.
branchEnumeratorNext :: forall (m :: * -> *).
(HasCallStack, MonadIO m) =>
BranchEnumerator -> m Bool
branchEnumeratorNext BranchEnumerator
enumerator = IO Bool -> m Bool
forall a. IO a -> m a
forall (m :: * -> *) a. MonadIO m => IO a -> m a
liftIO (IO Bool -> m Bool) -> IO Bool -> m Bool
forall a b. (a -> b) -> a -> b
$ do
    Ptr BranchEnumerator
enumerator' <- BranchEnumerator -> IO (Ptr BranchEnumerator)
forall a. (HasCallStack, ManagedPtrNewtype a) => a -> IO (Ptr a)
unsafeManagedPtrGetPtr BranchEnumerator
enumerator
    CInt
result <- Ptr BranchEnumerator -> IO CInt
ggit_branch_enumerator_next Ptr BranchEnumerator
enumerator'
    let result' :: Bool
result' = (CInt -> CInt -> Bool
forall a. Eq a => a -> a -> Bool
/= CInt
0) CInt
result
    BranchEnumerator -> IO ()
forall a. ManagedPtrNewtype a => a -> IO ()
touchManagedPtr BranchEnumerator
enumerator
    Bool -> IO Bool
forall a. a -> IO a
forall (m :: * -> *) a. Monad m => a -> m a
return Bool
result'

#if defined(ENABLE_OVERLOADING)
data BranchEnumeratorNextMethodInfo
instance (signature ~ (m Bool), MonadIO m) => O.OverloadedMethod BranchEnumeratorNextMethodInfo BranchEnumerator signature where
    overloadedMethod = branchEnumeratorNext

instance O.OverloadedMethodInfo BranchEnumeratorNextMethodInfo BranchEnumerator where
    overloadedMethodInfo = P.Just (O.ResolvedSymbolInfo {
        O.resolvedSymbolName = "GI.Ggit.Structs.BranchEnumerator.branchEnumeratorNext",
        O.resolvedSymbolURL = "https://hackage.haskell.org/package/gi-ggit-1.0.14/docs/GI-Ggit-Structs-BranchEnumerator.html#v:branchEnumeratorNext"
        })


#endif

-- method BranchEnumerator::ref
-- method type : OrdinaryMethod
-- Args: [ Arg
--           { argCName = "enumerator"
--           , argType =
--               TInterface Name { namespace = "Ggit" , name = "BranchEnumerator" }
--           , direction = DirectionIn
--           , mayBeNull = False
--           , argDoc =
--               Documentation
--                 { rawDocText = Just "a #GgitBranchEnumerator."
--                 , sinceVersion = Nothing
--                 }
--           , argScope = ScopeTypeInvalid
--           , argClosure = -1
--           , argDestroy = -1
--           , argCallerAllocates = False
--           , transfer = TransferNothing
--           }
--       ]
-- Lengths: []
-- returnType: Just
--               (TInterface
--                  Name { namespace = "Ggit" , name = "BranchEnumerator" })
-- throws : False
-- Skip return : False

foreign import ccall "ggit_branch_enumerator_ref" ggit_branch_enumerator_ref :: 
    Ptr BranchEnumerator ->                 -- enumerator : TInterface (Name {namespace = "Ggit", name = "BranchEnumerator"})
    IO (Ptr BranchEnumerator)

-- | /No description available in the introspection data./
branchEnumeratorRef ::
    (B.CallStack.HasCallStack, MonadIO m) =>
    BranchEnumerator
    -- ^ /@enumerator@/: a t'GI.Ggit.Structs.BranchEnumerator.BranchEnumerator'.
    -> m (Maybe BranchEnumerator)
    -- ^ __Returns:__ /@enumerator@/ or 'P.Nothing'
branchEnumeratorRef :: forall (m :: * -> *).
(HasCallStack, MonadIO m) =>
BranchEnumerator -> m (Maybe BranchEnumerator)
branchEnumeratorRef BranchEnumerator
enumerator = IO (Maybe BranchEnumerator) -> m (Maybe BranchEnumerator)
forall a. IO a -> m a
forall (m :: * -> *) a. MonadIO m => IO a -> m a
liftIO (IO (Maybe BranchEnumerator) -> m (Maybe BranchEnumerator))
-> IO (Maybe BranchEnumerator) -> m (Maybe BranchEnumerator)
forall a b. (a -> b) -> a -> b
$ do
    Ptr BranchEnumerator
enumerator' <- BranchEnumerator -> IO (Ptr BranchEnumerator)
forall a. (HasCallStack, ManagedPtrNewtype a) => a -> IO (Ptr a)
unsafeManagedPtrGetPtr BranchEnumerator
enumerator
    Ptr BranchEnumerator
result <- Ptr BranchEnumerator -> IO (Ptr BranchEnumerator)
ggit_branch_enumerator_ref Ptr BranchEnumerator
enumerator'
    Maybe BranchEnumerator
maybeResult <- Ptr BranchEnumerator
-> (Ptr BranchEnumerator -> IO BranchEnumerator)
-> IO (Maybe BranchEnumerator)
forall a b. Ptr a -> (Ptr a -> IO b) -> IO (Maybe b)
convertIfNonNull Ptr BranchEnumerator
result ((Ptr BranchEnumerator -> IO BranchEnumerator)
 -> IO (Maybe BranchEnumerator))
-> (Ptr BranchEnumerator -> IO BranchEnumerator)
-> IO (Maybe BranchEnumerator)
forall a b. (a -> b) -> a -> b
$ \Ptr BranchEnumerator
result' -> do
        BranchEnumerator
result'' <- ((ManagedPtr BranchEnumerator -> BranchEnumerator)
-> Ptr BranchEnumerator -> IO BranchEnumerator
forall a.
(HasCallStack, GBoxed a) =>
(ManagedPtr a -> a) -> Ptr a -> IO a
wrapBoxed ManagedPtr BranchEnumerator -> BranchEnumerator
BranchEnumerator) Ptr BranchEnumerator
result'
        BranchEnumerator -> IO BranchEnumerator
forall a. a -> IO a
forall (m :: * -> *) a. Monad m => a -> m a
return BranchEnumerator
result''
    BranchEnumerator -> IO ()
forall a. ManagedPtrNewtype a => a -> IO ()
touchManagedPtr BranchEnumerator
enumerator
    Maybe BranchEnumerator -> IO (Maybe BranchEnumerator)
forall a. a -> IO a
forall (m :: * -> *) a. Monad m => a -> m a
return Maybe BranchEnumerator
maybeResult

#if defined(ENABLE_OVERLOADING)
data BranchEnumeratorRefMethodInfo
instance (signature ~ (m (Maybe BranchEnumerator)), MonadIO m) => O.OverloadedMethod BranchEnumeratorRefMethodInfo BranchEnumerator signature where
    overloadedMethod = branchEnumeratorRef

instance O.OverloadedMethodInfo BranchEnumeratorRefMethodInfo BranchEnumerator where
    overloadedMethodInfo = P.Just (O.ResolvedSymbolInfo {
        O.resolvedSymbolName = "GI.Ggit.Structs.BranchEnumerator.branchEnumeratorRef",
        O.resolvedSymbolURL = "https://hackage.haskell.org/package/gi-ggit-1.0.14/docs/GI-Ggit-Structs-BranchEnumerator.html#v:branchEnumeratorRef"
        })


#endif

-- method BranchEnumerator::unref
-- method type : OrdinaryMethod
-- Args: [ Arg
--           { argCName = "enumerator"
--           , argType =
--               TInterface Name { namespace = "Ggit" , name = "BranchEnumerator" }
--           , direction = DirectionIn
--           , mayBeNull = False
--           , argDoc =
--               Documentation
--                 { rawDocText = Just "a #GgitBranchEnumerator."
--                 , sinceVersion = Nothing
--                 }
--           , argScope = ScopeTypeInvalid
--           , argClosure = -1
--           , argDestroy = -1
--           , argCallerAllocates = False
--           , transfer = TransferNothing
--           }
--       ]
-- Lengths: []
-- returnType: Nothing
-- throws : False
-- Skip return : False

foreign import ccall "ggit_branch_enumerator_unref" ggit_branch_enumerator_unref :: 
    Ptr BranchEnumerator ->                 -- enumerator : TInterface (Name {namespace = "Ggit", name = "BranchEnumerator"})
    IO ()

-- | /No description available in the introspection data./
branchEnumeratorUnref ::
    (B.CallStack.HasCallStack, MonadIO m) =>
    BranchEnumerator
    -- ^ /@enumerator@/: a t'GI.Ggit.Structs.BranchEnumerator.BranchEnumerator'.
    -> m ()
branchEnumeratorUnref :: forall (m :: * -> *).
(HasCallStack, MonadIO m) =>
BranchEnumerator -> m ()
branchEnumeratorUnref BranchEnumerator
enumerator = IO () -> m ()
forall a. IO a -> m a
forall (m :: * -> *) a. MonadIO m => IO a -> m a
liftIO (IO () -> m ()) -> IO () -> m ()
forall a b. (a -> b) -> a -> b
$ do
    Ptr BranchEnumerator
enumerator' <- BranchEnumerator -> IO (Ptr BranchEnumerator)
forall a. (HasCallStack, ManagedPtrNewtype a) => a -> IO (Ptr a)
unsafeManagedPtrGetPtr BranchEnumerator
enumerator
    Ptr BranchEnumerator -> IO ()
ggit_branch_enumerator_unref Ptr BranchEnumerator
enumerator'
    BranchEnumerator -> IO ()
forall a. ManagedPtrNewtype a => a -> IO ()
touchManagedPtr BranchEnumerator
enumerator
    () -> IO ()
forall a. a -> IO a
forall (m :: * -> *) a. Monad m => a -> m a
return ()

#if defined(ENABLE_OVERLOADING)
data BranchEnumeratorUnrefMethodInfo
instance (signature ~ (m ()), MonadIO m) => O.OverloadedMethod BranchEnumeratorUnrefMethodInfo BranchEnumerator signature where
    overloadedMethod = branchEnumeratorUnref

instance O.OverloadedMethodInfo BranchEnumeratorUnrefMethodInfo BranchEnumerator where
    overloadedMethodInfo = P.Just (O.ResolvedSymbolInfo {
        O.resolvedSymbolName = "GI.Ggit.Structs.BranchEnumerator.branchEnumeratorUnref",
        O.resolvedSymbolURL = "https://hackage.haskell.org/package/gi-ggit-1.0.14/docs/GI-Ggit-Structs-BranchEnumerator.html#v:branchEnumeratorUnref"
        })


#endif

#if defined(ENABLE_OVERLOADING)
type family ResolveBranchEnumeratorMethod (t :: Symbol) (o :: DK.Type) :: DK.Type where
    ResolveBranchEnumeratorMethod "get" o = BranchEnumeratorGetMethodInfo
    ResolveBranchEnumeratorMethod "iterator" o = BranchEnumeratorIteratorMethodInfo
    ResolveBranchEnumeratorMethod "next" o = BranchEnumeratorNextMethodInfo
    ResolveBranchEnumeratorMethod "ref" o = BranchEnumeratorRefMethodInfo
    ResolveBranchEnumeratorMethod "unref" o = BranchEnumeratorUnrefMethodInfo
    ResolveBranchEnumeratorMethod l o = O.MethodResolutionFailed l o

instance (info ~ ResolveBranchEnumeratorMethod t BranchEnumerator, O.OverloadedMethod info BranchEnumerator p) => OL.IsLabel t (BranchEnumerator -> p) where
#if MIN_VERSION_base(4,10,0)
    fromLabel = O.overloadedMethod @info
#else
    fromLabel _ = O.overloadedMethod @info
#endif

#if MIN_VERSION_base(4,13,0)
instance (info ~ ResolveBranchEnumeratorMethod t BranchEnumerator, O.OverloadedMethod info BranchEnumerator p, R.HasField t BranchEnumerator p) => R.HasField t BranchEnumerator p where
    getField = O.overloadedMethod @info

#endif

instance (info ~ ResolveBranchEnumeratorMethod t BranchEnumerator, O.OverloadedMethodInfo info BranchEnumerator) => OL.IsLabel t (O.MethodProxy info BranchEnumerator) where
#if MIN_VERSION_base(4,10,0)
    fromLabel = O.MethodProxy
#else
    fromLabel _ = O.MethodProxy
#endif

#endif