{-# LANGUAGE TypeApplications #-}
#if (MIN_VERSION_haskell_gi_overloading(1,0,0) && !defined(__HADDOCK_VERSION__))
#define ENABLE_OVERLOADING
#endif
module GI.NM.Objects.SettingTeam
(
SettingTeam(..) ,
IsSettingTeam ,
toSettingTeam ,
#if defined(ENABLE_OVERLOADING)
ResolveSettingTeamMethod ,
#endif
#if defined(ENABLE_OVERLOADING)
SettingTeamAddLinkWatcherMethodInfo ,
#endif
settingTeamAddLinkWatcher ,
#if defined(ENABLE_OVERLOADING)
SettingTeamAddRunnerTxHashMethodInfo ,
#endif
settingTeamAddRunnerTxHash ,
#if defined(ENABLE_OVERLOADING)
SettingTeamClearLinkWatchersMethodInfo ,
#endif
settingTeamClearLinkWatchers ,
#if defined(ENABLE_OVERLOADING)
SettingTeamGetConfigMethodInfo ,
#endif
settingTeamGetConfig ,
#if defined(ENABLE_OVERLOADING)
SettingTeamGetLinkWatcherMethodInfo ,
#endif
settingTeamGetLinkWatcher ,
#if defined(ENABLE_OVERLOADING)
SettingTeamGetMcastRejoinCountMethodInfo,
#endif
settingTeamGetMcastRejoinCount ,
#if defined(ENABLE_OVERLOADING)
SettingTeamGetMcastRejoinIntervalMethodInfo,
#endif
settingTeamGetMcastRejoinInterval ,
#if defined(ENABLE_OVERLOADING)
SettingTeamGetNotifyPeersCountMethodInfo,
#endif
settingTeamGetNotifyPeersCount ,
#if defined(ENABLE_OVERLOADING)
SettingTeamGetNotifyPeersIntervalMethodInfo,
#endif
settingTeamGetNotifyPeersInterval ,
#if defined(ENABLE_OVERLOADING)
SettingTeamGetNumLinkWatchersMethodInfo ,
#endif
settingTeamGetNumLinkWatchers ,
#if defined(ENABLE_OVERLOADING)
SettingTeamGetNumRunnerTxHashMethodInfo ,
#endif
settingTeamGetNumRunnerTxHash ,
#if defined(ENABLE_OVERLOADING)
SettingTeamGetRunnerMethodInfo ,
#endif
settingTeamGetRunner ,
#if defined(ENABLE_OVERLOADING)
SettingTeamGetRunnerActiveMethodInfo ,
#endif
settingTeamGetRunnerActive ,
#if defined(ENABLE_OVERLOADING)
SettingTeamGetRunnerAggSelectPolicyMethodInfo,
#endif
settingTeamGetRunnerAggSelectPolicy ,
#if defined(ENABLE_OVERLOADING)
SettingTeamGetRunnerFastRateMethodInfo ,
#endif
settingTeamGetRunnerFastRate ,
#if defined(ENABLE_OVERLOADING)
SettingTeamGetRunnerHwaddrPolicyMethodInfo,
#endif
settingTeamGetRunnerHwaddrPolicy ,
#if defined(ENABLE_OVERLOADING)
SettingTeamGetRunnerMinPortsMethodInfo ,
#endif
settingTeamGetRunnerMinPorts ,
#if defined(ENABLE_OVERLOADING)
SettingTeamGetRunnerSysPrioMethodInfo ,
#endif
settingTeamGetRunnerSysPrio ,
#if defined(ENABLE_OVERLOADING)
SettingTeamGetRunnerTxBalancerMethodInfo,
#endif
settingTeamGetRunnerTxBalancer ,
#if defined(ENABLE_OVERLOADING)
SettingTeamGetRunnerTxBalancerIntervalMethodInfo,
#endif
settingTeamGetRunnerTxBalancerInterval ,
#if defined(ENABLE_OVERLOADING)
SettingTeamGetRunnerTxHashMethodInfo ,
#endif
settingTeamGetRunnerTxHash ,
settingTeamNew ,
#if defined(ENABLE_OVERLOADING)
SettingTeamRemoveLinkWatcherMethodInfo ,
#endif
settingTeamRemoveLinkWatcher ,
#if defined(ENABLE_OVERLOADING)
SettingTeamRemoveLinkWatcherByValueMethodInfo,
#endif
settingTeamRemoveLinkWatcherByValue ,
#if defined(ENABLE_OVERLOADING)
SettingTeamRemoveRunnerTxHashMethodInfo ,
#endif
settingTeamRemoveRunnerTxHash ,
#if defined(ENABLE_OVERLOADING)
SettingTeamRemoveRunnerTxHashByValueMethodInfo,
#endif
settingTeamRemoveRunnerTxHashByValue ,
#if defined(ENABLE_OVERLOADING)
SettingTeamConfigPropertyInfo ,
#endif
clearSettingTeamConfig ,
constructSettingTeamConfig ,
getSettingTeamConfig ,
setSettingTeamConfig ,
#if defined(ENABLE_OVERLOADING)
settingTeamConfig ,
#endif
#if defined(ENABLE_OVERLOADING)
SettingTeamLinkWatchersPropertyInfo ,
#endif
#if defined(ENABLE_OVERLOADING)
settingTeamLinkWatchers ,
#endif
#if defined(ENABLE_OVERLOADING)
SettingTeamMcastRejoinCountPropertyInfo ,
#endif
constructSettingTeamMcastRejoinCount ,
getSettingTeamMcastRejoinCount ,
setSettingTeamMcastRejoinCount ,
#if defined(ENABLE_OVERLOADING)
settingTeamMcastRejoinCount ,
#endif
#if defined(ENABLE_OVERLOADING)
SettingTeamMcastRejoinIntervalPropertyInfo,
#endif
constructSettingTeamMcastRejoinInterval ,
getSettingTeamMcastRejoinInterval ,
setSettingTeamMcastRejoinInterval ,
#if defined(ENABLE_OVERLOADING)
settingTeamMcastRejoinInterval ,
#endif
#if defined(ENABLE_OVERLOADING)
SettingTeamNotifyPeersCountPropertyInfo ,
#endif
constructSettingTeamNotifyPeersCount ,
getSettingTeamNotifyPeersCount ,
setSettingTeamNotifyPeersCount ,
#if defined(ENABLE_OVERLOADING)
settingTeamNotifyPeersCount ,
#endif
#if defined(ENABLE_OVERLOADING)
SettingTeamNotifyPeersIntervalPropertyInfo,
#endif
constructSettingTeamNotifyPeersInterval ,
getSettingTeamNotifyPeersInterval ,
setSettingTeamNotifyPeersInterval ,
#if defined(ENABLE_OVERLOADING)
settingTeamNotifyPeersInterval ,
#endif
#if defined(ENABLE_OVERLOADING)
SettingTeamRunnerPropertyInfo ,
#endif
clearSettingTeamRunner ,
constructSettingTeamRunner ,
getSettingTeamRunner ,
setSettingTeamRunner ,
#if defined(ENABLE_OVERLOADING)
settingTeamRunner ,
#endif
#if defined(ENABLE_OVERLOADING)
SettingTeamRunnerActivePropertyInfo ,
#endif
constructSettingTeamRunnerActive ,
getSettingTeamRunnerActive ,
setSettingTeamRunnerActive ,
#if defined(ENABLE_OVERLOADING)
settingTeamRunnerActive ,
#endif
#if defined(ENABLE_OVERLOADING)
SettingTeamRunnerAggSelectPolicyPropertyInfo,
#endif
clearSettingTeamRunnerAggSelectPolicy ,
constructSettingTeamRunnerAggSelectPolicy,
getSettingTeamRunnerAggSelectPolicy ,
setSettingTeamRunnerAggSelectPolicy ,
#if defined(ENABLE_OVERLOADING)
settingTeamRunnerAggSelectPolicy ,
#endif
#if defined(ENABLE_OVERLOADING)
SettingTeamRunnerFastRatePropertyInfo ,
#endif
constructSettingTeamRunnerFastRate ,
getSettingTeamRunnerFastRate ,
setSettingTeamRunnerFastRate ,
#if defined(ENABLE_OVERLOADING)
settingTeamRunnerFastRate ,
#endif
#if defined(ENABLE_OVERLOADING)
SettingTeamRunnerHwaddrPolicyPropertyInfo,
#endif
clearSettingTeamRunnerHwaddrPolicy ,
constructSettingTeamRunnerHwaddrPolicy ,
getSettingTeamRunnerHwaddrPolicy ,
setSettingTeamRunnerHwaddrPolicy ,
#if defined(ENABLE_OVERLOADING)
settingTeamRunnerHwaddrPolicy ,
#endif
#if defined(ENABLE_OVERLOADING)
SettingTeamRunnerMinPortsPropertyInfo ,
#endif
constructSettingTeamRunnerMinPorts ,
getSettingTeamRunnerMinPorts ,
setSettingTeamRunnerMinPorts ,
#if defined(ENABLE_OVERLOADING)
settingTeamRunnerMinPorts ,
#endif
#if defined(ENABLE_OVERLOADING)
SettingTeamRunnerSysPrioPropertyInfo ,
#endif
constructSettingTeamRunnerSysPrio ,
getSettingTeamRunnerSysPrio ,
setSettingTeamRunnerSysPrio ,
#if defined(ENABLE_OVERLOADING)
settingTeamRunnerSysPrio ,
#endif
#if defined(ENABLE_OVERLOADING)
SettingTeamRunnerTxBalancerPropertyInfo ,
#endif
clearSettingTeamRunnerTxBalancer ,
constructSettingTeamRunnerTxBalancer ,
getSettingTeamRunnerTxBalancer ,
setSettingTeamRunnerTxBalancer ,
#if defined(ENABLE_OVERLOADING)
settingTeamRunnerTxBalancer ,
#endif
#if defined(ENABLE_OVERLOADING)
SettingTeamRunnerTxBalancerIntervalPropertyInfo,
#endif
constructSettingTeamRunnerTxBalancerInterval,
getSettingTeamRunnerTxBalancerInterval ,
setSettingTeamRunnerTxBalancerInterval ,
#if defined(ENABLE_OVERLOADING)
settingTeamRunnerTxBalancerInterval ,
#endif
#if defined(ENABLE_OVERLOADING)
SettingTeamRunnerTxHashPropertyInfo ,
#endif
clearSettingTeamRunnerTxHash ,
constructSettingTeamRunnerTxHash ,
getSettingTeamRunnerTxHash ,
setSettingTeamRunnerTxHash ,
#if defined(ENABLE_OVERLOADING)
settingTeamRunnerTxHash ,
#endif
) 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 qualified Data.Word as DW
import qualified Data.Int as DI
import qualified System.Posix.Types as SPT
import qualified Foreign.C.Types as FCT
#if MIN_VERSION_base(4,18,0)
import qualified GI.GLib.Structs.Bytes as GLib.Bytes
import qualified GI.GLib.Structs.VariantType as GLib.VariantType
import qualified GI.GObject.Objects.Object as GObject.Object
import qualified GI.NM.Callbacks as NM.Callbacks
import {-# SOURCE #-} qualified GI.NM.Enums as NM.Enums
import {-# SOURCE #-} qualified GI.NM.Flags as NM.Flags
import {-# SOURCE #-} qualified GI.NM.Interfaces.Connection as NM.Connection
import {-# SOURCE #-} qualified GI.NM.Objects.Setting as NM.Setting
import {-# SOURCE #-} qualified GI.NM.Objects.Setting8021x as NM.Setting8021x
import {-# SOURCE #-} qualified GI.NM.Objects.SettingAdsl as NM.SettingAdsl
import {-# SOURCE #-} qualified GI.NM.Objects.SettingBluetooth as NM.SettingBluetooth
import {-# SOURCE #-} qualified GI.NM.Objects.SettingBond as NM.SettingBond
import {-# SOURCE #-} qualified GI.NM.Objects.SettingBridge as NM.SettingBridge
import {-# SOURCE #-} qualified GI.NM.Objects.SettingBridgePort as NM.SettingBridgePort
import {-# SOURCE #-} qualified GI.NM.Objects.SettingCdma as NM.SettingCdma
import {-# SOURCE #-} qualified GI.NM.Objects.SettingConnection as NM.SettingConnection
import {-# SOURCE #-} qualified GI.NM.Objects.SettingDcb as NM.SettingDcb
import {-# SOURCE #-} qualified GI.NM.Objects.SettingDummy as NM.SettingDummy
import {-# SOURCE #-} qualified GI.NM.Objects.SettingGeneric as NM.SettingGeneric
import {-# SOURCE #-} qualified GI.NM.Objects.SettingGsm as NM.SettingGsm
import {-# SOURCE #-} qualified GI.NM.Objects.SettingIP4Config as NM.SettingIP4Config
import {-# SOURCE #-} qualified GI.NM.Objects.SettingIP6Config as NM.SettingIP6Config
import {-# SOURCE #-} qualified GI.NM.Objects.SettingIPConfig as NM.SettingIPConfig
import {-# SOURCE #-} qualified GI.NM.Objects.SettingIPTunnel as NM.SettingIPTunnel
import {-# SOURCE #-} qualified GI.NM.Objects.SettingInfiniband as NM.SettingInfiniband
import {-# SOURCE #-} qualified GI.NM.Objects.SettingMacsec as NM.SettingMacsec
import {-# SOURCE #-} qualified GI.NM.Objects.SettingMacvlan as NM.SettingMacvlan
import {-# SOURCE #-} qualified GI.NM.Objects.SettingOlpcMesh as NM.SettingOlpcMesh
import {-# SOURCE #-} qualified GI.NM.Objects.SettingOvsBridge as NM.SettingOvsBridge
import {-# SOURCE #-} qualified GI.NM.Objects.SettingOvsInterface as NM.SettingOvsInterface
import {-# SOURCE #-} qualified GI.NM.Objects.SettingOvsPatch as NM.SettingOvsPatch
import {-# SOURCE #-} qualified GI.NM.Objects.SettingOvsPort as NM.SettingOvsPort
import {-# SOURCE #-} qualified GI.NM.Objects.SettingPpp as NM.SettingPpp
import {-# SOURCE #-} qualified GI.NM.Objects.SettingPppoe as NM.SettingPppoe
import {-# SOURCE #-} qualified GI.NM.Objects.SettingProxy as NM.SettingProxy
import {-# SOURCE #-} qualified GI.NM.Objects.SettingSerial as NM.SettingSerial
import {-# SOURCE #-} qualified GI.NM.Objects.SettingTCConfig as NM.SettingTCConfig
import {-# SOURCE #-} qualified GI.NM.Objects.SettingTeamPort as NM.SettingTeamPort
import {-# SOURCE #-} qualified GI.NM.Objects.SettingTun as NM.SettingTun
import {-# SOURCE #-} qualified GI.NM.Objects.SettingVlan as NM.SettingVlan
import {-# SOURCE #-} qualified GI.NM.Objects.SettingVpn as NM.SettingVpn
import {-# SOURCE #-} qualified GI.NM.Objects.SettingVxlan as NM.SettingVxlan
import {-# SOURCE #-} qualified GI.NM.Objects.SettingWimax as NM.SettingWimax
import {-# SOURCE #-} qualified GI.NM.Objects.SettingWired as NM.SettingWired
import {-# SOURCE #-} qualified GI.NM.Objects.SettingWireless as NM.SettingWireless
import {-# SOURCE #-} qualified GI.NM.Objects.SettingWirelessSecurity as NM.SettingWirelessSecurity
import {-# SOURCE #-} qualified GI.NM.Structs.BridgeVlan as NM.BridgeVlan
import {-# SOURCE #-} qualified GI.NM.Structs.IPAddress as NM.IPAddress
import {-# SOURCE #-} qualified GI.NM.Structs.IPRoute as NM.IPRoute
import {-# SOURCE #-} qualified GI.NM.Structs.IPRoutingRule as NM.IPRoutingRule
import {-# SOURCE #-} qualified GI.NM.Structs.Range as NM.Range
import {-# SOURCE #-} qualified GI.NM.Structs.TCAction as NM.TCAction
import {-# SOURCE #-} qualified GI.NM.Structs.TCQdisc as NM.TCQdisc
import {-# SOURCE #-} qualified GI.NM.Structs.TCTfilter as NM.TCTfilter
import {-# SOURCE #-} qualified GI.NM.Structs.TeamLinkWatcher as NM.TeamLinkWatcher
import {-# SOURCE #-} qualified GI.NM.Structs.VariantAttributeSpec as NM.VariantAttributeSpec
#else
import qualified GI.GObject.Objects.Object as GObject.Object
import {-# SOURCE #-} qualified GI.NM.Objects.Setting as NM.Setting
import {-# SOURCE #-} qualified GI.NM.Structs.TeamLinkWatcher as NM.TeamLinkWatcher
#endif
newtype SettingTeam = SettingTeam (SP.ManagedPtr SettingTeam)
deriving (SettingTeam -> SettingTeam -> Bool
(SettingTeam -> SettingTeam -> Bool)
-> (SettingTeam -> SettingTeam -> Bool) -> Eq SettingTeam
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
$c== :: SettingTeam -> SettingTeam -> Bool
== :: SettingTeam -> SettingTeam -> Bool
$c/= :: SettingTeam -> SettingTeam -> Bool
/= :: SettingTeam -> SettingTeam -> Bool
Eq)
instance SP.ManagedPtrNewtype SettingTeam where
toManagedPtr :: SettingTeam -> ManagedPtr SettingTeam
toManagedPtr (SettingTeam ManagedPtr SettingTeam
p) = ManagedPtr SettingTeam
p
foreign import ccall "nm_setting_team_get_type"
c_nm_setting_team_get_type :: IO B.Types.GType
instance B.Types.TypedObject SettingTeam where
glibType :: IO GType
glibType = IO GType
c_nm_setting_team_get_type
instance B.Types.GObject SettingTeam
class (SP.GObject o, O.IsDescendantOf SettingTeam o) => IsSettingTeam o
instance (SP.GObject o, O.IsDescendantOf SettingTeam o) => IsSettingTeam o
instance O.HasParentTypes SettingTeam
type instance O.ParentTypes SettingTeam = '[NM.Setting.Setting, GObject.Object.Object]
toSettingTeam :: (MIO.MonadIO m, IsSettingTeam o) => o -> m SettingTeam
toSettingTeam :: forall (m :: * -> *) o.
(MonadIO m, IsSettingTeam o) =>
o -> m SettingTeam
toSettingTeam = IO SettingTeam -> m SettingTeam
forall a. IO a -> m a
forall (m :: * -> *) a. MonadIO m => IO a -> m a
MIO.liftIO (IO SettingTeam -> m SettingTeam)
-> (o -> IO SettingTeam) -> o -> m SettingTeam
forall b c a. (b -> c) -> (a -> b) -> a -> c
. (ManagedPtr SettingTeam -> SettingTeam) -> o -> IO SettingTeam
forall o o'.
(HasCallStack, ManagedPtrNewtype o, TypedObject o,
ManagedPtrNewtype o', TypedObject o') =>
(ManagedPtr o' -> o') -> o -> IO o'
B.ManagedPtr.unsafeCastTo ManagedPtr SettingTeam -> SettingTeam
SettingTeam
instance B.GValue.IsGValue (Maybe SettingTeam) where
gvalueGType_ :: IO GType
gvalueGType_ = IO GType
c_nm_setting_team_get_type
gvalueSet_ :: Ptr GValue -> Maybe SettingTeam -> IO ()
gvalueSet_ Ptr GValue
gv Maybe SettingTeam
P.Nothing = Ptr GValue -> Ptr SettingTeam -> IO ()
forall a. GObject a => Ptr GValue -> Ptr a -> IO ()
B.GValue.set_object Ptr GValue
gv (Ptr SettingTeam
forall a. Ptr a
FP.nullPtr :: FP.Ptr SettingTeam)
gvalueSet_ Ptr GValue
gv (P.Just SettingTeam
obj) = SettingTeam -> (Ptr SettingTeam -> IO ()) -> IO ()
forall a c.
(HasCallStack, ManagedPtrNewtype a) =>
a -> (Ptr a -> IO c) -> IO c
B.ManagedPtr.withManagedPtr SettingTeam
obj (Ptr GValue -> Ptr SettingTeam -> IO ()
forall a. GObject a => Ptr GValue -> Ptr a -> IO ()
B.GValue.set_object Ptr GValue
gv)
gvalueGet_ :: Ptr GValue -> IO (Maybe SettingTeam)
gvalueGet_ Ptr GValue
gv = do
Ptr SettingTeam
ptr <- Ptr GValue -> IO (Ptr SettingTeam)
forall a. GObject a => Ptr GValue -> IO (Ptr a)
B.GValue.get_object Ptr GValue
gv :: IO (FP.Ptr SettingTeam)
if Ptr SettingTeam
ptr Ptr SettingTeam -> Ptr SettingTeam -> Bool
forall a. Eq a => a -> a -> Bool
/= Ptr SettingTeam
forall a. Ptr a
FP.nullPtr
then SettingTeam -> Maybe SettingTeam
forall a. a -> Maybe a
P.Just (SettingTeam -> Maybe SettingTeam)
-> IO SettingTeam -> IO (Maybe SettingTeam)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
<$> (ManagedPtr SettingTeam -> SettingTeam)
-> Ptr SettingTeam -> IO SettingTeam
forall a b.
(HasCallStack, GObject a, GObject b) =>
(ManagedPtr a -> a) -> Ptr b -> IO a
B.ManagedPtr.newObject ManagedPtr SettingTeam -> SettingTeam
SettingTeam Ptr SettingTeam
ptr
else Maybe SettingTeam -> IO (Maybe SettingTeam)
forall a. a -> IO a
forall (m :: * -> *) a. Monad m => a -> m a
return Maybe SettingTeam
forall a. Maybe a
P.Nothing
#if defined(ENABLE_OVERLOADING)
type family ResolveSettingTeamMethod (t :: Symbol) (o :: DK.Type) :: DK.Type where
ResolveSettingTeamMethod "addLinkWatcher" o = SettingTeamAddLinkWatcherMethodInfo
ResolveSettingTeamMethod "addRunnerTxHash" o = SettingTeamAddRunnerTxHashMethodInfo
ResolveSettingTeamMethod "bindProperty" o = GObject.Object.ObjectBindPropertyMethodInfo
ResolveSettingTeamMethod "bindPropertyFull" o = GObject.Object.ObjectBindPropertyFullMethodInfo
ResolveSettingTeamMethod "clearLinkWatchers" o = SettingTeamClearLinkWatchersMethodInfo
ResolveSettingTeamMethod "compare" o = NM.Setting.SettingCompareMethodInfo
ResolveSettingTeamMethod "diff" o = NM.Setting.SettingDiffMethodInfo
ResolveSettingTeamMethod "duplicate" o = NM.Setting.SettingDuplicateMethodInfo
ResolveSettingTeamMethod "enumerateValues" o = NM.Setting.SettingEnumerateValuesMethodInfo
ResolveSettingTeamMethod "forceFloating" o = GObject.Object.ObjectForceFloatingMethodInfo
ResolveSettingTeamMethod "freezeNotify" o = GObject.Object.ObjectFreezeNotifyMethodInfo
ResolveSettingTeamMethod "getv" o = GObject.Object.ObjectGetvMethodInfo
ResolveSettingTeamMethod "isFloating" o = GObject.Object.ObjectIsFloatingMethodInfo
ResolveSettingTeamMethod "notify" o = GObject.Object.ObjectNotifyMethodInfo
ResolveSettingTeamMethod "notifyByPspec" o = GObject.Object.ObjectNotifyByPspecMethodInfo
ResolveSettingTeamMethod "optionClearByName" o = NM.Setting.SettingOptionClearByNameMethodInfo
ResolveSettingTeamMethod "optionGet" o = NM.Setting.SettingOptionGetMethodInfo
ResolveSettingTeamMethod "optionGetAllNames" o = NM.Setting.SettingOptionGetAllNamesMethodInfo
ResolveSettingTeamMethod "optionGetBoolean" o = NM.Setting.SettingOptionGetBooleanMethodInfo
ResolveSettingTeamMethod "optionGetUint32" o = NM.Setting.SettingOptionGetUint32MethodInfo
ResolveSettingTeamMethod "optionSet" o = NM.Setting.SettingOptionSetMethodInfo
ResolveSettingTeamMethod "optionSetBoolean" o = NM.Setting.SettingOptionSetBooleanMethodInfo
ResolveSettingTeamMethod "optionSetUint32" o = NM.Setting.SettingOptionSetUint32MethodInfo
ResolveSettingTeamMethod "ref" o = GObject.Object.ObjectRefMethodInfo
ResolveSettingTeamMethod "refSink" o = GObject.Object.ObjectRefSinkMethodInfo
ResolveSettingTeamMethod "removeLinkWatcher" o = SettingTeamRemoveLinkWatcherMethodInfo
ResolveSettingTeamMethod "removeLinkWatcherByValue" o = SettingTeamRemoveLinkWatcherByValueMethodInfo
ResolveSettingTeamMethod "removeRunnerTxHash" o = SettingTeamRemoveRunnerTxHashMethodInfo
ResolveSettingTeamMethod "removeRunnerTxHashByValue" o = SettingTeamRemoveRunnerTxHashByValueMethodInfo
ResolveSettingTeamMethod "runDispose" o = GObject.Object.ObjectRunDisposeMethodInfo
ResolveSettingTeamMethod "stealData" o = GObject.Object.ObjectStealDataMethodInfo
ResolveSettingTeamMethod "stealQdata" o = GObject.Object.ObjectStealQdataMethodInfo
ResolveSettingTeamMethod "thawNotify" o = GObject.Object.ObjectThawNotifyMethodInfo
ResolveSettingTeamMethod "toString" o = NM.Setting.SettingToStringMethodInfo
ResolveSettingTeamMethod "unref" o = GObject.Object.ObjectUnrefMethodInfo
ResolveSettingTeamMethod "verify" o = NM.Setting.SettingVerifyMethodInfo
ResolveSettingTeamMethod "verifySecrets" o = NM.Setting.SettingVerifySecretsMethodInfo
ResolveSettingTeamMethod "watchClosure" o = GObject.Object.ObjectWatchClosureMethodInfo
ResolveSettingTeamMethod "getConfig" o = SettingTeamGetConfigMethodInfo
ResolveSettingTeamMethod "getData" o = GObject.Object.ObjectGetDataMethodInfo
ResolveSettingTeamMethod "getDbusPropertyType" o = NM.Setting.SettingGetDbusPropertyTypeMethodInfo
ResolveSettingTeamMethod "getLinkWatcher" o = SettingTeamGetLinkWatcherMethodInfo
ResolveSettingTeamMethod "getMcastRejoinCount" o = SettingTeamGetMcastRejoinCountMethodInfo
ResolveSettingTeamMethod "getMcastRejoinInterval" o = SettingTeamGetMcastRejoinIntervalMethodInfo
ResolveSettingTeamMethod "getName" o = NM.Setting.SettingGetNameMethodInfo
ResolveSettingTeamMethod "getNotifyPeersCount" o = SettingTeamGetNotifyPeersCountMethodInfo
ResolveSettingTeamMethod "getNotifyPeersInterval" o = SettingTeamGetNotifyPeersIntervalMethodInfo
ResolveSettingTeamMethod "getNumLinkWatchers" o = SettingTeamGetNumLinkWatchersMethodInfo
ResolveSettingTeamMethod "getNumRunnerTxHash" o = SettingTeamGetNumRunnerTxHashMethodInfo
ResolveSettingTeamMethod "getProperty" o = GObject.Object.ObjectGetPropertyMethodInfo
ResolveSettingTeamMethod "getQdata" o = GObject.Object.ObjectGetQdataMethodInfo
ResolveSettingTeamMethod "getRunner" o = SettingTeamGetRunnerMethodInfo
ResolveSettingTeamMethod "getRunnerActive" o = SettingTeamGetRunnerActiveMethodInfo
ResolveSettingTeamMethod "getRunnerAggSelectPolicy" o = SettingTeamGetRunnerAggSelectPolicyMethodInfo
ResolveSettingTeamMethod "getRunnerFastRate" o = SettingTeamGetRunnerFastRateMethodInfo
ResolveSettingTeamMethod "getRunnerHwaddrPolicy" o = SettingTeamGetRunnerHwaddrPolicyMethodInfo
ResolveSettingTeamMethod "getRunnerMinPorts" o = SettingTeamGetRunnerMinPortsMethodInfo
ResolveSettingTeamMethod "getRunnerSysPrio" o = SettingTeamGetRunnerSysPrioMethodInfo
ResolveSettingTeamMethod "getRunnerTxBalancer" o = SettingTeamGetRunnerTxBalancerMethodInfo
ResolveSettingTeamMethod "getRunnerTxBalancerInterval" o = SettingTeamGetRunnerTxBalancerIntervalMethodInfo
ResolveSettingTeamMethod "getRunnerTxHash" o = SettingTeamGetRunnerTxHashMethodInfo
ResolveSettingTeamMethod "getSecretFlags" o = NM.Setting.SettingGetSecretFlagsMethodInfo
ResolveSettingTeamMethod "setData" o = GObject.Object.ObjectSetDataMethodInfo
ResolveSettingTeamMethod "setDataFull" o = GObject.Object.ObjectSetDataFullMethodInfo
ResolveSettingTeamMethod "setProperty" o = GObject.Object.ObjectSetPropertyMethodInfo
ResolveSettingTeamMethod "setSecretFlags" o = NM.Setting.SettingSetSecretFlagsMethodInfo
ResolveSettingTeamMethod l o = O.MethodResolutionFailed l o
instance (info ~ ResolveSettingTeamMethod t SettingTeam, O.OverloadedMethod info SettingTeam p) => OL.IsLabel t (SettingTeam -> 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 ~ ResolveSettingTeamMethod t SettingTeam, O.OverloadedMethod info SettingTeam p, R.HasField t SettingTeam p) => R.HasField t SettingTeam p where
getField = O.overloadedMethod @info
#endif
instance (info ~ ResolveSettingTeamMethod t SettingTeam, O.OverloadedMethodInfo info SettingTeam) => OL.IsLabel t (O.MethodProxy info SettingTeam) where
#if MIN_VERSION_base(4,10,0)
fromLabel = O.MethodProxy
#else
fromLabel _ = O.MethodProxy
#endif
#endif
getSettingTeamConfig :: (MonadIO m, IsSettingTeam o) => o -> m T.Text
getSettingTeamConfig :: forall (m :: * -> *) o. (MonadIO m, IsSettingTeam o) => o -> m Text
getSettingTeamConfig o
obj = IO Text -> m Text
forall a. IO a -> m a
forall (m :: * -> *) a. MonadIO m => IO a -> m a
MIO.liftIO (IO Text -> m Text) -> IO Text -> m Text
forall a b. (a -> b) -> a -> b
$ Text -> IO (Maybe Text) -> IO Text
forall a. HasCallStack => Text -> IO (Maybe a) -> IO a
checkUnexpectedNothing Text
"getSettingTeamConfig" (IO (Maybe Text) -> IO Text) -> IO (Maybe Text) -> IO Text
forall a b. (a -> b) -> a -> b
$ o -> String -> IO (Maybe Text)
forall a. GObject a => a -> String -> IO (Maybe Text)
B.Properties.getObjectPropertyString o
obj String
"config"
setSettingTeamConfig :: (MonadIO m, IsSettingTeam o) => o -> T.Text -> m ()
setSettingTeamConfig :: forall (m :: * -> *) o.
(MonadIO m, IsSettingTeam o) =>
o -> Text -> m ()
setSettingTeamConfig o
obj Text
val = IO () -> m ()
forall a. IO a -> m a
forall (m :: * -> *) a. MonadIO m => IO a -> m a
MIO.liftIO (IO () -> m ()) -> IO () -> m ()
forall a b. (a -> b) -> a -> b
$ do
o -> String -> Maybe Text -> IO ()
forall a. GObject a => a -> String -> Maybe Text -> IO ()
B.Properties.setObjectPropertyString o
obj String
"config" (Text -> Maybe Text
forall a. a -> Maybe a
Just Text
val)
constructSettingTeamConfig :: (IsSettingTeam o, MIO.MonadIO m) => T.Text -> m (GValueConstruct o)
constructSettingTeamConfig :: forall o (m :: * -> *).
(IsSettingTeam o, MonadIO m) =>
Text -> m (GValueConstruct o)
constructSettingTeamConfig Text
val = IO (GValueConstruct o) -> m (GValueConstruct o)
forall a. IO a -> m a
forall (m :: * -> *) a. MonadIO m => IO a -> m a
MIO.liftIO (IO (GValueConstruct o) -> m (GValueConstruct o))
-> IO (GValueConstruct o) -> m (GValueConstruct o)
forall a b. (a -> b) -> a -> b
$ do
IO (GValueConstruct o) -> IO (GValueConstruct o)
forall a. IO a -> IO a
forall (m :: * -> *) a. MonadIO m => IO a -> m a
MIO.liftIO (IO (GValueConstruct o) -> IO (GValueConstruct o))
-> IO (GValueConstruct o) -> IO (GValueConstruct o)
forall a b. (a -> b) -> a -> b
$ String -> Maybe Text -> IO (GValueConstruct o)
forall o. String -> Maybe Text -> IO (GValueConstruct o)
B.Properties.constructObjectPropertyString String
"config" (Text -> Maybe Text
forall a. a -> Maybe a
P.Just Text
val)
clearSettingTeamConfig :: (MonadIO m, IsSettingTeam o) => o -> m ()
clearSettingTeamConfig :: forall (m :: * -> *) o. (MonadIO m, IsSettingTeam o) => o -> m ()
clearSettingTeamConfig o
obj = 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
$ o -> String -> Maybe Text -> IO ()
forall a. GObject a => a -> String -> Maybe Text -> IO ()
B.Properties.setObjectPropertyString o
obj String
"config" (Maybe Text
forall a. Maybe a
Nothing :: Maybe T.Text)
#if defined(ENABLE_OVERLOADING)
data SettingTeamConfigPropertyInfo
instance AttrInfo SettingTeamConfigPropertyInfo where
type AttrAllowedOps SettingTeamConfigPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet, 'AttrClear]
type AttrBaseTypeConstraint SettingTeamConfigPropertyInfo = IsSettingTeam
type AttrSetTypeConstraint SettingTeamConfigPropertyInfo = (~) T.Text
type AttrTransferTypeConstraint SettingTeamConfigPropertyInfo = (~) T.Text
type AttrTransferType SettingTeamConfigPropertyInfo = T.Text
type AttrGetType SettingTeamConfigPropertyInfo = T.Text
type AttrLabel SettingTeamConfigPropertyInfo = "config"
type AttrOrigin SettingTeamConfigPropertyInfo = SettingTeam
attrGet = getSettingTeamConfig
attrSet = setSettingTeamConfig
attrTransfer _ v = do
return v
attrConstruct = constructSettingTeamConfig
attrClear = clearSettingTeamConfig
dbgAttrInfo = P.Just (O.ResolvedSymbolInfo {
O.resolvedSymbolName = "GI.NM.Objects.SettingTeam.config"
, O.resolvedSymbolURL = "https://hackage.haskell.org/package/gi-nm-1.0.1/docs/GI-NM-Objects-SettingTeam.html#g:attr:config"
})
#endif
#if defined(ENABLE_OVERLOADING)
data SettingTeamLinkWatchersPropertyInfo
instance AttrInfo SettingTeamLinkWatchersPropertyInfo where
type AttrAllowedOps SettingTeamLinkWatchersPropertyInfo = '[]
type AttrSetTypeConstraint SettingTeamLinkWatchersPropertyInfo = (~) ()
type AttrTransferTypeConstraint SettingTeamLinkWatchersPropertyInfo = (~) ()
type AttrTransferType SettingTeamLinkWatchersPropertyInfo = ()
type AttrBaseTypeConstraint SettingTeamLinkWatchersPropertyInfo = (~) ()
type AttrGetType SettingTeamLinkWatchersPropertyInfo = ()
type AttrLabel SettingTeamLinkWatchersPropertyInfo = ""
type AttrOrigin SettingTeamLinkWatchersPropertyInfo = SettingTeam
attrGet = undefined
attrSet = undefined
attrConstruct = undefined
attrClear = undefined
attrTransfer = undefined
#endif
getSettingTeamMcastRejoinCount :: (MonadIO m, IsSettingTeam o) => o -> m Int32
getSettingTeamMcastRejoinCount :: forall (m :: * -> *) o.
(MonadIO m, IsSettingTeam o) =>
o -> m Int32
getSettingTeamMcastRejoinCount o
obj = IO Int32 -> m Int32
forall a. IO a -> m a
forall (m :: * -> *) a. MonadIO m => IO a -> m a
MIO.liftIO (IO Int32 -> m Int32) -> IO Int32 -> m Int32
forall a b. (a -> b) -> a -> b
$ o -> String -> IO Int32
forall a. GObject a => a -> String -> IO Int32
B.Properties.getObjectPropertyInt32 o
obj String
"mcast-rejoin-count"
setSettingTeamMcastRejoinCount :: (MonadIO m, IsSettingTeam o) => o -> Int32 -> m ()
setSettingTeamMcastRejoinCount :: forall (m :: * -> *) o.
(MonadIO m, IsSettingTeam o) =>
o -> Int32 -> m ()
setSettingTeamMcastRejoinCount o
obj Int32
val = IO () -> m ()
forall a. IO a -> m a
forall (m :: * -> *) a. MonadIO m => IO a -> m a
MIO.liftIO (IO () -> m ()) -> IO () -> m ()
forall a b. (a -> b) -> a -> b
$ do
o -> String -> Int32 -> IO ()
forall a. GObject a => a -> String -> Int32 -> IO ()
B.Properties.setObjectPropertyInt32 o
obj String
"mcast-rejoin-count" Int32
val
constructSettingTeamMcastRejoinCount :: (IsSettingTeam o, MIO.MonadIO m) => Int32 -> m (GValueConstruct o)
constructSettingTeamMcastRejoinCount :: forall o (m :: * -> *).
(IsSettingTeam o, MonadIO m) =>
Int32 -> m (GValueConstruct o)
constructSettingTeamMcastRejoinCount Int32
val = IO (GValueConstruct o) -> m (GValueConstruct o)
forall a. IO a -> m a
forall (m :: * -> *) a. MonadIO m => IO a -> m a
MIO.liftIO (IO (GValueConstruct o) -> m (GValueConstruct o))
-> IO (GValueConstruct o) -> m (GValueConstruct o)
forall a b. (a -> b) -> a -> b
$ do
IO (GValueConstruct o) -> IO (GValueConstruct o)
forall a. IO a -> IO a
forall (m :: * -> *) a. MonadIO m => IO a -> m a
MIO.liftIO (IO (GValueConstruct o) -> IO (GValueConstruct o))
-> IO (GValueConstruct o) -> IO (GValueConstruct o)
forall a b. (a -> b) -> a -> b
$ String -> Int32 -> IO (GValueConstruct o)
forall o. String -> Int32 -> IO (GValueConstruct o)
B.Properties.constructObjectPropertyInt32 String
"mcast-rejoin-count" Int32
val
#if defined(ENABLE_OVERLOADING)
data SettingTeamMcastRejoinCountPropertyInfo
instance AttrInfo SettingTeamMcastRejoinCountPropertyInfo where
type AttrAllowedOps SettingTeamMcastRejoinCountPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]
type AttrBaseTypeConstraint SettingTeamMcastRejoinCountPropertyInfo = IsSettingTeam
type AttrSetTypeConstraint SettingTeamMcastRejoinCountPropertyInfo = (~) Int32
type AttrTransferTypeConstraint SettingTeamMcastRejoinCountPropertyInfo = (~) Int32
type AttrTransferType SettingTeamMcastRejoinCountPropertyInfo = Int32
type AttrGetType SettingTeamMcastRejoinCountPropertyInfo = Int32
type AttrLabel SettingTeamMcastRejoinCountPropertyInfo = "mcast-rejoin-count"
type AttrOrigin SettingTeamMcastRejoinCountPropertyInfo = SettingTeam
attrGet = getSettingTeamMcastRejoinCount
attrSet = setSettingTeamMcastRejoinCount
attrTransfer _ v = do
return v
attrConstruct = constructSettingTeamMcastRejoinCount
attrClear = undefined
dbgAttrInfo = P.Just (O.ResolvedSymbolInfo {
O.resolvedSymbolName = "GI.NM.Objects.SettingTeam.mcastRejoinCount"
, O.resolvedSymbolURL = "https://hackage.haskell.org/package/gi-nm-1.0.1/docs/GI-NM-Objects-SettingTeam.html#g:attr:mcastRejoinCount"
})
#endif
getSettingTeamMcastRejoinInterval :: (MonadIO m, IsSettingTeam o) => o -> m Int32
getSettingTeamMcastRejoinInterval :: forall (m :: * -> *) o.
(MonadIO m, IsSettingTeam o) =>
o -> m Int32
getSettingTeamMcastRejoinInterval o
obj = IO Int32 -> m Int32
forall a. IO a -> m a
forall (m :: * -> *) a. MonadIO m => IO a -> m a
MIO.liftIO (IO Int32 -> m Int32) -> IO Int32 -> m Int32
forall a b. (a -> b) -> a -> b
$ o -> String -> IO Int32
forall a. GObject a => a -> String -> IO Int32
B.Properties.getObjectPropertyInt32 o
obj String
"mcast-rejoin-interval"
setSettingTeamMcastRejoinInterval :: (MonadIO m, IsSettingTeam o) => o -> Int32 -> m ()
setSettingTeamMcastRejoinInterval :: forall (m :: * -> *) o.
(MonadIO m, IsSettingTeam o) =>
o -> Int32 -> m ()
setSettingTeamMcastRejoinInterval o
obj Int32
val = IO () -> m ()
forall a. IO a -> m a
forall (m :: * -> *) a. MonadIO m => IO a -> m a
MIO.liftIO (IO () -> m ()) -> IO () -> m ()
forall a b. (a -> b) -> a -> b
$ do
o -> String -> Int32 -> IO ()
forall a. GObject a => a -> String -> Int32 -> IO ()
B.Properties.setObjectPropertyInt32 o
obj String
"mcast-rejoin-interval" Int32
val
constructSettingTeamMcastRejoinInterval :: (IsSettingTeam o, MIO.MonadIO m) => Int32 -> m (GValueConstruct o)
constructSettingTeamMcastRejoinInterval :: forall o (m :: * -> *).
(IsSettingTeam o, MonadIO m) =>
Int32 -> m (GValueConstruct o)
constructSettingTeamMcastRejoinInterval Int32
val = IO (GValueConstruct o) -> m (GValueConstruct o)
forall a. IO a -> m a
forall (m :: * -> *) a. MonadIO m => IO a -> m a
MIO.liftIO (IO (GValueConstruct o) -> m (GValueConstruct o))
-> IO (GValueConstruct o) -> m (GValueConstruct o)
forall a b. (a -> b) -> a -> b
$ do
IO (GValueConstruct o) -> IO (GValueConstruct o)
forall a. IO a -> IO a
forall (m :: * -> *) a. MonadIO m => IO a -> m a
MIO.liftIO (IO (GValueConstruct o) -> IO (GValueConstruct o))
-> IO (GValueConstruct o) -> IO (GValueConstruct o)
forall a b. (a -> b) -> a -> b
$ String -> Int32 -> IO (GValueConstruct o)
forall o. String -> Int32 -> IO (GValueConstruct o)
B.Properties.constructObjectPropertyInt32 String
"mcast-rejoin-interval" Int32
val
#if defined(ENABLE_OVERLOADING)
data SettingTeamMcastRejoinIntervalPropertyInfo
instance AttrInfo SettingTeamMcastRejoinIntervalPropertyInfo where
type AttrAllowedOps SettingTeamMcastRejoinIntervalPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]
type AttrBaseTypeConstraint SettingTeamMcastRejoinIntervalPropertyInfo = IsSettingTeam
type AttrSetTypeConstraint SettingTeamMcastRejoinIntervalPropertyInfo = (~) Int32
type AttrTransferTypeConstraint SettingTeamMcastRejoinIntervalPropertyInfo = (~) Int32
type AttrTransferType SettingTeamMcastRejoinIntervalPropertyInfo = Int32
type AttrGetType SettingTeamMcastRejoinIntervalPropertyInfo = Int32
type AttrLabel SettingTeamMcastRejoinIntervalPropertyInfo = "mcast-rejoin-interval"
type AttrOrigin SettingTeamMcastRejoinIntervalPropertyInfo = SettingTeam
attrGet = getSettingTeamMcastRejoinInterval
attrSet = setSettingTeamMcastRejoinInterval
attrTransfer _ v = do
return v
attrConstruct = constructSettingTeamMcastRejoinInterval
attrClear = undefined
dbgAttrInfo = P.Just (O.ResolvedSymbolInfo {
O.resolvedSymbolName = "GI.NM.Objects.SettingTeam.mcastRejoinInterval"
, O.resolvedSymbolURL = "https://hackage.haskell.org/package/gi-nm-1.0.1/docs/GI-NM-Objects-SettingTeam.html#g:attr:mcastRejoinInterval"
})
#endif
getSettingTeamNotifyPeersCount :: (MonadIO m, IsSettingTeam o) => o -> m Int32
getSettingTeamNotifyPeersCount :: forall (m :: * -> *) o.
(MonadIO m, IsSettingTeam o) =>
o -> m Int32
getSettingTeamNotifyPeersCount o
obj = IO Int32 -> m Int32
forall a. IO a -> m a
forall (m :: * -> *) a. MonadIO m => IO a -> m a
MIO.liftIO (IO Int32 -> m Int32) -> IO Int32 -> m Int32
forall a b. (a -> b) -> a -> b
$ o -> String -> IO Int32
forall a. GObject a => a -> String -> IO Int32
B.Properties.getObjectPropertyInt32 o
obj String
"notify-peers-count"
setSettingTeamNotifyPeersCount :: (MonadIO m, IsSettingTeam o) => o -> Int32 -> m ()
setSettingTeamNotifyPeersCount :: forall (m :: * -> *) o.
(MonadIO m, IsSettingTeam o) =>
o -> Int32 -> m ()
setSettingTeamNotifyPeersCount o
obj Int32
val = IO () -> m ()
forall a. IO a -> m a
forall (m :: * -> *) a. MonadIO m => IO a -> m a
MIO.liftIO (IO () -> m ()) -> IO () -> m ()
forall a b. (a -> b) -> a -> b
$ do
o -> String -> Int32 -> IO ()
forall a. GObject a => a -> String -> Int32 -> IO ()
B.Properties.setObjectPropertyInt32 o
obj String
"notify-peers-count" Int32
val
constructSettingTeamNotifyPeersCount :: (IsSettingTeam o, MIO.MonadIO m) => Int32 -> m (GValueConstruct o)
constructSettingTeamNotifyPeersCount :: forall o (m :: * -> *).
(IsSettingTeam o, MonadIO m) =>
Int32 -> m (GValueConstruct o)
constructSettingTeamNotifyPeersCount Int32
val = IO (GValueConstruct o) -> m (GValueConstruct o)
forall a. IO a -> m a
forall (m :: * -> *) a. MonadIO m => IO a -> m a
MIO.liftIO (IO (GValueConstruct o) -> m (GValueConstruct o))
-> IO (GValueConstruct o) -> m (GValueConstruct o)
forall a b. (a -> b) -> a -> b
$ do
IO (GValueConstruct o) -> IO (GValueConstruct o)
forall a. IO a -> IO a
forall (m :: * -> *) a. MonadIO m => IO a -> m a
MIO.liftIO (IO (GValueConstruct o) -> IO (GValueConstruct o))
-> IO (GValueConstruct o) -> IO (GValueConstruct o)
forall a b. (a -> b) -> a -> b
$ String -> Int32 -> IO (GValueConstruct o)
forall o. String -> Int32 -> IO (GValueConstruct o)
B.Properties.constructObjectPropertyInt32 String
"notify-peers-count" Int32
val
#if defined(ENABLE_OVERLOADING)
data SettingTeamNotifyPeersCountPropertyInfo
instance AttrInfo SettingTeamNotifyPeersCountPropertyInfo where
type AttrAllowedOps SettingTeamNotifyPeersCountPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]
type AttrBaseTypeConstraint SettingTeamNotifyPeersCountPropertyInfo = IsSettingTeam
type AttrSetTypeConstraint SettingTeamNotifyPeersCountPropertyInfo = (~) Int32
type AttrTransferTypeConstraint SettingTeamNotifyPeersCountPropertyInfo = (~) Int32
type AttrTransferType SettingTeamNotifyPeersCountPropertyInfo = Int32
type AttrGetType SettingTeamNotifyPeersCountPropertyInfo = Int32
type AttrLabel SettingTeamNotifyPeersCountPropertyInfo = "notify-peers-count"
type AttrOrigin SettingTeamNotifyPeersCountPropertyInfo = SettingTeam
attrGet = getSettingTeamNotifyPeersCount
attrSet = setSettingTeamNotifyPeersCount
attrTransfer _ v = do
return v
attrConstruct = constructSettingTeamNotifyPeersCount
attrClear = undefined
dbgAttrInfo = P.Just (O.ResolvedSymbolInfo {
O.resolvedSymbolName = "GI.NM.Objects.SettingTeam.notifyPeersCount"
, O.resolvedSymbolURL = "https://hackage.haskell.org/package/gi-nm-1.0.1/docs/GI-NM-Objects-SettingTeam.html#g:attr:notifyPeersCount"
})
#endif
getSettingTeamNotifyPeersInterval :: (MonadIO m, IsSettingTeam o) => o -> m Int32
getSettingTeamNotifyPeersInterval :: forall (m :: * -> *) o.
(MonadIO m, IsSettingTeam o) =>
o -> m Int32
getSettingTeamNotifyPeersInterval o
obj = IO Int32 -> m Int32
forall a. IO a -> m a
forall (m :: * -> *) a. MonadIO m => IO a -> m a
MIO.liftIO (IO Int32 -> m Int32) -> IO Int32 -> m Int32
forall a b. (a -> b) -> a -> b
$ o -> String -> IO Int32
forall a. GObject a => a -> String -> IO Int32
B.Properties.getObjectPropertyInt32 o
obj String
"notify-peers-interval"
setSettingTeamNotifyPeersInterval :: (MonadIO m, IsSettingTeam o) => o -> Int32 -> m ()
setSettingTeamNotifyPeersInterval :: forall (m :: * -> *) o.
(MonadIO m, IsSettingTeam o) =>
o -> Int32 -> m ()
setSettingTeamNotifyPeersInterval o
obj Int32
val = IO () -> m ()
forall a. IO a -> m a
forall (m :: * -> *) a. MonadIO m => IO a -> m a
MIO.liftIO (IO () -> m ()) -> IO () -> m ()
forall a b. (a -> b) -> a -> b
$ do
o -> String -> Int32 -> IO ()
forall a. GObject a => a -> String -> Int32 -> IO ()
B.Properties.setObjectPropertyInt32 o
obj String
"notify-peers-interval" Int32
val
constructSettingTeamNotifyPeersInterval :: (IsSettingTeam o, MIO.MonadIO m) => Int32 -> m (GValueConstruct o)
constructSettingTeamNotifyPeersInterval :: forall o (m :: * -> *).
(IsSettingTeam o, MonadIO m) =>
Int32 -> m (GValueConstruct o)
constructSettingTeamNotifyPeersInterval Int32
val = IO (GValueConstruct o) -> m (GValueConstruct o)
forall a. IO a -> m a
forall (m :: * -> *) a. MonadIO m => IO a -> m a
MIO.liftIO (IO (GValueConstruct o) -> m (GValueConstruct o))
-> IO (GValueConstruct o) -> m (GValueConstruct o)
forall a b. (a -> b) -> a -> b
$ do
IO (GValueConstruct o) -> IO (GValueConstruct o)
forall a. IO a -> IO a
forall (m :: * -> *) a. MonadIO m => IO a -> m a
MIO.liftIO (IO (GValueConstruct o) -> IO (GValueConstruct o))
-> IO (GValueConstruct o) -> IO (GValueConstruct o)
forall a b. (a -> b) -> a -> b
$ String -> Int32 -> IO (GValueConstruct o)
forall o. String -> Int32 -> IO (GValueConstruct o)
B.Properties.constructObjectPropertyInt32 String
"notify-peers-interval" Int32
val
#if defined(ENABLE_OVERLOADING)
data SettingTeamNotifyPeersIntervalPropertyInfo
instance AttrInfo SettingTeamNotifyPeersIntervalPropertyInfo where
type AttrAllowedOps SettingTeamNotifyPeersIntervalPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]
type AttrBaseTypeConstraint SettingTeamNotifyPeersIntervalPropertyInfo = IsSettingTeam
type AttrSetTypeConstraint SettingTeamNotifyPeersIntervalPropertyInfo = (~) Int32
type AttrTransferTypeConstraint SettingTeamNotifyPeersIntervalPropertyInfo = (~) Int32
type AttrTransferType SettingTeamNotifyPeersIntervalPropertyInfo = Int32
type AttrGetType SettingTeamNotifyPeersIntervalPropertyInfo = Int32
type AttrLabel SettingTeamNotifyPeersIntervalPropertyInfo = "notify-peers-interval"
type AttrOrigin SettingTeamNotifyPeersIntervalPropertyInfo = SettingTeam
attrGet = getSettingTeamNotifyPeersInterval
attrSet = setSettingTeamNotifyPeersInterval
attrTransfer _ v = do
return v
attrConstruct = constructSettingTeamNotifyPeersInterval
attrClear = undefined
dbgAttrInfo = P.Just (O.ResolvedSymbolInfo {
O.resolvedSymbolName = "GI.NM.Objects.SettingTeam.notifyPeersInterval"
, O.resolvedSymbolURL = "https://hackage.haskell.org/package/gi-nm-1.0.1/docs/GI-NM-Objects-SettingTeam.html#g:attr:notifyPeersInterval"
})
#endif
getSettingTeamRunner :: (MonadIO m, IsSettingTeam o) => o -> m T.Text
getSettingTeamRunner :: forall (m :: * -> *) o. (MonadIO m, IsSettingTeam o) => o -> m Text
getSettingTeamRunner o
obj = IO Text -> m Text
forall a. IO a -> m a
forall (m :: * -> *) a. MonadIO m => IO a -> m a
MIO.liftIO (IO Text -> m Text) -> IO Text -> m Text
forall a b. (a -> b) -> a -> b
$ Text -> IO (Maybe Text) -> IO Text
forall a. HasCallStack => Text -> IO (Maybe a) -> IO a
checkUnexpectedNothing Text
"getSettingTeamRunner" (IO (Maybe Text) -> IO Text) -> IO (Maybe Text) -> IO Text
forall a b. (a -> b) -> a -> b
$ o -> String -> IO (Maybe Text)
forall a. GObject a => a -> String -> IO (Maybe Text)
B.Properties.getObjectPropertyString o
obj String
"runner"
setSettingTeamRunner :: (MonadIO m, IsSettingTeam o) => o -> T.Text -> m ()
setSettingTeamRunner :: forall (m :: * -> *) o.
(MonadIO m, IsSettingTeam o) =>
o -> Text -> m ()
setSettingTeamRunner o
obj Text
val = IO () -> m ()
forall a. IO a -> m a
forall (m :: * -> *) a. MonadIO m => IO a -> m a
MIO.liftIO (IO () -> m ()) -> IO () -> m ()
forall a b. (a -> b) -> a -> b
$ do
o -> String -> Maybe Text -> IO ()
forall a. GObject a => a -> String -> Maybe Text -> IO ()
B.Properties.setObjectPropertyString o
obj String
"runner" (Text -> Maybe Text
forall a. a -> Maybe a
Just Text
val)
constructSettingTeamRunner :: (IsSettingTeam o, MIO.MonadIO m) => T.Text -> m (GValueConstruct o)
constructSettingTeamRunner :: forall o (m :: * -> *).
(IsSettingTeam o, MonadIO m) =>
Text -> m (GValueConstruct o)
constructSettingTeamRunner Text
val = IO (GValueConstruct o) -> m (GValueConstruct o)
forall a. IO a -> m a
forall (m :: * -> *) a. MonadIO m => IO a -> m a
MIO.liftIO (IO (GValueConstruct o) -> m (GValueConstruct o))
-> IO (GValueConstruct o) -> m (GValueConstruct o)
forall a b. (a -> b) -> a -> b
$ do
IO (GValueConstruct o) -> IO (GValueConstruct o)
forall a. IO a -> IO a
forall (m :: * -> *) a. MonadIO m => IO a -> m a
MIO.liftIO (IO (GValueConstruct o) -> IO (GValueConstruct o))
-> IO (GValueConstruct o) -> IO (GValueConstruct o)
forall a b. (a -> b) -> a -> b
$ String -> Maybe Text -> IO (GValueConstruct o)
forall o. String -> Maybe Text -> IO (GValueConstruct o)
B.Properties.constructObjectPropertyString String
"runner" (Text -> Maybe Text
forall a. a -> Maybe a
P.Just Text
val)
clearSettingTeamRunner :: (MonadIO m, IsSettingTeam o) => o -> m ()
clearSettingTeamRunner :: forall (m :: * -> *) o. (MonadIO m, IsSettingTeam o) => o -> m ()
clearSettingTeamRunner o
obj = 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
$ o -> String -> Maybe Text -> IO ()
forall a. GObject a => a -> String -> Maybe Text -> IO ()
B.Properties.setObjectPropertyString o
obj String
"runner" (Maybe Text
forall a. Maybe a
Nothing :: Maybe T.Text)
#if defined(ENABLE_OVERLOADING)
data SettingTeamRunnerPropertyInfo
instance AttrInfo SettingTeamRunnerPropertyInfo where
type AttrAllowedOps SettingTeamRunnerPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet, 'AttrClear]
type AttrBaseTypeConstraint SettingTeamRunnerPropertyInfo = IsSettingTeam
type AttrSetTypeConstraint SettingTeamRunnerPropertyInfo = (~) T.Text
type AttrTransferTypeConstraint SettingTeamRunnerPropertyInfo = (~) T.Text
type AttrTransferType SettingTeamRunnerPropertyInfo = T.Text
type AttrGetType SettingTeamRunnerPropertyInfo = T.Text
type AttrLabel SettingTeamRunnerPropertyInfo = "runner"
type AttrOrigin SettingTeamRunnerPropertyInfo = SettingTeam
attrGet = getSettingTeamRunner
attrSet = setSettingTeamRunner
attrTransfer _ v = do
return v
attrConstruct = constructSettingTeamRunner
attrClear = clearSettingTeamRunner
dbgAttrInfo = P.Just (O.ResolvedSymbolInfo {
O.resolvedSymbolName = "GI.NM.Objects.SettingTeam.runner"
, O.resolvedSymbolURL = "https://hackage.haskell.org/package/gi-nm-1.0.1/docs/GI-NM-Objects-SettingTeam.html#g:attr:runner"
})
#endif
getSettingTeamRunnerActive :: (MonadIO m, IsSettingTeam o) => o -> m Bool
getSettingTeamRunnerActive :: forall (m :: * -> *) o. (MonadIO m, IsSettingTeam o) => o -> m Bool
getSettingTeamRunnerActive o
obj = IO Bool -> m Bool
forall a. IO a -> m a
forall (m :: * -> *) a. MonadIO m => IO a -> m a
MIO.liftIO (IO Bool -> m Bool) -> IO Bool -> m Bool
forall a b. (a -> b) -> a -> b
$ o -> String -> IO Bool
forall a. GObject a => a -> String -> IO Bool
B.Properties.getObjectPropertyBool o
obj String
"runner-active"
setSettingTeamRunnerActive :: (MonadIO m, IsSettingTeam o) => o -> Bool -> m ()
setSettingTeamRunnerActive :: forall (m :: * -> *) o.
(MonadIO m, IsSettingTeam o) =>
o -> Bool -> m ()
setSettingTeamRunnerActive o
obj Bool
val = IO () -> m ()
forall a. IO a -> m a
forall (m :: * -> *) a. MonadIO m => IO a -> m a
MIO.liftIO (IO () -> m ()) -> IO () -> m ()
forall a b. (a -> b) -> a -> b
$ do
o -> String -> Bool -> IO ()
forall a. GObject a => a -> String -> Bool -> IO ()
B.Properties.setObjectPropertyBool o
obj String
"runner-active" Bool
val
constructSettingTeamRunnerActive :: (IsSettingTeam o, MIO.MonadIO m) => Bool -> m (GValueConstruct o)
constructSettingTeamRunnerActive :: forall o (m :: * -> *).
(IsSettingTeam o, MonadIO m) =>
Bool -> m (GValueConstruct o)
constructSettingTeamRunnerActive Bool
val = IO (GValueConstruct o) -> m (GValueConstruct o)
forall a. IO a -> m a
forall (m :: * -> *) a. MonadIO m => IO a -> m a
MIO.liftIO (IO (GValueConstruct o) -> m (GValueConstruct o))
-> IO (GValueConstruct o) -> m (GValueConstruct o)
forall a b. (a -> b) -> a -> b
$ do
IO (GValueConstruct o) -> IO (GValueConstruct o)
forall a. IO a -> IO a
forall (m :: * -> *) a. MonadIO m => IO a -> m a
MIO.liftIO (IO (GValueConstruct o) -> IO (GValueConstruct o))
-> IO (GValueConstruct o) -> IO (GValueConstruct o)
forall a b. (a -> b) -> a -> b
$ String -> Bool -> IO (GValueConstruct o)
forall o. String -> Bool -> IO (GValueConstruct o)
B.Properties.constructObjectPropertyBool String
"runner-active" Bool
val
#if defined(ENABLE_OVERLOADING)
data SettingTeamRunnerActivePropertyInfo
instance AttrInfo SettingTeamRunnerActivePropertyInfo where
type AttrAllowedOps SettingTeamRunnerActivePropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]
type AttrBaseTypeConstraint SettingTeamRunnerActivePropertyInfo = IsSettingTeam
type AttrSetTypeConstraint SettingTeamRunnerActivePropertyInfo = (~) Bool
type AttrTransferTypeConstraint SettingTeamRunnerActivePropertyInfo = (~) Bool
type AttrTransferType SettingTeamRunnerActivePropertyInfo = Bool
type AttrGetType SettingTeamRunnerActivePropertyInfo = Bool
type AttrLabel SettingTeamRunnerActivePropertyInfo = "runner-active"
type AttrOrigin SettingTeamRunnerActivePropertyInfo = SettingTeam
attrGet = getSettingTeamRunnerActive
attrSet = setSettingTeamRunnerActive
attrTransfer _ v = do
return v
attrConstruct = constructSettingTeamRunnerActive
attrClear = undefined
dbgAttrInfo = P.Just (O.ResolvedSymbolInfo {
O.resolvedSymbolName = "GI.NM.Objects.SettingTeam.runnerActive"
, O.resolvedSymbolURL = "https://hackage.haskell.org/package/gi-nm-1.0.1/docs/GI-NM-Objects-SettingTeam.html#g:attr:runnerActive"
})
#endif
getSettingTeamRunnerAggSelectPolicy :: (MonadIO m, IsSettingTeam o) => o -> m T.Text
getSettingTeamRunnerAggSelectPolicy :: forall (m :: * -> *) o. (MonadIO m, IsSettingTeam o) => o -> m Text
getSettingTeamRunnerAggSelectPolicy o
obj = IO Text -> m Text
forall a. IO a -> m a
forall (m :: * -> *) a. MonadIO m => IO a -> m a
MIO.liftIO (IO Text -> m Text) -> IO Text -> m Text
forall a b. (a -> b) -> a -> b
$ Text -> IO (Maybe Text) -> IO Text
forall a. HasCallStack => Text -> IO (Maybe a) -> IO a
checkUnexpectedNothing Text
"getSettingTeamRunnerAggSelectPolicy" (IO (Maybe Text) -> IO Text) -> IO (Maybe Text) -> IO Text
forall a b. (a -> b) -> a -> b
$ o -> String -> IO (Maybe Text)
forall a. GObject a => a -> String -> IO (Maybe Text)
B.Properties.getObjectPropertyString o
obj String
"runner-agg-select-policy"
setSettingTeamRunnerAggSelectPolicy :: (MonadIO m, IsSettingTeam o) => o -> T.Text -> m ()
setSettingTeamRunnerAggSelectPolicy :: forall (m :: * -> *) o.
(MonadIO m, IsSettingTeam o) =>
o -> Text -> m ()
setSettingTeamRunnerAggSelectPolicy o
obj Text
val = IO () -> m ()
forall a. IO a -> m a
forall (m :: * -> *) a. MonadIO m => IO a -> m a
MIO.liftIO (IO () -> m ()) -> IO () -> m ()
forall a b. (a -> b) -> a -> b
$ do
o -> String -> Maybe Text -> IO ()
forall a. GObject a => a -> String -> Maybe Text -> IO ()
B.Properties.setObjectPropertyString o
obj String
"runner-agg-select-policy" (Text -> Maybe Text
forall a. a -> Maybe a
Just Text
val)
constructSettingTeamRunnerAggSelectPolicy :: (IsSettingTeam o, MIO.MonadIO m) => T.Text -> m (GValueConstruct o)
constructSettingTeamRunnerAggSelectPolicy :: forall o (m :: * -> *).
(IsSettingTeam o, MonadIO m) =>
Text -> m (GValueConstruct o)
constructSettingTeamRunnerAggSelectPolicy Text
val = IO (GValueConstruct o) -> m (GValueConstruct o)
forall a. IO a -> m a
forall (m :: * -> *) a. MonadIO m => IO a -> m a
MIO.liftIO (IO (GValueConstruct o) -> m (GValueConstruct o))
-> IO (GValueConstruct o) -> m (GValueConstruct o)
forall a b. (a -> b) -> a -> b
$ do
IO (GValueConstruct o) -> IO (GValueConstruct o)
forall a. IO a -> IO a
forall (m :: * -> *) a. MonadIO m => IO a -> m a
MIO.liftIO (IO (GValueConstruct o) -> IO (GValueConstruct o))
-> IO (GValueConstruct o) -> IO (GValueConstruct o)
forall a b. (a -> b) -> a -> b
$ String -> Maybe Text -> IO (GValueConstruct o)
forall o. String -> Maybe Text -> IO (GValueConstruct o)
B.Properties.constructObjectPropertyString String
"runner-agg-select-policy" (Text -> Maybe Text
forall a. a -> Maybe a
P.Just Text
val)
clearSettingTeamRunnerAggSelectPolicy :: (MonadIO m, IsSettingTeam o) => o -> m ()
clearSettingTeamRunnerAggSelectPolicy :: forall (m :: * -> *) o. (MonadIO m, IsSettingTeam o) => o -> m ()
clearSettingTeamRunnerAggSelectPolicy o
obj = 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
$ o -> String -> Maybe Text -> IO ()
forall a. GObject a => a -> String -> Maybe Text -> IO ()
B.Properties.setObjectPropertyString o
obj String
"runner-agg-select-policy" (Maybe Text
forall a. Maybe a
Nothing :: Maybe T.Text)
#if defined(ENABLE_OVERLOADING)
data SettingTeamRunnerAggSelectPolicyPropertyInfo
instance AttrInfo SettingTeamRunnerAggSelectPolicyPropertyInfo where
type AttrAllowedOps SettingTeamRunnerAggSelectPolicyPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet, 'AttrClear]
type AttrBaseTypeConstraint SettingTeamRunnerAggSelectPolicyPropertyInfo = IsSettingTeam
type AttrSetTypeConstraint SettingTeamRunnerAggSelectPolicyPropertyInfo = (~) T.Text
type AttrTransferTypeConstraint SettingTeamRunnerAggSelectPolicyPropertyInfo = (~) T.Text
type AttrTransferType SettingTeamRunnerAggSelectPolicyPropertyInfo = T.Text
type AttrGetType SettingTeamRunnerAggSelectPolicyPropertyInfo = T.Text
type AttrLabel SettingTeamRunnerAggSelectPolicyPropertyInfo = "runner-agg-select-policy"
type AttrOrigin SettingTeamRunnerAggSelectPolicyPropertyInfo = SettingTeam
attrGet = getSettingTeamRunnerAggSelectPolicy
attrSet = setSettingTeamRunnerAggSelectPolicy
attrTransfer _ v = do
return v
attrConstruct = constructSettingTeamRunnerAggSelectPolicy
attrClear = clearSettingTeamRunnerAggSelectPolicy
dbgAttrInfo = P.Just (O.ResolvedSymbolInfo {
O.resolvedSymbolName = "GI.NM.Objects.SettingTeam.runnerAggSelectPolicy"
, O.resolvedSymbolURL = "https://hackage.haskell.org/package/gi-nm-1.0.1/docs/GI-NM-Objects-SettingTeam.html#g:attr:runnerAggSelectPolicy"
})
#endif
getSettingTeamRunnerFastRate :: (MonadIO m, IsSettingTeam o) => o -> m Bool
getSettingTeamRunnerFastRate :: forall (m :: * -> *) o. (MonadIO m, IsSettingTeam o) => o -> m Bool
getSettingTeamRunnerFastRate o
obj = IO Bool -> m Bool
forall a. IO a -> m a
forall (m :: * -> *) a. MonadIO m => IO a -> m a
MIO.liftIO (IO Bool -> m Bool) -> IO Bool -> m Bool
forall a b. (a -> b) -> a -> b
$ o -> String -> IO Bool
forall a. GObject a => a -> String -> IO Bool
B.Properties.getObjectPropertyBool o
obj String
"runner-fast-rate"
setSettingTeamRunnerFastRate :: (MonadIO m, IsSettingTeam o) => o -> Bool -> m ()
setSettingTeamRunnerFastRate :: forall (m :: * -> *) o.
(MonadIO m, IsSettingTeam o) =>
o -> Bool -> m ()
setSettingTeamRunnerFastRate o
obj Bool
val = IO () -> m ()
forall a. IO a -> m a
forall (m :: * -> *) a. MonadIO m => IO a -> m a
MIO.liftIO (IO () -> m ()) -> IO () -> m ()
forall a b. (a -> b) -> a -> b
$ do
o -> String -> Bool -> IO ()
forall a. GObject a => a -> String -> Bool -> IO ()
B.Properties.setObjectPropertyBool o
obj String
"runner-fast-rate" Bool
val
constructSettingTeamRunnerFastRate :: (IsSettingTeam o, MIO.MonadIO m) => Bool -> m (GValueConstruct o)
constructSettingTeamRunnerFastRate :: forall o (m :: * -> *).
(IsSettingTeam o, MonadIO m) =>
Bool -> m (GValueConstruct o)
constructSettingTeamRunnerFastRate Bool
val = IO (GValueConstruct o) -> m (GValueConstruct o)
forall a. IO a -> m a
forall (m :: * -> *) a. MonadIO m => IO a -> m a
MIO.liftIO (IO (GValueConstruct o) -> m (GValueConstruct o))
-> IO (GValueConstruct o) -> m (GValueConstruct o)
forall a b. (a -> b) -> a -> b
$ do
IO (GValueConstruct o) -> IO (GValueConstruct o)
forall a. IO a -> IO a
forall (m :: * -> *) a. MonadIO m => IO a -> m a
MIO.liftIO (IO (GValueConstruct o) -> IO (GValueConstruct o))
-> IO (GValueConstruct o) -> IO (GValueConstruct o)
forall a b. (a -> b) -> a -> b
$ String -> Bool -> IO (GValueConstruct o)
forall o. String -> Bool -> IO (GValueConstruct o)
B.Properties.constructObjectPropertyBool String
"runner-fast-rate" Bool
val
#if defined(ENABLE_OVERLOADING)
data SettingTeamRunnerFastRatePropertyInfo
instance AttrInfo SettingTeamRunnerFastRatePropertyInfo where
type AttrAllowedOps SettingTeamRunnerFastRatePropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]
type AttrBaseTypeConstraint SettingTeamRunnerFastRatePropertyInfo = IsSettingTeam
type AttrSetTypeConstraint SettingTeamRunnerFastRatePropertyInfo = (~) Bool
type AttrTransferTypeConstraint SettingTeamRunnerFastRatePropertyInfo = (~) Bool
type AttrTransferType SettingTeamRunnerFastRatePropertyInfo = Bool
type AttrGetType SettingTeamRunnerFastRatePropertyInfo = Bool
type AttrLabel SettingTeamRunnerFastRatePropertyInfo = "runner-fast-rate"
type AttrOrigin SettingTeamRunnerFastRatePropertyInfo = SettingTeam
attrGet = getSettingTeamRunnerFastRate
attrSet = setSettingTeamRunnerFastRate
attrTransfer _ v = do
return v
attrConstruct = constructSettingTeamRunnerFastRate
attrClear = undefined
dbgAttrInfo = P.Just (O.ResolvedSymbolInfo {
O.resolvedSymbolName = "GI.NM.Objects.SettingTeam.runnerFastRate"
, O.resolvedSymbolURL = "https://hackage.haskell.org/package/gi-nm-1.0.1/docs/GI-NM-Objects-SettingTeam.html#g:attr:runnerFastRate"
})
#endif
getSettingTeamRunnerHwaddrPolicy :: (MonadIO m, IsSettingTeam o) => o -> m T.Text
getSettingTeamRunnerHwaddrPolicy :: forall (m :: * -> *) o. (MonadIO m, IsSettingTeam o) => o -> m Text
getSettingTeamRunnerHwaddrPolicy o
obj = IO Text -> m Text
forall a. IO a -> m a
forall (m :: * -> *) a. MonadIO m => IO a -> m a
MIO.liftIO (IO Text -> m Text) -> IO Text -> m Text
forall a b. (a -> b) -> a -> b
$ Text -> IO (Maybe Text) -> IO Text
forall a. HasCallStack => Text -> IO (Maybe a) -> IO a
checkUnexpectedNothing Text
"getSettingTeamRunnerHwaddrPolicy" (IO (Maybe Text) -> IO Text) -> IO (Maybe Text) -> IO Text
forall a b. (a -> b) -> a -> b
$ o -> String -> IO (Maybe Text)
forall a. GObject a => a -> String -> IO (Maybe Text)
B.Properties.getObjectPropertyString o
obj String
"runner-hwaddr-policy"
setSettingTeamRunnerHwaddrPolicy :: (MonadIO m, IsSettingTeam o) => o -> T.Text -> m ()
setSettingTeamRunnerHwaddrPolicy :: forall (m :: * -> *) o.
(MonadIO m, IsSettingTeam o) =>
o -> Text -> m ()
setSettingTeamRunnerHwaddrPolicy o
obj Text
val = IO () -> m ()
forall a. IO a -> m a
forall (m :: * -> *) a. MonadIO m => IO a -> m a
MIO.liftIO (IO () -> m ()) -> IO () -> m ()
forall a b. (a -> b) -> a -> b
$ do
o -> String -> Maybe Text -> IO ()
forall a. GObject a => a -> String -> Maybe Text -> IO ()
B.Properties.setObjectPropertyString o
obj String
"runner-hwaddr-policy" (Text -> Maybe Text
forall a. a -> Maybe a
Just Text
val)
constructSettingTeamRunnerHwaddrPolicy :: (IsSettingTeam o, MIO.MonadIO m) => T.Text -> m (GValueConstruct o)
constructSettingTeamRunnerHwaddrPolicy :: forall o (m :: * -> *).
(IsSettingTeam o, MonadIO m) =>
Text -> m (GValueConstruct o)
constructSettingTeamRunnerHwaddrPolicy Text
val = IO (GValueConstruct o) -> m (GValueConstruct o)
forall a. IO a -> m a
forall (m :: * -> *) a. MonadIO m => IO a -> m a
MIO.liftIO (IO (GValueConstruct o) -> m (GValueConstruct o))
-> IO (GValueConstruct o) -> m (GValueConstruct o)
forall a b. (a -> b) -> a -> b
$ do
IO (GValueConstruct o) -> IO (GValueConstruct o)
forall a. IO a -> IO a
forall (m :: * -> *) a. MonadIO m => IO a -> m a
MIO.liftIO (IO (GValueConstruct o) -> IO (GValueConstruct o))
-> IO (GValueConstruct o) -> IO (GValueConstruct o)
forall a b. (a -> b) -> a -> b
$ String -> Maybe Text -> IO (GValueConstruct o)
forall o. String -> Maybe Text -> IO (GValueConstruct o)
B.Properties.constructObjectPropertyString String
"runner-hwaddr-policy" (Text -> Maybe Text
forall a. a -> Maybe a
P.Just Text
val)
clearSettingTeamRunnerHwaddrPolicy :: (MonadIO m, IsSettingTeam o) => o -> m ()
clearSettingTeamRunnerHwaddrPolicy :: forall (m :: * -> *) o. (MonadIO m, IsSettingTeam o) => o -> m ()
clearSettingTeamRunnerHwaddrPolicy o
obj = 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
$ o -> String -> Maybe Text -> IO ()
forall a. GObject a => a -> String -> Maybe Text -> IO ()
B.Properties.setObjectPropertyString o
obj String
"runner-hwaddr-policy" (Maybe Text
forall a. Maybe a
Nothing :: Maybe T.Text)
#if defined(ENABLE_OVERLOADING)
data SettingTeamRunnerHwaddrPolicyPropertyInfo
instance AttrInfo SettingTeamRunnerHwaddrPolicyPropertyInfo where
type AttrAllowedOps SettingTeamRunnerHwaddrPolicyPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet, 'AttrClear]
type AttrBaseTypeConstraint SettingTeamRunnerHwaddrPolicyPropertyInfo = IsSettingTeam
type AttrSetTypeConstraint SettingTeamRunnerHwaddrPolicyPropertyInfo = (~) T.Text
type AttrTransferTypeConstraint SettingTeamRunnerHwaddrPolicyPropertyInfo = (~) T.Text
type AttrTransferType SettingTeamRunnerHwaddrPolicyPropertyInfo = T.Text
type AttrGetType SettingTeamRunnerHwaddrPolicyPropertyInfo = T.Text
type AttrLabel SettingTeamRunnerHwaddrPolicyPropertyInfo = "runner-hwaddr-policy"
type AttrOrigin SettingTeamRunnerHwaddrPolicyPropertyInfo = SettingTeam
attrGet = getSettingTeamRunnerHwaddrPolicy
attrSet = setSettingTeamRunnerHwaddrPolicy
attrTransfer _ v = do
return v
attrConstruct = constructSettingTeamRunnerHwaddrPolicy
attrClear = clearSettingTeamRunnerHwaddrPolicy
dbgAttrInfo = P.Just (O.ResolvedSymbolInfo {
O.resolvedSymbolName = "GI.NM.Objects.SettingTeam.runnerHwaddrPolicy"
, O.resolvedSymbolURL = "https://hackage.haskell.org/package/gi-nm-1.0.1/docs/GI-NM-Objects-SettingTeam.html#g:attr:runnerHwaddrPolicy"
})
#endif
getSettingTeamRunnerMinPorts :: (MonadIO m, IsSettingTeam o) => o -> m Int32
getSettingTeamRunnerMinPorts :: forall (m :: * -> *) o.
(MonadIO m, IsSettingTeam o) =>
o -> m Int32
getSettingTeamRunnerMinPorts o
obj = IO Int32 -> m Int32
forall a. IO a -> m a
forall (m :: * -> *) a. MonadIO m => IO a -> m a
MIO.liftIO (IO Int32 -> m Int32) -> IO Int32 -> m Int32
forall a b. (a -> b) -> a -> b
$ o -> String -> IO Int32
forall a. GObject a => a -> String -> IO Int32
B.Properties.getObjectPropertyInt32 o
obj String
"runner-min-ports"
setSettingTeamRunnerMinPorts :: (MonadIO m, IsSettingTeam o) => o -> Int32 -> m ()
setSettingTeamRunnerMinPorts :: forall (m :: * -> *) o.
(MonadIO m, IsSettingTeam o) =>
o -> Int32 -> m ()
setSettingTeamRunnerMinPorts o
obj Int32
val = IO () -> m ()
forall a. IO a -> m a
forall (m :: * -> *) a. MonadIO m => IO a -> m a
MIO.liftIO (IO () -> m ()) -> IO () -> m ()
forall a b. (a -> b) -> a -> b
$ do
o -> String -> Int32 -> IO ()
forall a. GObject a => a -> String -> Int32 -> IO ()
B.Properties.setObjectPropertyInt32 o
obj String
"runner-min-ports" Int32
val
constructSettingTeamRunnerMinPorts :: (IsSettingTeam o, MIO.MonadIO m) => Int32 -> m (GValueConstruct o)
constructSettingTeamRunnerMinPorts :: forall o (m :: * -> *).
(IsSettingTeam o, MonadIO m) =>
Int32 -> m (GValueConstruct o)
constructSettingTeamRunnerMinPorts Int32
val = IO (GValueConstruct o) -> m (GValueConstruct o)
forall a. IO a -> m a
forall (m :: * -> *) a. MonadIO m => IO a -> m a
MIO.liftIO (IO (GValueConstruct o) -> m (GValueConstruct o))
-> IO (GValueConstruct o) -> m (GValueConstruct o)
forall a b. (a -> b) -> a -> b
$ do
IO (GValueConstruct o) -> IO (GValueConstruct o)
forall a. IO a -> IO a
forall (m :: * -> *) a. MonadIO m => IO a -> m a
MIO.liftIO (IO (GValueConstruct o) -> IO (GValueConstruct o))
-> IO (GValueConstruct o) -> IO (GValueConstruct o)
forall a b. (a -> b) -> a -> b
$ String -> Int32 -> IO (GValueConstruct o)
forall o. String -> Int32 -> IO (GValueConstruct o)
B.Properties.constructObjectPropertyInt32 String
"runner-min-ports" Int32
val
#if defined(ENABLE_OVERLOADING)
data SettingTeamRunnerMinPortsPropertyInfo
instance AttrInfo SettingTeamRunnerMinPortsPropertyInfo where
type AttrAllowedOps SettingTeamRunnerMinPortsPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]
type AttrBaseTypeConstraint SettingTeamRunnerMinPortsPropertyInfo = IsSettingTeam
type AttrSetTypeConstraint SettingTeamRunnerMinPortsPropertyInfo = (~) Int32
type AttrTransferTypeConstraint SettingTeamRunnerMinPortsPropertyInfo = (~) Int32
type AttrTransferType SettingTeamRunnerMinPortsPropertyInfo = Int32
type AttrGetType SettingTeamRunnerMinPortsPropertyInfo = Int32
type AttrLabel SettingTeamRunnerMinPortsPropertyInfo = "runner-min-ports"
type AttrOrigin SettingTeamRunnerMinPortsPropertyInfo = SettingTeam
attrGet = getSettingTeamRunnerMinPorts
attrSet = setSettingTeamRunnerMinPorts
attrTransfer _ v = do
return v
attrConstruct = constructSettingTeamRunnerMinPorts
attrClear = undefined
dbgAttrInfo = P.Just (O.ResolvedSymbolInfo {
O.resolvedSymbolName = "GI.NM.Objects.SettingTeam.runnerMinPorts"
, O.resolvedSymbolURL = "https://hackage.haskell.org/package/gi-nm-1.0.1/docs/GI-NM-Objects-SettingTeam.html#g:attr:runnerMinPorts"
})
#endif
getSettingTeamRunnerSysPrio :: (MonadIO m, IsSettingTeam o) => o -> m Int32
getSettingTeamRunnerSysPrio :: forall (m :: * -> *) o.
(MonadIO m, IsSettingTeam o) =>
o -> m Int32
getSettingTeamRunnerSysPrio o
obj = IO Int32 -> m Int32
forall a. IO a -> m a
forall (m :: * -> *) a. MonadIO m => IO a -> m a
MIO.liftIO (IO Int32 -> m Int32) -> IO Int32 -> m Int32
forall a b. (a -> b) -> a -> b
$ o -> String -> IO Int32
forall a. GObject a => a -> String -> IO Int32
B.Properties.getObjectPropertyInt32 o
obj String
"runner-sys-prio"
setSettingTeamRunnerSysPrio :: (MonadIO m, IsSettingTeam o) => o -> Int32 -> m ()
setSettingTeamRunnerSysPrio :: forall (m :: * -> *) o.
(MonadIO m, IsSettingTeam o) =>
o -> Int32 -> m ()
setSettingTeamRunnerSysPrio o
obj Int32
val = IO () -> m ()
forall a. IO a -> m a
forall (m :: * -> *) a. MonadIO m => IO a -> m a
MIO.liftIO (IO () -> m ()) -> IO () -> m ()
forall a b. (a -> b) -> a -> b
$ do
o -> String -> Int32 -> IO ()
forall a. GObject a => a -> String -> Int32 -> IO ()
B.Properties.setObjectPropertyInt32 o
obj String
"runner-sys-prio" Int32
val
constructSettingTeamRunnerSysPrio :: (IsSettingTeam o, MIO.MonadIO m) => Int32 -> m (GValueConstruct o)
constructSettingTeamRunnerSysPrio :: forall o (m :: * -> *).
(IsSettingTeam o, MonadIO m) =>
Int32 -> m (GValueConstruct o)
constructSettingTeamRunnerSysPrio Int32
val = IO (GValueConstruct o) -> m (GValueConstruct o)
forall a. IO a -> m a
forall (m :: * -> *) a. MonadIO m => IO a -> m a
MIO.liftIO (IO (GValueConstruct o) -> m (GValueConstruct o))
-> IO (GValueConstruct o) -> m (GValueConstruct o)
forall a b. (a -> b) -> a -> b
$ do
IO (GValueConstruct o) -> IO (GValueConstruct o)
forall a. IO a -> IO a
forall (m :: * -> *) a. MonadIO m => IO a -> m a
MIO.liftIO (IO (GValueConstruct o) -> IO (GValueConstruct o))
-> IO (GValueConstruct o) -> IO (GValueConstruct o)
forall a b. (a -> b) -> a -> b
$ String -> Int32 -> IO (GValueConstruct o)
forall o. String -> Int32 -> IO (GValueConstruct o)
B.Properties.constructObjectPropertyInt32 String
"runner-sys-prio" Int32
val
#if defined(ENABLE_OVERLOADING)
data SettingTeamRunnerSysPrioPropertyInfo
instance AttrInfo SettingTeamRunnerSysPrioPropertyInfo where
type AttrAllowedOps SettingTeamRunnerSysPrioPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]
type AttrBaseTypeConstraint SettingTeamRunnerSysPrioPropertyInfo = IsSettingTeam
type AttrSetTypeConstraint SettingTeamRunnerSysPrioPropertyInfo = (~) Int32
type AttrTransferTypeConstraint SettingTeamRunnerSysPrioPropertyInfo = (~) Int32
type AttrTransferType SettingTeamRunnerSysPrioPropertyInfo = Int32
type AttrGetType SettingTeamRunnerSysPrioPropertyInfo = Int32
type AttrLabel SettingTeamRunnerSysPrioPropertyInfo = "runner-sys-prio"
type AttrOrigin SettingTeamRunnerSysPrioPropertyInfo = SettingTeam
attrGet = getSettingTeamRunnerSysPrio
attrSet = setSettingTeamRunnerSysPrio
attrTransfer _ v = do
return v
attrConstruct = constructSettingTeamRunnerSysPrio
attrClear = undefined
dbgAttrInfo = P.Just (O.ResolvedSymbolInfo {
O.resolvedSymbolName = "GI.NM.Objects.SettingTeam.runnerSysPrio"
, O.resolvedSymbolURL = "https://hackage.haskell.org/package/gi-nm-1.0.1/docs/GI-NM-Objects-SettingTeam.html#g:attr:runnerSysPrio"
})
#endif
getSettingTeamRunnerTxBalancer :: (MonadIO m, IsSettingTeam o) => o -> m T.Text
getSettingTeamRunnerTxBalancer :: forall (m :: * -> *) o. (MonadIO m, IsSettingTeam o) => o -> m Text
getSettingTeamRunnerTxBalancer o
obj = IO Text -> m Text
forall a. IO a -> m a
forall (m :: * -> *) a. MonadIO m => IO a -> m a
MIO.liftIO (IO Text -> m Text) -> IO Text -> m Text
forall a b. (a -> b) -> a -> b
$ Text -> IO (Maybe Text) -> IO Text
forall a. HasCallStack => Text -> IO (Maybe a) -> IO a
checkUnexpectedNothing Text
"getSettingTeamRunnerTxBalancer" (IO (Maybe Text) -> IO Text) -> IO (Maybe Text) -> IO Text
forall a b. (a -> b) -> a -> b
$ o -> String -> IO (Maybe Text)
forall a. GObject a => a -> String -> IO (Maybe Text)
B.Properties.getObjectPropertyString o
obj String
"runner-tx-balancer"
setSettingTeamRunnerTxBalancer :: (MonadIO m, IsSettingTeam o) => o -> T.Text -> m ()
setSettingTeamRunnerTxBalancer :: forall (m :: * -> *) o.
(MonadIO m, IsSettingTeam o) =>
o -> Text -> m ()
setSettingTeamRunnerTxBalancer o
obj Text
val = IO () -> m ()
forall a. IO a -> m a
forall (m :: * -> *) a. MonadIO m => IO a -> m a
MIO.liftIO (IO () -> m ()) -> IO () -> m ()
forall a b. (a -> b) -> a -> b
$ do
o -> String -> Maybe Text -> IO ()
forall a. GObject a => a -> String -> Maybe Text -> IO ()
B.Properties.setObjectPropertyString o
obj String
"runner-tx-balancer" (Text -> Maybe Text
forall a. a -> Maybe a
Just Text
val)
constructSettingTeamRunnerTxBalancer :: (IsSettingTeam o, MIO.MonadIO m) => T.Text -> m (GValueConstruct o)
constructSettingTeamRunnerTxBalancer :: forall o (m :: * -> *).
(IsSettingTeam o, MonadIO m) =>
Text -> m (GValueConstruct o)
constructSettingTeamRunnerTxBalancer Text
val = IO (GValueConstruct o) -> m (GValueConstruct o)
forall a. IO a -> m a
forall (m :: * -> *) a. MonadIO m => IO a -> m a
MIO.liftIO (IO (GValueConstruct o) -> m (GValueConstruct o))
-> IO (GValueConstruct o) -> m (GValueConstruct o)
forall a b. (a -> b) -> a -> b
$ do
IO (GValueConstruct o) -> IO (GValueConstruct o)
forall a. IO a -> IO a
forall (m :: * -> *) a. MonadIO m => IO a -> m a
MIO.liftIO (IO (GValueConstruct o) -> IO (GValueConstruct o))
-> IO (GValueConstruct o) -> IO (GValueConstruct o)
forall a b. (a -> b) -> a -> b
$ String -> Maybe Text -> IO (GValueConstruct o)
forall o. String -> Maybe Text -> IO (GValueConstruct o)
B.Properties.constructObjectPropertyString String
"runner-tx-balancer" (Text -> Maybe Text
forall a. a -> Maybe a
P.Just Text
val)
clearSettingTeamRunnerTxBalancer :: (MonadIO m, IsSettingTeam o) => o -> m ()
clearSettingTeamRunnerTxBalancer :: forall (m :: * -> *) o. (MonadIO m, IsSettingTeam o) => o -> m ()
clearSettingTeamRunnerTxBalancer o
obj = 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
$ o -> String -> Maybe Text -> IO ()
forall a. GObject a => a -> String -> Maybe Text -> IO ()
B.Properties.setObjectPropertyString o
obj String
"runner-tx-balancer" (Maybe Text
forall a. Maybe a
Nothing :: Maybe T.Text)
#if defined(ENABLE_OVERLOADING)
data SettingTeamRunnerTxBalancerPropertyInfo
instance AttrInfo SettingTeamRunnerTxBalancerPropertyInfo where
type AttrAllowedOps SettingTeamRunnerTxBalancerPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet, 'AttrClear]
type AttrBaseTypeConstraint SettingTeamRunnerTxBalancerPropertyInfo = IsSettingTeam
type AttrSetTypeConstraint SettingTeamRunnerTxBalancerPropertyInfo = (~) T.Text
type AttrTransferTypeConstraint SettingTeamRunnerTxBalancerPropertyInfo = (~) T.Text
type AttrTransferType SettingTeamRunnerTxBalancerPropertyInfo = T.Text
type AttrGetType SettingTeamRunnerTxBalancerPropertyInfo = T.Text
type AttrLabel SettingTeamRunnerTxBalancerPropertyInfo = "runner-tx-balancer"
type AttrOrigin SettingTeamRunnerTxBalancerPropertyInfo = SettingTeam
attrGet = getSettingTeamRunnerTxBalancer
attrSet = setSettingTeamRunnerTxBalancer
attrTransfer _ v = do
return v
attrConstruct = constructSettingTeamRunnerTxBalancer
attrClear = clearSettingTeamRunnerTxBalancer
dbgAttrInfo = P.Just (O.ResolvedSymbolInfo {
O.resolvedSymbolName = "GI.NM.Objects.SettingTeam.runnerTxBalancer"
, O.resolvedSymbolURL = "https://hackage.haskell.org/package/gi-nm-1.0.1/docs/GI-NM-Objects-SettingTeam.html#g:attr:runnerTxBalancer"
})
#endif
getSettingTeamRunnerTxBalancerInterval :: (MonadIO m, IsSettingTeam o) => o -> m Int32
getSettingTeamRunnerTxBalancerInterval :: forall (m :: * -> *) o.
(MonadIO m, IsSettingTeam o) =>
o -> m Int32
getSettingTeamRunnerTxBalancerInterval o
obj = IO Int32 -> m Int32
forall a. IO a -> m a
forall (m :: * -> *) a. MonadIO m => IO a -> m a
MIO.liftIO (IO Int32 -> m Int32) -> IO Int32 -> m Int32
forall a b. (a -> b) -> a -> b
$ o -> String -> IO Int32
forall a. GObject a => a -> String -> IO Int32
B.Properties.getObjectPropertyInt32 o
obj String
"runner-tx-balancer-interval"
setSettingTeamRunnerTxBalancerInterval :: (MonadIO m, IsSettingTeam o) => o -> Int32 -> m ()
setSettingTeamRunnerTxBalancerInterval :: forall (m :: * -> *) o.
(MonadIO m, IsSettingTeam o) =>
o -> Int32 -> m ()
setSettingTeamRunnerTxBalancerInterval o
obj Int32
val = IO () -> m ()
forall a. IO a -> m a
forall (m :: * -> *) a. MonadIO m => IO a -> m a
MIO.liftIO (IO () -> m ()) -> IO () -> m ()
forall a b. (a -> b) -> a -> b
$ do
o -> String -> Int32 -> IO ()
forall a. GObject a => a -> String -> Int32 -> IO ()
B.Properties.setObjectPropertyInt32 o
obj String
"runner-tx-balancer-interval" Int32
val
constructSettingTeamRunnerTxBalancerInterval :: (IsSettingTeam o, MIO.MonadIO m) => Int32 -> m (GValueConstruct o)
constructSettingTeamRunnerTxBalancerInterval :: forall o (m :: * -> *).
(IsSettingTeam o, MonadIO m) =>
Int32 -> m (GValueConstruct o)
constructSettingTeamRunnerTxBalancerInterval Int32
val = IO (GValueConstruct o) -> m (GValueConstruct o)
forall a. IO a -> m a
forall (m :: * -> *) a. MonadIO m => IO a -> m a
MIO.liftIO (IO (GValueConstruct o) -> m (GValueConstruct o))
-> IO (GValueConstruct o) -> m (GValueConstruct o)
forall a b. (a -> b) -> a -> b
$ do
IO (GValueConstruct o) -> IO (GValueConstruct o)
forall a. IO a -> IO a
forall (m :: * -> *) a. MonadIO m => IO a -> m a
MIO.liftIO (IO (GValueConstruct o) -> IO (GValueConstruct o))
-> IO (GValueConstruct o) -> IO (GValueConstruct o)
forall a b. (a -> b) -> a -> b
$ String -> Int32 -> IO (GValueConstruct o)
forall o. String -> Int32 -> IO (GValueConstruct o)
B.Properties.constructObjectPropertyInt32 String
"runner-tx-balancer-interval" Int32
val
#if defined(ENABLE_OVERLOADING)
data SettingTeamRunnerTxBalancerIntervalPropertyInfo
instance AttrInfo SettingTeamRunnerTxBalancerIntervalPropertyInfo where
type AttrAllowedOps SettingTeamRunnerTxBalancerIntervalPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]
type AttrBaseTypeConstraint SettingTeamRunnerTxBalancerIntervalPropertyInfo = IsSettingTeam
type AttrSetTypeConstraint SettingTeamRunnerTxBalancerIntervalPropertyInfo = (~) Int32
type AttrTransferTypeConstraint SettingTeamRunnerTxBalancerIntervalPropertyInfo = (~) Int32
type AttrTransferType SettingTeamRunnerTxBalancerIntervalPropertyInfo = Int32
type AttrGetType SettingTeamRunnerTxBalancerIntervalPropertyInfo = Int32
type AttrLabel SettingTeamRunnerTxBalancerIntervalPropertyInfo = "runner-tx-balancer-interval"
type AttrOrigin SettingTeamRunnerTxBalancerIntervalPropertyInfo = SettingTeam
attrGet = getSettingTeamRunnerTxBalancerInterval
attrSet = setSettingTeamRunnerTxBalancerInterval
attrTransfer _ v = do
return v
attrConstruct = constructSettingTeamRunnerTxBalancerInterval
attrClear = undefined
dbgAttrInfo = P.Just (O.ResolvedSymbolInfo {
O.resolvedSymbolName = "GI.NM.Objects.SettingTeam.runnerTxBalancerInterval"
, O.resolvedSymbolURL = "https://hackage.haskell.org/package/gi-nm-1.0.1/docs/GI-NM-Objects-SettingTeam.html#g:attr:runnerTxBalancerInterval"
})
#endif
getSettingTeamRunnerTxHash :: (MonadIO m, IsSettingTeam o) => o -> m (Maybe [T.Text])
getSettingTeamRunnerTxHash :: forall (m :: * -> *) o.
(MonadIO m, IsSettingTeam o) =>
o -> m (Maybe [Text])
getSettingTeamRunnerTxHash o
obj = IO (Maybe [Text]) -> m (Maybe [Text])
forall a. IO a -> m a
forall (m :: * -> *) a. MonadIO m => IO a -> m a
MIO.liftIO (IO (Maybe [Text]) -> m (Maybe [Text]))
-> IO (Maybe [Text]) -> m (Maybe [Text])
forall a b. (a -> b) -> a -> b
$ o -> String -> IO (Maybe [Text])
forall a. GObject a => a -> String -> IO (Maybe [Text])
B.Properties.getObjectPropertyStringArray o
obj String
"runner-tx-hash"
setSettingTeamRunnerTxHash :: (MonadIO m, IsSettingTeam o) => o -> [T.Text] -> m ()
setSettingTeamRunnerTxHash :: forall (m :: * -> *) o.
(MonadIO m, IsSettingTeam o) =>
o -> [Text] -> m ()
setSettingTeamRunnerTxHash o
obj [Text]
val = IO () -> m ()
forall a. IO a -> m a
forall (m :: * -> *) a. MonadIO m => IO a -> m a
MIO.liftIO (IO () -> m ()) -> IO () -> m ()
forall a b. (a -> b) -> a -> b
$ do
o -> String -> Maybe [Text] -> IO ()
forall a. GObject a => a -> String -> Maybe [Text] -> IO ()
B.Properties.setObjectPropertyStringArray o
obj String
"runner-tx-hash" ([Text] -> Maybe [Text]
forall a. a -> Maybe a
Just [Text]
val)
constructSettingTeamRunnerTxHash :: (IsSettingTeam o, MIO.MonadIO m) => [T.Text] -> m (GValueConstruct o)
constructSettingTeamRunnerTxHash :: forall o (m :: * -> *).
(IsSettingTeam o, MonadIO m) =>
[Text] -> m (GValueConstruct o)
constructSettingTeamRunnerTxHash [Text]
val = IO (GValueConstruct o) -> m (GValueConstruct o)
forall a. IO a -> m a
forall (m :: * -> *) a. MonadIO m => IO a -> m a
MIO.liftIO (IO (GValueConstruct o) -> m (GValueConstruct o))
-> IO (GValueConstruct o) -> m (GValueConstruct o)
forall a b. (a -> b) -> a -> b
$ do
IO (GValueConstruct o) -> IO (GValueConstruct o)
forall a. IO a -> IO a
forall (m :: * -> *) a. MonadIO m => IO a -> m a
MIO.liftIO (IO (GValueConstruct o) -> IO (GValueConstruct o))
-> IO (GValueConstruct o) -> IO (GValueConstruct o)
forall a b. (a -> b) -> a -> b
$ String -> Maybe [Text] -> IO (GValueConstruct o)
forall o. String -> Maybe [Text] -> IO (GValueConstruct o)
B.Properties.constructObjectPropertyStringArray String
"runner-tx-hash" ([Text] -> Maybe [Text]
forall a. a -> Maybe a
P.Just [Text]
val)
clearSettingTeamRunnerTxHash :: (MonadIO m, IsSettingTeam o) => o -> m ()
clearSettingTeamRunnerTxHash :: forall (m :: * -> *) o. (MonadIO m, IsSettingTeam o) => o -> m ()
clearSettingTeamRunnerTxHash o
obj = 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
$ o -> String -> Maybe [Text] -> IO ()
forall a. GObject a => a -> String -> Maybe [Text] -> IO ()
B.Properties.setObjectPropertyStringArray o
obj String
"runner-tx-hash" (Maybe [Text]
forall a. Maybe a
Nothing :: Maybe [T.Text])
#if defined(ENABLE_OVERLOADING)
data SettingTeamRunnerTxHashPropertyInfo
instance AttrInfo SettingTeamRunnerTxHashPropertyInfo where
type AttrAllowedOps SettingTeamRunnerTxHashPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet, 'AttrClear]
type AttrBaseTypeConstraint SettingTeamRunnerTxHashPropertyInfo = IsSettingTeam
type AttrSetTypeConstraint SettingTeamRunnerTxHashPropertyInfo = (~) [T.Text]
type AttrTransferTypeConstraint SettingTeamRunnerTxHashPropertyInfo = (~) [T.Text]
type AttrTransferType SettingTeamRunnerTxHashPropertyInfo = [T.Text]
type AttrGetType SettingTeamRunnerTxHashPropertyInfo = (Maybe [T.Text])
type AttrLabel SettingTeamRunnerTxHashPropertyInfo = "runner-tx-hash"
type AttrOrigin SettingTeamRunnerTxHashPropertyInfo = SettingTeam
attrGet = getSettingTeamRunnerTxHash
attrSet = setSettingTeamRunnerTxHash
attrTransfer _ v = do
return v
attrConstruct = constructSettingTeamRunnerTxHash
attrClear = clearSettingTeamRunnerTxHash
dbgAttrInfo = P.Just (O.ResolvedSymbolInfo {
O.resolvedSymbolName = "GI.NM.Objects.SettingTeam.runnerTxHash"
, O.resolvedSymbolURL = "https://hackage.haskell.org/package/gi-nm-1.0.1/docs/GI-NM-Objects-SettingTeam.html#g:attr:runnerTxHash"
})
#endif
#if defined(ENABLE_OVERLOADING)
instance O.HasAttributeList SettingTeam
type instance O.AttributeList SettingTeam = SettingTeamAttributeList
type SettingTeamAttributeList = ('[ '("config", SettingTeamConfigPropertyInfo), '("linkWatchers", SettingTeamLinkWatchersPropertyInfo), '("mcastRejoinCount", SettingTeamMcastRejoinCountPropertyInfo), '("mcastRejoinInterval", SettingTeamMcastRejoinIntervalPropertyInfo), '("name", NM.Setting.SettingNamePropertyInfo), '("notifyPeersCount", SettingTeamNotifyPeersCountPropertyInfo), '("notifyPeersInterval", SettingTeamNotifyPeersIntervalPropertyInfo), '("runner", SettingTeamRunnerPropertyInfo), '("runnerActive", SettingTeamRunnerActivePropertyInfo), '("runnerAggSelectPolicy", SettingTeamRunnerAggSelectPolicyPropertyInfo), '("runnerFastRate", SettingTeamRunnerFastRatePropertyInfo), '("runnerHwaddrPolicy", SettingTeamRunnerHwaddrPolicyPropertyInfo), '("runnerMinPorts", SettingTeamRunnerMinPortsPropertyInfo), '("runnerSysPrio", SettingTeamRunnerSysPrioPropertyInfo), '("runnerTxBalancer", SettingTeamRunnerTxBalancerPropertyInfo), '("runnerTxBalancerInterval", SettingTeamRunnerTxBalancerIntervalPropertyInfo), '("runnerTxHash", SettingTeamRunnerTxHashPropertyInfo)] :: [(Symbol, DK.Type)])
#endif
#if defined(ENABLE_OVERLOADING)
settingTeamConfig :: AttrLabelProxy "config"
settingTeamConfig = AttrLabelProxy
settingTeamLinkWatchers :: AttrLabelProxy "linkWatchers"
settingTeamLinkWatchers = AttrLabelProxy
settingTeamMcastRejoinCount :: AttrLabelProxy "mcastRejoinCount"
settingTeamMcastRejoinCount = AttrLabelProxy
settingTeamMcastRejoinInterval :: AttrLabelProxy "mcastRejoinInterval"
settingTeamMcastRejoinInterval = AttrLabelProxy
settingTeamNotifyPeersCount :: AttrLabelProxy "notifyPeersCount"
settingTeamNotifyPeersCount = AttrLabelProxy
settingTeamNotifyPeersInterval :: AttrLabelProxy "notifyPeersInterval"
settingTeamNotifyPeersInterval = AttrLabelProxy
settingTeamRunner :: AttrLabelProxy "runner"
settingTeamRunner = AttrLabelProxy
settingTeamRunnerActive :: AttrLabelProxy "runnerActive"
settingTeamRunnerActive = AttrLabelProxy
settingTeamRunnerAggSelectPolicy :: AttrLabelProxy "runnerAggSelectPolicy"
settingTeamRunnerAggSelectPolicy = AttrLabelProxy
settingTeamRunnerFastRate :: AttrLabelProxy "runnerFastRate"
settingTeamRunnerFastRate = AttrLabelProxy
settingTeamRunnerHwaddrPolicy :: AttrLabelProxy "runnerHwaddrPolicy"
settingTeamRunnerHwaddrPolicy = AttrLabelProxy
settingTeamRunnerMinPorts :: AttrLabelProxy "runnerMinPorts"
settingTeamRunnerMinPorts = AttrLabelProxy
settingTeamRunnerSysPrio :: AttrLabelProxy "runnerSysPrio"
settingTeamRunnerSysPrio = AttrLabelProxy
settingTeamRunnerTxBalancer :: AttrLabelProxy "runnerTxBalancer"
settingTeamRunnerTxBalancer = AttrLabelProxy
settingTeamRunnerTxBalancerInterval :: AttrLabelProxy "runnerTxBalancerInterval"
settingTeamRunnerTxBalancerInterval = AttrLabelProxy
settingTeamRunnerTxHash :: AttrLabelProxy "runnerTxHash"
settingTeamRunnerTxHash = AttrLabelProxy
#endif
#if defined(ENABLE_OVERLOADING)
type instance O.SignalList SettingTeam = SettingTeamSignalList
type SettingTeamSignalList = ('[ '("notify", GObject.Object.ObjectNotifySignalInfo)] :: [(Symbol, DK.Type)])
#endif
foreign import ccall "nm_setting_team_new" nm_setting_team_new ::
IO (Ptr SettingTeam)
settingTeamNew ::
(B.CallStack.HasCallStack, MonadIO m) =>
m SettingTeam
settingTeamNew :: forall (m :: * -> *). (HasCallStack, MonadIO m) => m SettingTeam
settingTeamNew = IO SettingTeam -> m SettingTeam
forall a. IO a -> m a
forall (m :: * -> *) a. MonadIO m => IO a -> m a
liftIO (IO SettingTeam -> m SettingTeam)
-> IO SettingTeam -> m SettingTeam
forall a b. (a -> b) -> a -> b
$ do
Ptr SettingTeam
result <- IO (Ptr SettingTeam)
nm_setting_team_new
Text -> Ptr SettingTeam -> IO ()
forall a. HasCallStack => Text -> Ptr a -> IO ()
checkUnexpectedReturnNULL Text
"settingTeamNew" Ptr SettingTeam
result
SettingTeam
result' <- ((ManagedPtr SettingTeam -> SettingTeam)
-> Ptr SettingTeam -> IO SettingTeam
forall a b.
(HasCallStack, GObject a, GObject b) =>
(ManagedPtr a -> a) -> Ptr b -> IO a
wrapObject ManagedPtr SettingTeam -> SettingTeam
SettingTeam) Ptr SettingTeam
result
SettingTeam -> IO SettingTeam
forall a. a -> IO a
forall (m :: * -> *) a. Monad m => a -> m a
return SettingTeam
result'
#if defined(ENABLE_OVERLOADING)
#endif
foreign import ccall "nm_setting_team_add_link_watcher" nm_setting_team_add_link_watcher ::
Ptr SettingTeam ->
Ptr NM.TeamLinkWatcher.TeamLinkWatcher ->
IO CInt
settingTeamAddLinkWatcher ::
(B.CallStack.HasCallStack, MonadIO m, IsSettingTeam a) =>
a
-> NM.TeamLinkWatcher.TeamLinkWatcher
-> m Bool
settingTeamAddLinkWatcher :: forall (m :: * -> *) a.
(HasCallStack, MonadIO m, IsSettingTeam a) =>
a -> TeamLinkWatcher -> m Bool
settingTeamAddLinkWatcher a
setting TeamLinkWatcher
linkWatcher = 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 SettingTeam
setting' <- a -> IO (Ptr SettingTeam)
forall a b. (HasCallStack, ManagedPtrNewtype a) => a -> IO (Ptr b)
unsafeManagedPtrCastPtr a
setting
Ptr TeamLinkWatcher
linkWatcher' <- TeamLinkWatcher -> IO (Ptr TeamLinkWatcher)
forall a. (HasCallStack, ManagedPtrNewtype a) => a -> IO (Ptr a)
unsafeManagedPtrGetPtr TeamLinkWatcher
linkWatcher
CInt
result <- Ptr SettingTeam -> Ptr TeamLinkWatcher -> IO CInt
nm_setting_team_add_link_watcher Ptr SettingTeam
setting' Ptr TeamLinkWatcher
linkWatcher'
let result' :: Bool
result' = (CInt -> CInt -> Bool
forall a. Eq a => a -> a -> Bool
/= CInt
0) CInt
result
a -> IO ()
forall a. ManagedPtrNewtype a => a -> IO ()
touchManagedPtr a
setting
TeamLinkWatcher -> IO ()
forall a. ManagedPtrNewtype a => a -> IO ()
touchManagedPtr TeamLinkWatcher
linkWatcher
Bool -> IO Bool
forall a. a -> IO a
forall (m :: * -> *) a. Monad m => a -> m a
return Bool
result'
#if defined(ENABLE_OVERLOADING)
data SettingTeamAddLinkWatcherMethodInfo
instance (signature ~ (NM.TeamLinkWatcher.TeamLinkWatcher -> m Bool), MonadIO m, IsSettingTeam a) => O.OverloadedMethod SettingTeamAddLinkWatcherMethodInfo a signature where
overloadedMethod = settingTeamAddLinkWatcher
instance O.OverloadedMethodInfo SettingTeamAddLinkWatcherMethodInfo a where
overloadedMethodInfo = P.Just (O.ResolvedSymbolInfo {
O.resolvedSymbolName = "GI.NM.Objects.SettingTeam.settingTeamAddLinkWatcher",
O.resolvedSymbolURL = "https://hackage.haskell.org/package/gi-nm-1.0.1/docs/GI-NM-Objects-SettingTeam.html#v:settingTeamAddLinkWatcher"
})
#endif
foreign import ccall "nm_setting_team_add_runner_tx_hash" nm_setting_team_add_runner_tx_hash ::
Ptr SettingTeam ->
CString ->
IO CInt
settingTeamAddRunnerTxHash ::
(B.CallStack.HasCallStack, MonadIO m, IsSettingTeam a) =>
a
-> T.Text
-> m Bool
settingTeamAddRunnerTxHash :: forall (m :: * -> *) a.
(HasCallStack, MonadIO m, IsSettingTeam a) =>
a -> Text -> m Bool
settingTeamAddRunnerTxHash a
setting Text
txhash = 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 SettingTeam
setting' <- a -> IO (Ptr SettingTeam)
forall a b. (HasCallStack, ManagedPtrNewtype a) => a -> IO (Ptr b)
unsafeManagedPtrCastPtr a
setting
CString
txhash' <- Text -> IO CString
textToCString Text
txhash
CInt
result <- Ptr SettingTeam -> CString -> IO CInt
nm_setting_team_add_runner_tx_hash Ptr SettingTeam
setting' CString
txhash'
let result' :: Bool
result' = (CInt -> CInt -> Bool
forall a. Eq a => a -> a -> Bool
/= CInt
0) CInt
result
a -> IO ()
forall a. ManagedPtrNewtype a => a -> IO ()
touchManagedPtr a
setting
CString -> IO ()
forall a. Ptr a -> IO ()
freeMem CString
txhash'
Bool -> IO Bool
forall a. a -> IO a
forall (m :: * -> *) a. Monad m => a -> m a
return Bool
result'
#if defined(ENABLE_OVERLOADING)
data SettingTeamAddRunnerTxHashMethodInfo
instance (signature ~ (T.Text -> m Bool), MonadIO m, IsSettingTeam a) => O.OverloadedMethod SettingTeamAddRunnerTxHashMethodInfo a signature where
overloadedMethod = settingTeamAddRunnerTxHash
instance O.OverloadedMethodInfo SettingTeamAddRunnerTxHashMethodInfo a where
overloadedMethodInfo = P.Just (O.ResolvedSymbolInfo {
O.resolvedSymbolName = "GI.NM.Objects.SettingTeam.settingTeamAddRunnerTxHash",
O.resolvedSymbolURL = "https://hackage.haskell.org/package/gi-nm-1.0.1/docs/GI-NM-Objects-SettingTeam.html#v:settingTeamAddRunnerTxHash"
})
#endif
foreign import ccall "nm_setting_team_clear_link_watchers" nm_setting_team_clear_link_watchers ::
Ptr SettingTeam ->
IO ()
settingTeamClearLinkWatchers ::
(B.CallStack.HasCallStack, MonadIO m, IsSettingTeam a) =>
a
-> m ()
settingTeamClearLinkWatchers :: forall (m :: * -> *) a.
(HasCallStack, MonadIO m, IsSettingTeam a) =>
a -> m ()
settingTeamClearLinkWatchers a
setting = 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 SettingTeam
setting' <- a -> IO (Ptr SettingTeam)
forall a b. (HasCallStack, ManagedPtrNewtype a) => a -> IO (Ptr b)
unsafeManagedPtrCastPtr a
setting
Ptr SettingTeam -> IO ()
nm_setting_team_clear_link_watchers Ptr SettingTeam
setting'
a -> IO ()
forall a. ManagedPtrNewtype a => a -> IO ()
touchManagedPtr a
setting
() -> IO ()
forall a. a -> IO a
forall (m :: * -> *) a. Monad m => a -> m a
return ()
#if defined(ENABLE_OVERLOADING)
data SettingTeamClearLinkWatchersMethodInfo
instance (signature ~ (m ()), MonadIO m, IsSettingTeam a) => O.OverloadedMethod SettingTeamClearLinkWatchersMethodInfo a signature where
overloadedMethod = settingTeamClearLinkWatchers
instance O.OverloadedMethodInfo SettingTeamClearLinkWatchersMethodInfo a where
overloadedMethodInfo = P.Just (O.ResolvedSymbolInfo {
O.resolvedSymbolName = "GI.NM.Objects.SettingTeam.settingTeamClearLinkWatchers",
O.resolvedSymbolURL = "https://hackage.haskell.org/package/gi-nm-1.0.1/docs/GI-NM-Objects-SettingTeam.html#v:settingTeamClearLinkWatchers"
})
#endif
foreign import ccall "nm_setting_team_get_config" nm_setting_team_get_config ::
Ptr SettingTeam ->
IO CString
settingTeamGetConfig ::
(B.CallStack.HasCallStack, MonadIO m, IsSettingTeam a) =>
a
-> m T.Text
settingTeamGetConfig :: forall (m :: * -> *) a.
(HasCallStack, MonadIO m, IsSettingTeam a) =>
a -> m Text
settingTeamGetConfig a
setting = IO Text -> m Text
forall a. IO a -> m a
forall (m :: * -> *) a. MonadIO m => IO a -> m a
liftIO (IO Text -> m Text) -> IO Text -> m Text
forall a b. (a -> b) -> a -> b
$ do
Ptr SettingTeam
setting' <- a -> IO (Ptr SettingTeam)
forall a b. (HasCallStack, ManagedPtrNewtype a) => a -> IO (Ptr b)
unsafeManagedPtrCastPtr a
setting
CString
result <- Ptr SettingTeam -> IO CString
nm_setting_team_get_config Ptr SettingTeam
setting'
Text -> CString -> IO ()
forall a. HasCallStack => Text -> Ptr a -> IO ()
checkUnexpectedReturnNULL Text
"settingTeamGetConfig" CString
result
Text
result' <- HasCallStack => CString -> IO Text
CString -> IO Text
cstringToText CString
result
a -> IO ()
forall a. ManagedPtrNewtype a => a -> IO ()
touchManagedPtr a
setting
Text -> IO Text
forall a. a -> IO a
forall (m :: * -> *) a. Monad m => a -> m a
return Text
result'
#if defined(ENABLE_OVERLOADING)
data SettingTeamGetConfigMethodInfo
instance (signature ~ (m T.Text), MonadIO m, IsSettingTeam a) => O.OverloadedMethod SettingTeamGetConfigMethodInfo a signature where
overloadedMethod = settingTeamGetConfig
instance O.OverloadedMethodInfo SettingTeamGetConfigMethodInfo a where
overloadedMethodInfo = P.Just (O.ResolvedSymbolInfo {
O.resolvedSymbolName = "GI.NM.Objects.SettingTeam.settingTeamGetConfig",
O.resolvedSymbolURL = "https://hackage.haskell.org/package/gi-nm-1.0.1/docs/GI-NM-Objects-SettingTeam.html#v:settingTeamGetConfig"
})
#endif
foreign import ccall "nm_setting_team_get_link_watcher" nm_setting_team_get_link_watcher ::
Ptr SettingTeam ->
Word32 ->
IO (Ptr NM.TeamLinkWatcher.TeamLinkWatcher)
settingTeamGetLinkWatcher ::
(B.CallStack.HasCallStack, MonadIO m, IsSettingTeam a) =>
a
-> Word32
-> m NM.TeamLinkWatcher.TeamLinkWatcher
settingTeamGetLinkWatcher :: forall (m :: * -> *) a.
(HasCallStack, MonadIO m, IsSettingTeam a) =>
a -> Word32 -> m TeamLinkWatcher
settingTeamGetLinkWatcher a
setting Word32
idx = IO TeamLinkWatcher -> m TeamLinkWatcher
forall a. IO a -> m a
forall (m :: * -> *) a. MonadIO m => IO a -> m a
liftIO (IO TeamLinkWatcher -> m TeamLinkWatcher)
-> IO TeamLinkWatcher -> m TeamLinkWatcher
forall a b. (a -> b) -> a -> b
$ do
Ptr SettingTeam
setting' <- a -> IO (Ptr SettingTeam)
forall a b. (HasCallStack, ManagedPtrNewtype a) => a -> IO (Ptr b)
unsafeManagedPtrCastPtr a
setting
Ptr TeamLinkWatcher
result <- Ptr SettingTeam -> Word32 -> IO (Ptr TeamLinkWatcher)
nm_setting_team_get_link_watcher Ptr SettingTeam
setting' Word32
idx
Text -> Ptr TeamLinkWatcher -> IO ()
forall a. HasCallStack => Text -> Ptr a -> IO ()
checkUnexpectedReturnNULL Text
"settingTeamGetLinkWatcher" Ptr TeamLinkWatcher
result
TeamLinkWatcher
result' <- ((ManagedPtr TeamLinkWatcher -> TeamLinkWatcher)
-> Ptr TeamLinkWatcher -> IO TeamLinkWatcher
forall a.
(HasCallStack, GBoxed a) =>
(ManagedPtr a -> a) -> Ptr a -> IO a
newBoxed ManagedPtr TeamLinkWatcher -> TeamLinkWatcher
NM.TeamLinkWatcher.TeamLinkWatcher) Ptr TeamLinkWatcher
result
a -> IO ()
forall a. ManagedPtrNewtype a => a -> IO ()
touchManagedPtr a
setting
TeamLinkWatcher -> IO TeamLinkWatcher
forall a. a -> IO a
forall (m :: * -> *) a. Monad m => a -> m a
return TeamLinkWatcher
result'
#if defined(ENABLE_OVERLOADING)
data SettingTeamGetLinkWatcherMethodInfo
instance (signature ~ (Word32 -> m NM.TeamLinkWatcher.TeamLinkWatcher), MonadIO m, IsSettingTeam a) => O.OverloadedMethod SettingTeamGetLinkWatcherMethodInfo a signature where
overloadedMethod = settingTeamGetLinkWatcher
instance O.OverloadedMethodInfo SettingTeamGetLinkWatcherMethodInfo a where
overloadedMethodInfo = P.Just (O.ResolvedSymbolInfo {
O.resolvedSymbolName = "GI.NM.Objects.SettingTeam.settingTeamGetLinkWatcher",
O.resolvedSymbolURL = "https://hackage.haskell.org/package/gi-nm-1.0.1/docs/GI-NM-Objects-SettingTeam.html#v:settingTeamGetLinkWatcher"
})
#endif
foreign import ccall "nm_setting_team_get_mcast_rejoin_count" nm_setting_team_get_mcast_rejoin_count ::
Ptr SettingTeam ->
IO Int32
settingTeamGetMcastRejoinCount ::
(B.CallStack.HasCallStack, MonadIO m, IsSettingTeam a) =>
a
-> m Int32
settingTeamGetMcastRejoinCount :: forall (m :: * -> *) a.
(HasCallStack, MonadIO m, IsSettingTeam a) =>
a -> m Int32
settingTeamGetMcastRejoinCount a
setting = IO Int32 -> m Int32
forall a. IO a -> m a
forall (m :: * -> *) a. MonadIO m => IO a -> m a
liftIO (IO Int32 -> m Int32) -> IO Int32 -> m Int32
forall a b. (a -> b) -> a -> b
$ do
Ptr SettingTeam
setting' <- a -> IO (Ptr SettingTeam)
forall a b. (HasCallStack, ManagedPtrNewtype a) => a -> IO (Ptr b)
unsafeManagedPtrCastPtr a
setting
Int32
result <- Ptr SettingTeam -> IO Int32
nm_setting_team_get_mcast_rejoin_count Ptr SettingTeam
setting'
a -> IO ()
forall a. ManagedPtrNewtype a => a -> IO ()
touchManagedPtr a
setting
Int32 -> IO Int32
forall a. a -> IO a
forall (m :: * -> *) a. Monad m => a -> m a
return Int32
result
#if defined(ENABLE_OVERLOADING)
data SettingTeamGetMcastRejoinCountMethodInfo
instance (signature ~ (m Int32), MonadIO m, IsSettingTeam a) => O.OverloadedMethod SettingTeamGetMcastRejoinCountMethodInfo a signature where
overloadedMethod = settingTeamGetMcastRejoinCount
instance O.OverloadedMethodInfo SettingTeamGetMcastRejoinCountMethodInfo a where
overloadedMethodInfo = P.Just (O.ResolvedSymbolInfo {
O.resolvedSymbolName = "GI.NM.Objects.SettingTeam.settingTeamGetMcastRejoinCount",
O.resolvedSymbolURL = "https://hackage.haskell.org/package/gi-nm-1.0.1/docs/GI-NM-Objects-SettingTeam.html#v:settingTeamGetMcastRejoinCount"
})
#endif
foreign import ccall "nm_setting_team_get_mcast_rejoin_interval" nm_setting_team_get_mcast_rejoin_interval ::
Ptr SettingTeam ->
IO Int32
settingTeamGetMcastRejoinInterval ::
(B.CallStack.HasCallStack, MonadIO m, IsSettingTeam a) =>
a
-> m Int32
settingTeamGetMcastRejoinInterval :: forall (m :: * -> *) a.
(HasCallStack, MonadIO m, IsSettingTeam a) =>
a -> m Int32
settingTeamGetMcastRejoinInterval a
setting = IO Int32 -> m Int32
forall a. IO a -> m a
forall (m :: * -> *) a. MonadIO m => IO a -> m a
liftIO (IO Int32 -> m Int32) -> IO Int32 -> m Int32
forall a b. (a -> b) -> a -> b
$ do
Ptr SettingTeam
setting' <- a -> IO (Ptr SettingTeam)
forall a b. (HasCallStack, ManagedPtrNewtype a) => a -> IO (Ptr b)
unsafeManagedPtrCastPtr a
setting
Int32
result <- Ptr SettingTeam -> IO Int32
nm_setting_team_get_mcast_rejoin_interval Ptr SettingTeam
setting'
a -> IO ()
forall a. ManagedPtrNewtype a => a -> IO ()
touchManagedPtr a
setting
Int32 -> IO Int32
forall a. a -> IO a
forall (m :: * -> *) a. Monad m => a -> m a
return Int32
result
#if defined(ENABLE_OVERLOADING)
data SettingTeamGetMcastRejoinIntervalMethodInfo
instance (signature ~ (m Int32), MonadIO m, IsSettingTeam a) => O.OverloadedMethod SettingTeamGetMcastRejoinIntervalMethodInfo a signature where
overloadedMethod = settingTeamGetMcastRejoinInterval
instance O.OverloadedMethodInfo SettingTeamGetMcastRejoinIntervalMethodInfo a where
overloadedMethodInfo = P.Just (O.ResolvedSymbolInfo {
O.resolvedSymbolName = "GI.NM.Objects.SettingTeam.settingTeamGetMcastRejoinInterval",
O.resolvedSymbolURL = "https://hackage.haskell.org/package/gi-nm-1.0.1/docs/GI-NM-Objects-SettingTeam.html#v:settingTeamGetMcastRejoinInterval"
})
#endif
foreign import ccall "nm_setting_team_get_notify_peers_count" nm_setting_team_get_notify_peers_count ::
Ptr SettingTeam ->
IO Int32
settingTeamGetNotifyPeersCount ::
(B.CallStack.HasCallStack, MonadIO m, IsSettingTeam a) =>
a
-> m Int32
settingTeamGetNotifyPeersCount :: forall (m :: * -> *) a.
(HasCallStack, MonadIO m, IsSettingTeam a) =>
a -> m Int32
settingTeamGetNotifyPeersCount a
setting = IO Int32 -> m Int32
forall a. IO a -> m a
forall (m :: * -> *) a. MonadIO m => IO a -> m a
liftIO (IO Int32 -> m Int32) -> IO Int32 -> m Int32
forall a b. (a -> b) -> a -> b
$ do
Ptr SettingTeam
setting' <- a -> IO (Ptr SettingTeam)
forall a b. (HasCallStack, ManagedPtrNewtype a) => a -> IO (Ptr b)
unsafeManagedPtrCastPtr a
setting
Int32
result <- Ptr SettingTeam -> IO Int32
nm_setting_team_get_notify_peers_count Ptr SettingTeam
setting'
a -> IO ()
forall a. ManagedPtrNewtype a => a -> IO ()
touchManagedPtr a
setting
Int32 -> IO Int32
forall a. a -> IO a
forall (m :: * -> *) a. Monad m => a -> m a
return Int32
result
#if defined(ENABLE_OVERLOADING)
data SettingTeamGetNotifyPeersCountMethodInfo
instance (signature ~ (m Int32), MonadIO m, IsSettingTeam a) => O.OverloadedMethod SettingTeamGetNotifyPeersCountMethodInfo a signature where
overloadedMethod = settingTeamGetNotifyPeersCount
instance O.OverloadedMethodInfo SettingTeamGetNotifyPeersCountMethodInfo a where
overloadedMethodInfo = P.Just (O.ResolvedSymbolInfo {
O.resolvedSymbolName = "GI.NM.Objects.SettingTeam.settingTeamGetNotifyPeersCount",
O.resolvedSymbolURL = "https://hackage.haskell.org/package/gi-nm-1.0.1/docs/GI-NM-Objects-SettingTeam.html#v:settingTeamGetNotifyPeersCount"
})
#endif
foreign import ccall "nm_setting_team_get_notify_peers_interval" nm_setting_team_get_notify_peers_interval ::
Ptr SettingTeam ->
IO Int32
settingTeamGetNotifyPeersInterval ::
(B.CallStack.HasCallStack, MonadIO m, IsSettingTeam a) =>
a
-> m Int32
settingTeamGetNotifyPeersInterval :: forall (m :: * -> *) a.
(HasCallStack, MonadIO m, IsSettingTeam a) =>
a -> m Int32
settingTeamGetNotifyPeersInterval a
setting = IO Int32 -> m Int32
forall a. IO a -> m a
forall (m :: * -> *) a. MonadIO m => IO a -> m a
liftIO (IO Int32 -> m Int32) -> IO Int32 -> m Int32
forall a b. (a -> b) -> a -> b
$ do
Ptr SettingTeam
setting' <- a -> IO (Ptr SettingTeam)
forall a b. (HasCallStack, ManagedPtrNewtype a) => a -> IO (Ptr b)
unsafeManagedPtrCastPtr a
setting
Int32
result <- Ptr SettingTeam -> IO Int32
nm_setting_team_get_notify_peers_interval Ptr SettingTeam
setting'
a -> IO ()
forall a. ManagedPtrNewtype a => a -> IO ()
touchManagedPtr a
setting
Int32 -> IO Int32
forall a. a -> IO a
forall (m :: * -> *) a. Monad m => a -> m a
return Int32
result
#if defined(ENABLE_OVERLOADING)
data SettingTeamGetNotifyPeersIntervalMethodInfo
instance (signature ~ (m Int32), MonadIO m, IsSettingTeam a) => O.OverloadedMethod SettingTeamGetNotifyPeersIntervalMethodInfo a signature where
overloadedMethod = settingTeamGetNotifyPeersInterval
instance O.OverloadedMethodInfo SettingTeamGetNotifyPeersIntervalMethodInfo a where
overloadedMethodInfo = P.Just (O.ResolvedSymbolInfo {
O.resolvedSymbolName = "GI.NM.Objects.SettingTeam.settingTeamGetNotifyPeersInterval",
O.resolvedSymbolURL = "https://hackage.haskell.org/package/gi-nm-1.0.1/docs/GI-NM-Objects-SettingTeam.html#v:settingTeamGetNotifyPeersInterval"
})
#endif
foreign import ccall "nm_setting_team_get_num_link_watchers" nm_setting_team_get_num_link_watchers ::
Ptr SettingTeam ->
IO Word32
settingTeamGetNumLinkWatchers ::
(B.CallStack.HasCallStack, MonadIO m, IsSettingTeam a) =>
a
-> m Word32
settingTeamGetNumLinkWatchers :: forall (m :: * -> *) a.
(HasCallStack, MonadIO m, IsSettingTeam a) =>
a -> m Word32
settingTeamGetNumLinkWatchers a
setting = IO Word32 -> m Word32
forall a. IO a -> m a
forall (m :: * -> *) a. MonadIO m => IO a -> m a
liftIO (IO Word32 -> m Word32) -> IO Word32 -> m Word32
forall a b. (a -> b) -> a -> b
$ do
Ptr SettingTeam
setting' <- a -> IO (Ptr SettingTeam)
forall a b. (HasCallStack, ManagedPtrNewtype a) => a -> IO (Ptr b)
unsafeManagedPtrCastPtr a
setting
Word32
result <- Ptr SettingTeam -> IO Word32
nm_setting_team_get_num_link_watchers Ptr SettingTeam
setting'
a -> IO ()
forall a. ManagedPtrNewtype a => a -> IO ()
touchManagedPtr a
setting
Word32 -> IO Word32
forall a. a -> IO a
forall (m :: * -> *) a. Monad m => a -> m a
return Word32
result
#if defined(ENABLE_OVERLOADING)
data SettingTeamGetNumLinkWatchersMethodInfo
instance (signature ~ (m Word32), MonadIO m, IsSettingTeam a) => O.OverloadedMethod SettingTeamGetNumLinkWatchersMethodInfo a signature where
overloadedMethod = settingTeamGetNumLinkWatchers
instance O.OverloadedMethodInfo SettingTeamGetNumLinkWatchersMethodInfo a where
overloadedMethodInfo = P.Just (O.ResolvedSymbolInfo {
O.resolvedSymbolName = "GI.NM.Objects.SettingTeam.settingTeamGetNumLinkWatchers",
O.resolvedSymbolURL = "https://hackage.haskell.org/package/gi-nm-1.0.1/docs/GI-NM-Objects-SettingTeam.html#v:settingTeamGetNumLinkWatchers"
})
#endif
foreign import ccall "nm_setting_team_get_num_runner_tx_hash" nm_setting_team_get_num_runner_tx_hash ::
Ptr SettingTeam ->
IO Word32
settingTeamGetNumRunnerTxHash ::
(B.CallStack.HasCallStack, MonadIO m, IsSettingTeam a) =>
a
-> m Word32
settingTeamGetNumRunnerTxHash :: forall (m :: * -> *) a.
(HasCallStack, MonadIO m, IsSettingTeam a) =>
a -> m Word32
settingTeamGetNumRunnerTxHash a
setting = IO Word32 -> m Word32
forall a. IO a -> m a
forall (m :: * -> *) a. MonadIO m => IO a -> m a
liftIO (IO Word32 -> m Word32) -> IO Word32 -> m Word32
forall a b. (a -> b) -> a -> b
$ do
Ptr SettingTeam
setting' <- a -> IO (Ptr SettingTeam)
forall a b. (HasCallStack, ManagedPtrNewtype a) => a -> IO (Ptr b)
unsafeManagedPtrCastPtr a
setting
Word32
result <- Ptr SettingTeam -> IO Word32
nm_setting_team_get_num_runner_tx_hash Ptr SettingTeam
setting'
a -> IO ()
forall a. ManagedPtrNewtype a => a -> IO ()
touchManagedPtr a
setting
Word32 -> IO Word32
forall a. a -> IO a
forall (m :: * -> *) a. Monad m => a -> m a
return Word32
result
#if defined(ENABLE_OVERLOADING)
data SettingTeamGetNumRunnerTxHashMethodInfo
instance (signature ~ (m Word32), MonadIO m, IsSettingTeam a) => O.OverloadedMethod SettingTeamGetNumRunnerTxHashMethodInfo a signature where
overloadedMethod = settingTeamGetNumRunnerTxHash
instance O.OverloadedMethodInfo SettingTeamGetNumRunnerTxHashMethodInfo a where
overloadedMethodInfo = P.Just (O.ResolvedSymbolInfo {
O.resolvedSymbolName = "GI.NM.Objects.SettingTeam.settingTeamGetNumRunnerTxHash",
O.resolvedSymbolURL = "https://hackage.haskell.org/package/gi-nm-1.0.1/docs/GI-NM-Objects-SettingTeam.html#v:settingTeamGetNumRunnerTxHash"
})
#endif
foreign import ccall "nm_setting_team_get_runner" nm_setting_team_get_runner ::
Ptr SettingTeam ->
IO CString
settingTeamGetRunner ::
(B.CallStack.HasCallStack, MonadIO m, IsSettingTeam a) =>
a
-> m T.Text
settingTeamGetRunner :: forall (m :: * -> *) a.
(HasCallStack, MonadIO m, IsSettingTeam a) =>
a -> m Text
settingTeamGetRunner a
setting = IO Text -> m Text
forall a. IO a -> m a
forall (m :: * -> *) a. MonadIO m => IO a -> m a
liftIO (IO Text -> m Text) -> IO Text -> m Text
forall a b. (a -> b) -> a -> b
$ do
Ptr SettingTeam
setting' <- a -> IO (Ptr SettingTeam)
forall a b. (HasCallStack, ManagedPtrNewtype a) => a -> IO (Ptr b)
unsafeManagedPtrCastPtr a
setting
CString
result <- Ptr SettingTeam -> IO CString
nm_setting_team_get_runner Ptr SettingTeam
setting'
Text -> CString -> IO ()
forall a. HasCallStack => Text -> Ptr a -> IO ()
checkUnexpectedReturnNULL Text
"settingTeamGetRunner" CString
result
Text
result' <- HasCallStack => CString -> IO Text
CString -> IO Text
cstringToText CString
result
a -> IO ()
forall a. ManagedPtrNewtype a => a -> IO ()
touchManagedPtr a
setting
Text -> IO Text
forall a. a -> IO a
forall (m :: * -> *) a. Monad m => a -> m a
return Text
result'
#if defined(ENABLE_OVERLOADING)
data SettingTeamGetRunnerMethodInfo
instance (signature ~ (m T.Text), MonadIO m, IsSettingTeam a) => O.OverloadedMethod SettingTeamGetRunnerMethodInfo a signature where
overloadedMethod = settingTeamGetRunner
instance O.OverloadedMethodInfo SettingTeamGetRunnerMethodInfo a where
overloadedMethodInfo = P.Just (O.ResolvedSymbolInfo {
O.resolvedSymbolName = "GI.NM.Objects.SettingTeam.settingTeamGetRunner",
O.resolvedSymbolURL = "https://hackage.haskell.org/package/gi-nm-1.0.1/docs/GI-NM-Objects-SettingTeam.html#v:settingTeamGetRunner"
})
#endif
foreign import ccall "nm_setting_team_get_runner_active" nm_setting_team_get_runner_active ::
Ptr SettingTeam ->
IO CInt
settingTeamGetRunnerActive ::
(B.CallStack.HasCallStack, MonadIO m, IsSettingTeam a) =>
a
-> m Bool
settingTeamGetRunnerActive :: forall (m :: * -> *) a.
(HasCallStack, MonadIO m, IsSettingTeam a) =>
a -> m Bool
settingTeamGetRunnerActive a
setting = 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 SettingTeam
setting' <- a -> IO (Ptr SettingTeam)
forall a b. (HasCallStack, ManagedPtrNewtype a) => a -> IO (Ptr b)
unsafeManagedPtrCastPtr a
setting
CInt
result <- Ptr SettingTeam -> IO CInt
nm_setting_team_get_runner_active Ptr SettingTeam
setting'
let result' :: Bool
result' = (CInt -> CInt -> Bool
forall a. Eq a => a -> a -> Bool
/= CInt
0) CInt
result
a -> IO ()
forall a. ManagedPtrNewtype a => a -> IO ()
touchManagedPtr a
setting
Bool -> IO Bool
forall a. a -> IO a
forall (m :: * -> *) a. Monad m => a -> m a
return Bool
result'
#if defined(ENABLE_OVERLOADING)
data SettingTeamGetRunnerActiveMethodInfo
instance (signature ~ (m Bool), MonadIO m, IsSettingTeam a) => O.OverloadedMethod SettingTeamGetRunnerActiveMethodInfo a signature where
overloadedMethod = settingTeamGetRunnerActive
instance O.OverloadedMethodInfo SettingTeamGetRunnerActiveMethodInfo a where
overloadedMethodInfo = P.Just (O.ResolvedSymbolInfo {
O.resolvedSymbolName = "GI.NM.Objects.SettingTeam.settingTeamGetRunnerActive",
O.resolvedSymbolURL = "https://hackage.haskell.org/package/gi-nm-1.0.1/docs/GI-NM-Objects-SettingTeam.html#v:settingTeamGetRunnerActive"
})
#endif
foreign import ccall "nm_setting_team_get_runner_agg_select_policy" nm_setting_team_get_runner_agg_select_policy ::
Ptr SettingTeam ->
IO CString
settingTeamGetRunnerAggSelectPolicy ::
(B.CallStack.HasCallStack, MonadIO m, IsSettingTeam a) =>
a
-> m T.Text
settingTeamGetRunnerAggSelectPolicy :: forall (m :: * -> *) a.
(HasCallStack, MonadIO m, IsSettingTeam a) =>
a -> m Text
settingTeamGetRunnerAggSelectPolicy a
setting = IO Text -> m Text
forall a. IO a -> m a
forall (m :: * -> *) a. MonadIO m => IO a -> m a
liftIO (IO Text -> m Text) -> IO Text -> m Text
forall a b. (a -> b) -> a -> b
$ do
Ptr SettingTeam
setting' <- a -> IO (Ptr SettingTeam)
forall a b. (HasCallStack, ManagedPtrNewtype a) => a -> IO (Ptr b)
unsafeManagedPtrCastPtr a
setting
CString
result <- Ptr SettingTeam -> IO CString
nm_setting_team_get_runner_agg_select_policy Ptr SettingTeam
setting'
Text -> CString -> IO ()
forall a. HasCallStack => Text -> Ptr a -> IO ()
checkUnexpectedReturnNULL Text
"settingTeamGetRunnerAggSelectPolicy" CString
result
Text
result' <- HasCallStack => CString -> IO Text
CString -> IO Text
cstringToText CString
result
a -> IO ()
forall a. ManagedPtrNewtype a => a -> IO ()
touchManagedPtr a
setting
Text -> IO Text
forall a. a -> IO a
forall (m :: * -> *) a. Monad m => a -> m a
return Text
result'
#if defined(ENABLE_OVERLOADING)
data SettingTeamGetRunnerAggSelectPolicyMethodInfo
instance (signature ~ (m T.Text), MonadIO m, IsSettingTeam a) => O.OverloadedMethod SettingTeamGetRunnerAggSelectPolicyMethodInfo a signature where
overloadedMethod = settingTeamGetRunnerAggSelectPolicy
instance O.OverloadedMethodInfo SettingTeamGetRunnerAggSelectPolicyMethodInfo a where
overloadedMethodInfo = P.Just (O.ResolvedSymbolInfo {
O.resolvedSymbolName = "GI.NM.Objects.SettingTeam.settingTeamGetRunnerAggSelectPolicy",
O.resolvedSymbolURL = "https://hackage.haskell.org/package/gi-nm-1.0.1/docs/GI-NM-Objects-SettingTeam.html#v:settingTeamGetRunnerAggSelectPolicy"
})
#endif
foreign import ccall "nm_setting_team_get_runner_fast_rate" nm_setting_team_get_runner_fast_rate ::
Ptr SettingTeam ->
IO CInt
settingTeamGetRunnerFastRate ::
(B.CallStack.HasCallStack, MonadIO m, IsSettingTeam a) =>
a
-> m Bool
settingTeamGetRunnerFastRate :: forall (m :: * -> *) a.
(HasCallStack, MonadIO m, IsSettingTeam a) =>
a -> m Bool
settingTeamGetRunnerFastRate a
setting = 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 SettingTeam
setting' <- a -> IO (Ptr SettingTeam)
forall a b. (HasCallStack, ManagedPtrNewtype a) => a -> IO (Ptr b)
unsafeManagedPtrCastPtr a
setting
CInt
result <- Ptr SettingTeam -> IO CInt
nm_setting_team_get_runner_fast_rate Ptr SettingTeam
setting'
let result' :: Bool
result' = (CInt -> CInt -> Bool
forall a. Eq a => a -> a -> Bool
/= CInt
0) CInt
result
a -> IO ()
forall a. ManagedPtrNewtype a => a -> IO ()
touchManagedPtr a
setting
Bool -> IO Bool
forall a. a -> IO a
forall (m :: * -> *) a. Monad m => a -> m a
return Bool
result'
#if defined(ENABLE_OVERLOADING)
data SettingTeamGetRunnerFastRateMethodInfo
instance (signature ~ (m Bool), MonadIO m, IsSettingTeam a) => O.OverloadedMethod SettingTeamGetRunnerFastRateMethodInfo a signature where
overloadedMethod = settingTeamGetRunnerFastRate
instance O.OverloadedMethodInfo SettingTeamGetRunnerFastRateMethodInfo a where
overloadedMethodInfo = P.Just (O.ResolvedSymbolInfo {
O.resolvedSymbolName = "GI.NM.Objects.SettingTeam.settingTeamGetRunnerFastRate",
O.resolvedSymbolURL = "https://hackage.haskell.org/package/gi-nm-1.0.1/docs/GI-NM-Objects-SettingTeam.html#v:settingTeamGetRunnerFastRate"
})
#endif
foreign import ccall "nm_setting_team_get_runner_hwaddr_policy" nm_setting_team_get_runner_hwaddr_policy ::
Ptr SettingTeam ->
IO CString
settingTeamGetRunnerHwaddrPolicy ::
(B.CallStack.HasCallStack, MonadIO m, IsSettingTeam a) =>
a
-> m T.Text
settingTeamGetRunnerHwaddrPolicy :: forall (m :: * -> *) a.
(HasCallStack, MonadIO m, IsSettingTeam a) =>
a -> m Text
settingTeamGetRunnerHwaddrPolicy a
setting = IO Text -> m Text
forall a. IO a -> m a
forall (m :: * -> *) a. MonadIO m => IO a -> m a
liftIO (IO Text -> m Text) -> IO Text -> m Text
forall a b. (a -> b) -> a -> b
$ do
Ptr SettingTeam
setting' <- a -> IO (Ptr SettingTeam)
forall a b. (HasCallStack, ManagedPtrNewtype a) => a -> IO (Ptr b)
unsafeManagedPtrCastPtr a
setting
CString
result <- Ptr SettingTeam -> IO CString
nm_setting_team_get_runner_hwaddr_policy Ptr SettingTeam
setting'
Text -> CString -> IO ()
forall a. HasCallStack => Text -> Ptr a -> IO ()
checkUnexpectedReturnNULL Text
"settingTeamGetRunnerHwaddrPolicy" CString
result
Text
result' <- HasCallStack => CString -> IO Text
CString -> IO Text
cstringToText CString
result
a -> IO ()
forall a. ManagedPtrNewtype a => a -> IO ()
touchManagedPtr a
setting
Text -> IO Text
forall a. a -> IO a
forall (m :: * -> *) a. Monad m => a -> m a
return Text
result'
#if defined(ENABLE_OVERLOADING)
data SettingTeamGetRunnerHwaddrPolicyMethodInfo
instance (signature ~ (m T.Text), MonadIO m, IsSettingTeam a) => O.OverloadedMethod SettingTeamGetRunnerHwaddrPolicyMethodInfo a signature where
overloadedMethod = settingTeamGetRunnerHwaddrPolicy
instance O.OverloadedMethodInfo SettingTeamGetRunnerHwaddrPolicyMethodInfo a where
overloadedMethodInfo = P.Just (O.ResolvedSymbolInfo {
O.resolvedSymbolName = "GI.NM.Objects.SettingTeam.settingTeamGetRunnerHwaddrPolicy",
O.resolvedSymbolURL = "https://hackage.haskell.org/package/gi-nm-1.0.1/docs/GI-NM-Objects-SettingTeam.html#v:settingTeamGetRunnerHwaddrPolicy"
})
#endif
foreign import ccall "nm_setting_team_get_runner_min_ports" nm_setting_team_get_runner_min_ports ::
Ptr SettingTeam ->
IO Int32
settingTeamGetRunnerMinPorts ::
(B.CallStack.HasCallStack, MonadIO m, IsSettingTeam a) =>
a
-> m Int32
settingTeamGetRunnerMinPorts :: forall (m :: * -> *) a.
(HasCallStack, MonadIO m, IsSettingTeam a) =>
a -> m Int32
settingTeamGetRunnerMinPorts a
setting = IO Int32 -> m Int32
forall a. IO a -> m a
forall (m :: * -> *) a. MonadIO m => IO a -> m a
liftIO (IO Int32 -> m Int32) -> IO Int32 -> m Int32
forall a b. (a -> b) -> a -> b
$ do
Ptr SettingTeam
setting' <- a -> IO (Ptr SettingTeam)
forall a b. (HasCallStack, ManagedPtrNewtype a) => a -> IO (Ptr b)
unsafeManagedPtrCastPtr a
setting
Int32
result <- Ptr SettingTeam -> IO Int32
nm_setting_team_get_runner_min_ports Ptr SettingTeam
setting'
a -> IO ()
forall a. ManagedPtrNewtype a => a -> IO ()
touchManagedPtr a
setting
Int32 -> IO Int32
forall a. a -> IO a
forall (m :: * -> *) a. Monad m => a -> m a
return Int32
result
#if defined(ENABLE_OVERLOADING)
data SettingTeamGetRunnerMinPortsMethodInfo
instance (signature ~ (m Int32), MonadIO m, IsSettingTeam a) => O.OverloadedMethod SettingTeamGetRunnerMinPortsMethodInfo a signature where
overloadedMethod = settingTeamGetRunnerMinPorts
instance O.OverloadedMethodInfo SettingTeamGetRunnerMinPortsMethodInfo a where
overloadedMethodInfo = P.Just (O.ResolvedSymbolInfo {
O.resolvedSymbolName = "GI.NM.Objects.SettingTeam.settingTeamGetRunnerMinPorts",
O.resolvedSymbolURL = "https://hackage.haskell.org/package/gi-nm-1.0.1/docs/GI-NM-Objects-SettingTeam.html#v:settingTeamGetRunnerMinPorts"
})
#endif
foreign import ccall "nm_setting_team_get_runner_sys_prio" nm_setting_team_get_runner_sys_prio ::
Ptr SettingTeam ->
IO Int32
settingTeamGetRunnerSysPrio ::
(B.CallStack.HasCallStack, MonadIO m, IsSettingTeam a) =>
a
-> m Int32
settingTeamGetRunnerSysPrio :: forall (m :: * -> *) a.
(HasCallStack, MonadIO m, IsSettingTeam a) =>
a -> m Int32
settingTeamGetRunnerSysPrio a
setting = IO Int32 -> m Int32
forall a. IO a -> m a
forall (m :: * -> *) a. MonadIO m => IO a -> m a
liftIO (IO Int32 -> m Int32) -> IO Int32 -> m Int32
forall a b. (a -> b) -> a -> b
$ do
Ptr SettingTeam
setting' <- a -> IO (Ptr SettingTeam)
forall a b. (HasCallStack, ManagedPtrNewtype a) => a -> IO (Ptr b)
unsafeManagedPtrCastPtr a
setting
Int32
result <- Ptr SettingTeam -> IO Int32
nm_setting_team_get_runner_sys_prio Ptr SettingTeam
setting'
a -> IO ()
forall a. ManagedPtrNewtype a => a -> IO ()
touchManagedPtr a
setting
Int32 -> IO Int32
forall a. a -> IO a
forall (m :: * -> *) a. Monad m => a -> m a
return Int32
result
#if defined(ENABLE_OVERLOADING)
data SettingTeamGetRunnerSysPrioMethodInfo
instance (signature ~ (m Int32), MonadIO m, IsSettingTeam a) => O.OverloadedMethod SettingTeamGetRunnerSysPrioMethodInfo a signature where
overloadedMethod = settingTeamGetRunnerSysPrio
instance O.OverloadedMethodInfo SettingTeamGetRunnerSysPrioMethodInfo a where
overloadedMethodInfo = P.Just (O.ResolvedSymbolInfo {
O.resolvedSymbolName = "GI.NM.Objects.SettingTeam.settingTeamGetRunnerSysPrio",
O.resolvedSymbolURL = "https://hackage.haskell.org/package/gi-nm-1.0.1/docs/GI-NM-Objects-SettingTeam.html#v:settingTeamGetRunnerSysPrio"
})
#endif
foreign import ccall "nm_setting_team_get_runner_tx_balancer" nm_setting_team_get_runner_tx_balancer ::
Ptr SettingTeam ->
IO CString
settingTeamGetRunnerTxBalancer ::
(B.CallStack.HasCallStack, MonadIO m, IsSettingTeam a) =>
a
-> m T.Text
settingTeamGetRunnerTxBalancer :: forall (m :: * -> *) a.
(HasCallStack, MonadIO m, IsSettingTeam a) =>
a -> m Text
settingTeamGetRunnerTxBalancer a
setting = IO Text -> m Text
forall a. IO a -> m a
forall (m :: * -> *) a. MonadIO m => IO a -> m a
liftIO (IO Text -> m Text) -> IO Text -> m Text
forall a b. (a -> b) -> a -> b
$ do
Ptr SettingTeam
setting' <- a -> IO (Ptr SettingTeam)
forall a b. (HasCallStack, ManagedPtrNewtype a) => a -> IO (Ptr b)
unsafeManagedPtrCastPtr a
setting
CString
result <- Ptr SettingTeam -> IO CString
nm_setting_team_get_runner_tx_balancer Ptr SettingTeam
setting'
Text -> CString -> IO ()
forall a. HasCallStack => Text -> Ptr a -> IO ()
checkUnexpectedReturnNULL Text
"settingTeamGetRunnerTxBalancer" CString
result
Text
result' <- HasCallStack => CString -> IO Text
CString -> IO Text
cstringToText CString
result
a -> IO ()
forall a. ManagedPtrNewtype a => a -> IO ()
touchManagedPtr a
setting
Text -> IO Text
forall a. a -> IO a
forall (m :: * -> *) a. Monad m => a -> m a
return Text
result'
#if defined(ENABLE_OVERLOADING)
data SettingTeamGetRunnerTxBalancerMethodInfo
instance (signature ~ (m T.Text), MonadIO m, IsSettingTeam a) => O.OverloadedMethod SettingTeamGetRunnerTxBalancerMethodInfo a signature where
overloadedMethod = settingTeamGetRunnerTxBalancer
instance O.OverloadedMethodInfo SettingTeamGetRunnerTxBalancerMethodInfo a where
overloadedMethodInfo = P.Just (O.ResolvedSymbolInfo {
O.resolvedSymbolName = "GI.NM.Objects.SettingTeam.settingTeamGetRunnerTxBalancer",
O.resolvedSymbolURL = "https://hackage.haskell.org/package/gi-nm-1.0.1/docs/GI-NM-Objects-SettingTeam.html#v:settingTeamGetRunnerTxBalancer"
})
#endif
foreign import ccall "nm_setting_team_get_runner_tx_balancer_interval" nm_setting_team_get_runner_tx_balancer_interval ::
Ptr SettingTeam ->
IO Int32
settingTeamGetRunnerTxBalancerInterval ::
(B.CallStack.HasCallStack, MonadIO m, IsSettingTeam a) =>
a
-> m Int32
settingTeamGetRunnerTxBalancerInterval :: forall (m :: * -> *) a.
(HasCallStack, MonadIO m, IsSettingTeam a) =>
a -> m Int32
settingTeamGetRunnerTxBalancerInterval a
setting = IO Int32 -> m Int32
forall a. IO a -> m a
forall (m :: * -> *) a. MonadIO m => IO a -> m a
liftIO (IO Int32 -> m Int32) -> IO Int32 -> m Int32
forall a b. (a -> b) -> a -> b
$ do
Ptr SettingTeam
setting' <- a -> IO (Ptr SettingTeam)
forall a b. (HasCallStack, ManagedPtrNewtype a) => a -> IO (Ptr b)
unsafeManagedPtrCastPtr a
setting
Int32
result <- Ptr SettingTeam -> IO Int32
nm_setting_team_get_runner_tx_balancer_interval Ptr SettingTeam
setting'
a -> IO ()
forall a. ManagedPtrNewtype a => a -> IO ()
touchManagedPtr a
setting
Int32 -> IO Int32
forall a. a -> IO a
forall (m :: * -> *) a. Monad m => a -> m a
return Int32
result
#if defined(ENABLE_OVERLOADING)
data SettingTeamGetRunnerTxBalancerIntervalMethodInfo
instance (signature ~ (m Int32), MonadIO m, IsSettingTeam a) => O.OverloadedMethod SettingTeamGetRunnerTxBalancerIntervalMethodInfo a signature where
overloadedMethod = settingTeamGetRunnerTxBalancerInterval
instance O.OverloadedMethodInfo SettingTeamGetRunnerTxBalancerIntervalMethodInfo a where
overloadedMethodInfo = P.Just (O.ResolvedSymbolInfo {
O.resolvedSymbolName = "GI.NM.Objects.SettingTeam.settingTeamGetRunnerTxBalancerInterval",
O.resolvedSymbolURL = "https://hackage.haskell.org/package/gi-nm-1.0.1/docs/GI-NM-Objects-SettingTeam.html#v:settingTeamGetRunnerTxBalancerInterval"
})
#endif
foreign import ccall "nm_setting_team_get_runner_tx_hash" nm_setting_team_get_runner_tx_hash ::
Ptr SettingTeam ->
Word32 ->
IO CString
settingTeamGetRunnerTxHash ::
(B.CallStack.HasCallStack, MonadIO m, IsSettingTeam a) =>
a
-> Word32
-> m T.Text
settingTeamGetRunnerTxHash :: forall (m :: * -> *) a.
(HasCallStack, MonadIO m, IsSettingTeam a) =>
a -> Word32 -> m Text
settingTeamGetRunnerTxHash a
setting Word32
idx = IO Text -> m Text
forall a. IO a -> m a
forall (m :: * -> *) a. MonadIO m => IO a -> m a
liftIO (IO Text -> m Text) -> IO Text -> m Text
forall a b. (a -> b) -> a -> b
$ do
Ptr SettingTeam
setting' <- a -> IO (Ptr SettingTeam)
forall a b. (HasCallStack, ManagedPtrNewtype a) => a -> IO (Ptr b)
unsafeManagedPtrCastPtr a
setting
CString
result <- Ptr SettingTeam -> Word32 -> IO CString
nm_setting_team_get_runner_tx_hash Ptr SettingTeam
setting' Word32
idx
Text -> CString -> IO ()
forall a. HasCallStack => Text -> Ptr a -> IO ()
checkUnexpectedReturnNULL Text
"settingTeamGetRunnerTxHash" CString
result
Text
result' <- HasCallStack => CString -> IO Text
CString -> IO Text
cstringToText CString
result
a -> IO ()
forall a. ManagedPtrNewtype a => a -> IO ()
touchManagedPtr a
setting
Text -> IO Text
forall a. a -> IO a
forall (m :: * -> *) a. Monad m => a -> m a
return Text
result'
#if defined(ENABLE_OVERLOADING)
data SettingTeamGetRunnerTxHashMethodInfo
instance (signature ~ (Word32 -> m T.Text), MonadIO m, IsSettingTeam a) => O.OverloadedMethod SettingTeamGetRunnerTxHashMethodInfo a signature where
overloadedMethod = settingTeamGetRunnerTxHash
instance O.OverloadedMethodInfo SettingTeamGetRunnerTxHashMethodInfo a where
overloadedMethodInfo = P.Just (O.ResolvedSymbolInfo {
O.resolvedSymbolName = "GI.NM.Objects.SettingTeam.settingTeamGetRunnerTxHash",
O.resolvedSymbolURL = "https://hackage.haskell.org/package/gi-nm-1.0.1/docs/GI-NM-Objects-SettingTeam.html#v:settingTeamGetRunnerTxHash"
})
#endif
foreign import ccall "nm_setting_team_remove_link_watcher" nm_setting_team_remove_link_watcher ::
Ptr SettingTeam ->
Word32 ->
IO ()
settingTeamRemoveLinkWatcher ::
(B.CallStack.HasCallStack, MonadIO m, IsSettingTeam a) =>
a
-> Word32
-> m ()
settingTeamRemoveLinkWatcher :: forall (m :: * -> *) a.
(HasCallStack, MonadIO m, IsSettingTeam a) =>
a -> Word32 -> m ()
settingTeamRemoveLinkWatcher a
setting Word32
idx = 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 SettingTeam
setting' <- a -> IO (Ptr SettingTeam)
forall a b. (HasCallStack, ManagedPtrNewtype a) => a -> IO (Ptr b)
unsafeManagedPtrCastPtr a
setting
Ptr SettingTeam -> Word32 -> IO ()
nm_setting_team_remove_link_watcher Ptr SettingTeam
setting' Word32
idx
a -> IO ()
forall a. ManagedPtrNewtype a => a -> IO ()
touchManagedPtr a
setting
() -> IO ()
forall a. a -> IO a
forall (m :: * -> *) a. Monad m => a -> m a
return ()
#if defined(ENABLE_OVERLOADING)
data SettingTeamRemoveLinkWatcherMethodInfo
instance (signature ~ (Word32 -> m ()), MonadIO m, IsSettingTeam a) => O.OverloadedMethod SettingTeamRemoveLinkWatcherMethodInfo a signature where
overloadedMethod = settingTeamRemoveLinkWatcher
instance O.OverloadedMethodInfo SettingTeamRemoveLinkWatcherMethodInfo a where
overloadedMethodInfo = P.Just (O.ResolvedSymbolInfo {
O.resolvedSymbolName = "GI.NM.Objects.SettingTeam.settingTeamRemoveLinkWatcher",
O.resolvedSymbolURL = "https://hackage.haskell.org/package/gi-nm-1.0.1/docs/GI-NM-Objects-SettingTeam.html#v:settingTeamRemoveLinkWatcher"
})
#endif
foreign import ccall "nm_setting_team_remove_link_watcher_by_value" nm_setting_team_remove_link_watcher_by_value ::
Ptr SettingTeam ->
Ptr NM.TeamLinkWatcher.TeamLinkWatcher ->
IO CInt
settingTeamRemoveLinkWatcherByValue ::
(B.CallStack.HasCallStack, MonadIO m, IsSettingTeam a) =>
a
-> NM.TeamLinkWatcher.TeamLinkWatcher
-> m Bool
settingTeamRemoveLinkWatcherByValue :: forall (m :: * -> *) a.
(HasCallStack, MonadIO m, IsSettingTeam a) =>
a -> TeamLinkWatcher -> m Bool
settingTeamRemoveLinkWatcherByValue a
setting TeamLinkWatcher
linkWatcher = 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 SettingTeam
setting' <- a -> IO (Ptr SettingTeam)
forall a b. (HasCallStack, ManagedPtrNewtype a) => a -> IO (Ptr b)
unsafeManagedPtrCastPtr a
setting
Ptr TeamLinkWatcher
linkWatcher' <- TeamLinkWatcher -> IO (Ptr TeamLinkWatcher)
forall a. (HasCallStack, ManagedPtrNewtype a) => a -> IO (Ptr a)
unsafeManagedPtrGetPtr TeamLinkWatcher
linkWatcher
CInt
result <- Ptr SettingTeam -> Ptr TeamLinkWatcher -> IO CInt
nm_setting_team_remove_link_watcher_by_value Ptr SettingTeam
setting' Ptr TeamLinkWatcher
linkWatcher'
let result' :: Bool
result' = (CInt -> CInt -> Bool
forall a. Eq a => a -> a -> Bool
/= CInt
0) CInt
result
a -> IO ()
forall a. ManagedPtrNewtype a => a -> IO ()
touchManagedPtr a
setting
TeamLinkWatcher -> IO ()
forall a. ManagedPtrNewtype a => a -> IO ()
touchManagedPtr TeamLinkWatcher
linkWatcher
Bool -> IO Bool
forall a. a -> IO a
forall (m :: * -> *) a. Monad m => a -> m a
return Bool
result'
#if defined(ENABLE_OVERLOADING)
data SettingTeamRemoveLinkWatcherByValueMethodInfo
instance (signature ~ (NM.TeamLinkWatcher.TeamLinkWatcher -> m Bool), MonadIO m, IsSettingTeam a) => O.OverloadedMethod SettingTeamRemoveLinkWatcherByValueMethodInfo a signature where
overloadedMethod = settingTeamRemoveLinkWatcherByValue
instance O.OverloadedMethodInfo SettingTeamRemoveLinkWatcherByValueMethodInfo a where
overloadedMethodInfo = P.Just (O.ResolvedSymbolInfo {
O.resolvedSymbolName = "GI.NM.Objects.SettingTeam.settingTeamRemoveLinkWatcherByValue",
O.resolvedSymbolURL = "https://hackage.haskell.org/package/gi-nm-1.0.1/docs/GI-NM-Objects-SettingTeam.html#v:settingTeamRemoveLinkWatcherByValue"
})
#endif
foreign import ccall "nm_setting_team_remove_runner_tx_hash" nm_setting_team_remove_runner_tx_hash ::
Ptr SettingTeam ->
Word32 ->
IO ()
settingTeamRemoveRunnerTxHash ::
(B.CallStack.HasCallStack, MonadIO m, IsSettingTeam a) =>
a
-> Word32
-> m ()
settingTeamRemoveRunnerTxHash :: forall (m :: * -> *) a.
(HasCallStack, MonadIO m, IsSettingTeam a) =>
a -> Word32 -> m ()
settingTeamRemoveRunnerTxHash a
setting Word32
idx = 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 SettingTeam
setting' <- a -> IO (Ptr SettingTeam)
forall a b. (HasCallStack, ManagedPtrNewtype a) => a -> IO (Ptr b)
unsafeManagedPtrCastPtr a
setting
Ptr SettingTeam -> Word32 -> IO ()
nm_setting_team_remove_runner_tx_hash Ptr SettingTeam
setting' Word32
idx
a -> IO ()
forall a. ManagedPtrNewtype a => a -> IO ()
touchManagedPtr a
setting
() -> IO ()
forall a. a -> IO a
forall (m :: * -> *) a. Monad m => a -> m a
return ()
#if defined(ENABLE_OVERLOADING)
data SettingTeamRemoveRunnerTxHashMethodInfo
instance (signature ~ (Word32 -> m ()), MonadIO m, IsSettingTeam a) => O.OverloadedMethod SettingTeamRemoveRunnerTxHashMethodInfo a signature where
overloadedMethod = settingTeamRemoveRunnerTxHash
instance O.OverloadedMethodInfo SettingTeamRemoveRunnerTxHashMethodInfo a where
overloadedMethodInfo = P.Just (O.ResolvedSymbolInfo {
O.resolvedSymbolName = "GI.NM.Objects.SettingTeam.settingTeamRemoveRunnerTxHash",
O.resolvedSymbolURL = "https://hackage.haskell.org/package/gi-nm-1.0.1/docs/GI-NM-Objects-SettingTeam.html#v:settingTeamRemoveRunnerTxHash"
})
#endif
foreign import ccall "nm_setting_team_remove_runner_tx_hash_by_value" nm_setting_team_remove_runner_tx_hash_by_value ::
Ptr SettingTeam ->
CString ->
IO CInt
settingTeamRemoveRunnerTxHashByValue ::
(B.CallStack.HasCallStack, MonadIO m, IsSettingTeam a) =>
a
-> T.Text
-> m Bool
settingTeamRemoveRunnerTxHashByValue :: forall (m :: * -> *) a.
(HasCallStack, MonadIO m, IsSettingTeam a) =>
a -> Text -> m Bool
settingTeamRemoveRunnerTxHashByValue a
setting Text
txhash = 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 SettingTeam
setting' <- a -> IO (Ptr SettingTeam)
forall a b. (HasCallStack, ManagedPtrNewtype a) => a -> IO (Ptr b)
unsafeManagedPtrCastPtr a
setting
CString
txhash' <- Text -> IO CString
textToCString Text
txhash
CInt
result <- Ptr SettingTeam -> CString -> IO CInt
nm_setting_team_remove_runner_tx_hash_by_value Ptr SettingTeam
setting' CString
txhash'
let result' :: Bool
result' = (CInt -> CInt -> Bool
forall a. Eq a => a -> a -> Bool
/= CInt
0) CInt
result
a -> IO ()
forall a. ManagedPtrNewtype a => a -> IO ()
touchManagedPtr a
setting
CString -> IO ()
forall a. Ptr a -> IO ()
freeMem CString
txhash'
Bool -> IO Bool
forall a. a -> IO a
forall (m :: * -> *) a. Monad m => a -> m a
return Bool
result'
#if defined(ENABLE_OVERLOADING)
data SettingTeamRemoveRunnerTxHashByValueMethodInfo
instance (signature ~ (T.Text -> m Bool), MonadIO m, IsSettingTeam a) => O.OverloadedMethod SettingTeamRemoveRunnerTxHashByValueMethodInfo a signature where
overloadedMethod = settingTeamRemoveRunnerTxHashByValue
instance O.OverloadedMethodInfo SettingTeamRemoveRunnerTxHashByValueMethodInfo a where
overloadedMethodInfo = P.Just (O.ResolvedSymbolInfo {
O.resolvedSymbolName = "GI.NM.Objects.SettingTeam.settingTeamRemoveRunnerTxHashByValue",
O.resolvedSymbolURL = "https://hackage.haskell.org/package/gi-nm-1.0.1/docs/GI-NM-Objects-SettingTeam.html#v:settingTeamRemoveRunnerTxHashByValue"
})
#endif