{-# LANGUAGE TypeApplications #-}
#if (MIN_VERSION_haskell_gi_overloading(1,0,0) && !defined(__HADDOCK_VERSION__))
#define ENABLE_OVERLOADING
#endif
module GI.GstPbutils.Objects.DiscovererAudioInfo
(
DiscovererAudioInfo(..) ,
IsDiscovererAudioInfo ,
toDiscovererAudioInfo ,
noDiscovererAudioInfo ,
#if defined(ENABLE_OVERLOADING)
ResolveDiscovererAudioInfoMethod ,
#endif
#if defined(ENABLE_OVERLOADING)
DiscovererAudioInfoGetBitrateMethodInfo ,
#endif
discovererAudioInfoGetBitrate ,
#if defined(ENABLE_OVERLOADING)
DiscovererAudioInfoGetChannelMaskMethodInfo,
#endif
discovererAudioInfoGetChannelMask ,
#if defined(ENABLE_OVERLOADING)
DiscovererAudioInfoGetChannelsMethodInfo,
#endif
discovererAudioInfoGetChannels ,
#if defined(ENABLE_OVERLOADING)
DiscovererAudioInfoGetDepthMethodInfo ,
#endif
discovererAudioInfoGetDepth ,
#if defined(ENABLE_OVERLOADING)
DiscovererAudioInfoGetLanguageMethodInfo,
#endif
discovererAudioInfoGetLanguage ,
#if defined(ENABLE_OVERLOADING)
DiscovererAudioInfoGetMaxBitrateMethodInfo,
#endif
discovererAudioInfoGetMaxBitrate ,
#if defined(ENABLE_OVERLOADING)
DiscovererAudioInfoGetSampleRateMethodInfo,
#endif
discovererAudioInfoGetSampleRate ,
) where
import Data.GI.Base.ShortPrelude
import qualified Data.GI.Base.ShortPrelude as SP
import qualified Data.GI.Base.Overloading as O
import qualified Prelude as P
import qualified Data.GI.Base.Attributes as GI.Attributes
import qualified Data.GI.Base.ManagedPtr as B.ManagedPtr
import qualified Data.GI.Base.GClosure as B.GClosure
import qualified Data.GI.Base.GError as B.GError
import qualified Data.GI.Base.GVariant as B.GVariant
import qualified Data.GI.Base.GValue as B.GValue
import qualified Data.GI.Base.GParamSpec as B.GParamSpec
import qualified Data.GI.Base.CallStack as B.CallStack
import qualified Data.GI.Base.Properties as B.Properties
import qualified Data.GI.Base.Signals as B.Signals
import qualified Data.Text as T
import qualified Data.ByteString.Char8 as B
import qualified Data.Map as Map
import qualified Foreign.Ptr as FP
import qualified GHC.OverloadedLabels as OL
import qualified GI.GObject.Objects.Object as GObject.Object
import {-# SOURCE #-} qualified GI.GstPbutils.Objects.DiscovererStreamInfo as GstPbutils.DiscovererStreamInfo
newtype DiscovererAudioInfo = DiscovererAudioInfo (ManagedPtr DiscovererAudioInfo)
deriving (DiscovererAudioInfo -> DiscovererAudioInfo -> Bool
(DiscovererAudioInfo -> DiscovererAudioInfo -> Bool)
-> (DiscovererAudioInfo -> DiscovererAudioInfo -> Bool)
-> Eq DiscovererAudioInfo
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
/= :: DiscovererAudioInfo -> DiscovererAudioInfo -> Bool
$c/= :: DiscovererAudioInfo -> DiscovererAudioInfo -> Bool
== :: DiscovererAudioInfo -> DiscovererAudioInfo -> Bool
$c== :: DiscovererAudioInfo -> DiscovererAudioInfo -> Bool
Eq)
foreign import ccall "gst_discoverer_audio_info_get_type"
c_gst_discoverer_audio_info_get_type :: IO GType
instance GObject DiscovererAudioInfo where
gobjectType :: IO GType
gobjectType = IO GType
c_gst_discoverer_audio_info_get_type
instance B.GValue.IsGValue DiscovererAudioInfo where
toGValue :: DiscovererAudioInfo -> IO GValue
toGValue o :: DiscovererAudioInfo
o = do
GType
gtype <- IO GType
c_gst_discoverer_audio_info_get_type
DiscovererAudioInfo
-> (Ptr DiscovererAudioInfo -> IO GValue) -> IO GValue
forall a c.
(HasCallStack, ManagedPtrNewtype a) =>
a -> (Ptr a -> IO c) -> IO c
B.ManagedPtr.withManagedPtr DiscovererAudioInfo
o (GType
-> (GValue -> Ptr DiscovererAudioInfo -> IO ())
-> Ptr DiscovererAudioInfo
-> IO GValue
forall a. GType -> (GValue -> a -> IO ()) -> a -> IO GValue
B.GValue.buildGValue GType
gtype GValue -> Ptr DiscovererAudioInfo -> IO ()
forall a. GObject a => GValue -> Ptr a -> IO ()
B.GValue.set_object)
fromGValue :: GValue -> IO DiscovererAudioInfo
fromGValue gv :: GValue
gv = do
Ptr DiscovererAudioInfo
ptr <- GValue -> IO (Ptr DiscovererAudioInfo)
forall b. GObject b => GValue -> IO (Ptr b)
B.GValue.get_object GValue
gv :: IO (Ptr DiscovererAudioInfo)
(ManagedPtr DiscovererAudioInfo -> DiscovererAudioInfo)
-> Ptr DiscovererAudioInfo -> IO DiscovererAudioInfo
forall a b.
(HasCallStack, GObject a, GObject b) =>
(ManagedPtr a -> a) -> Ptr b -> IO a
B.ManagedPtr.newObject ManagedPtr DiscovererAudioInfo -> DiscovererAudioInfo
DiscovererAudioInfo Ptr DiscovererAudioInfo
ptr
class (GObject o, O.IsDescendantOf DiscovererAudioInfo o) => IsDiscovererAudioInfo o
instance (GObject o, O.IsDescendantOf DiscovererAudioInfo o) => IsDiscovererAudioInfo o
instance O.HasParentTypes DiscovererAudioInfo
type instance O.ParentTypes DiscovererAudioInfo = '[GstPbutils.DiscovererStreamInfo.DiscovererStreamInfo, GObject.Object.Object]
toDiscovererAudioInfo :: (MonadIO m, IsDiscovererAudioInfo o) => o -> m DiscovererAudioInfo
toDiscovererAudioInfo :: o -> m DiscovererAudioInfo
toDiscovererAudioInfo = IO DiscovererAudioInfo -> m DiscovererAudioInfo
forall (m :: * -> *) a. MonadIO m => IO a -> m a
liftIO (IO DiscovererAudioInfo -> m DiscovererAudioInfo)
-> (o -> IO DiscovererAudioInfo) -> o -> m DiscovererAudioInfo
forall b c a. (b -> c) -> (a -> b) -> a -> c
. (ManagedPtr DiscovererAudioInfo -> DiscovererAudioInfo)
-> o -> IO DiscovererAudioInfo
forall o o'.
(HasCallStack, GObject o, GObject o') =>
(ManagedPtr o' -> o') -> o -> IO o'
unsafeCastTo ManagedPtr DiscovererAudioInfo -> DiscovererAudioInfo
DiscovererAudioInfo
noDiscovererAudioInfo :: Maybe DiscovererAudioInfo
noDiscovererAudioInfo :: Maybe DiscovererAudioInfo
noDiscovererAudioInfo = Maybe DiscovererAudioInfo
forall a. Maybe a
Nothing
#if defined(ENABLE_OVERLOADING)
type family ResolveDiscovererAudioInfoMethod (t :: Symbol) (o :: *) :: * where
ResolveDiscovererAudioInfoMethod "bindProperty" o = GObject.Object.ObjectBindPropertyMethodInfo
ResolveDiscovererAudioInfoMethod "bindPropertyFull" o = GObject.Object.ObjectBindPropertyFullMethodInfo
ResolveDiscovererAudioInfoMethod "forceFloating" o = GObject.Object.ObjectForceFloatingMethodInfo
ResolveDiscovererAudioInfoMethod "freezeNotify" o = GObject.Object.ObjectFreezeNotifyMethodInfo
ResolveDiscovererAudioInfoMethod "getv" o = GObject.Object.ObjectGetvMethodInfo
ResolveDiscovererAudioInfoMethod "isFloating" o = GObject.Object.ObjectIsFloatingMethodInfo
ResolveDiscovererAudioInfoMethod "notify" o = GObject.Object.ObjectNotifyMethodInfo
ResolveDiscovererAudioInfoMethod "notifyByPspec" o = GObject.Object.ObjectNotifyByPspecMethodInfo
ResolveDiscovererAudioInfoMethod "ref" o = GObject.Object.ObjectRefMethodInfo
ResolveDiscovererAudioInfoMethod "refSink" o = GObject.Object.ObjectRefSinkMethodInfo
ResolveDiscovererAudioInfoMethod "runDispose" o = GObject.Object.ObjectRunDisposeMethodInfo
ResolveDiscovererAudioInfoMethod "stealData" o = GObject.Object.ObjectStealDataMethodInfo
ResolveDiscovererAudioInfoMethod "stealQdata" o = GObject.Object.ObjectStealQdataMethodInfo
ResolveDiscovererAudioInfoMethod "thawNotify" o = GObject.Object.ObjectThawNotifyMethodInfo
ResolveDiscovererAudioInfoMethod "unref" o = GObject.Object.ObjectUnrefMethodInfo
ResolveDiscovererAudioInfoMethod "watchClosure" o = GObject.Object.ObjectWatchClosureMethodInfo
ResolveDiscovererAudioInfoMethod "getBitrate" o = DiscovererAudioInfoGetBitrateMethodInfo
ResolveDiscovererAudioInfoMethod "getCaps" o = GstPbutils.DiscovererStreamInfo.DiscovererStreamInfoGetCapsMethodInfo
ResolveDiscovererAudioInfoMethod "getChannelMask" o = DiscovererAudioInfoGetChannelMaskMethodInfo
ResolveDiscovererAudioInfoMethod "getChannels" o = DiscovererAudioInfoGetChannelsMethodInfo
ResolveDiscovererAudioInfoMethod "getData" o = GObject.Object.ObjectGetDataMethodInfo
ResolveDiscovererAudioInfoMethod "getDepth" o = DiscovererAudioInfoGetDepthMethodInfo
ResolveDiscovererAudioInfoMethod "getLanguage" o = DiscovererAudioInfoGetLanguageMethodInfo
ResolveDiscovererAudioInfoMethod "getMaxBitrate" o = DiscovererAudioInfoGetMaxBitrateMethodInfo
ResolveDiscovererAudioInfoMethod "getMisc" o = GstPbutils.DiscovererStreamInfo.DiscovererStreamInfoGetMiscMethodInfo
ResolveDiscovererAudioInfoMethod "getNext" o = GstPbutils.DiscovererStreamInfo.DiscovererStreamInfoGetNextMethodInfo
ResolveDiscovererAudioInfoMethod "getPrevious" o = GstPbutils.DiscovererStreamInfo.DiscovererStreamInfoGetPreviousMethodInfo
ResolveDiscovererAudioInfoMethod "getProperty" o = GObject.Object.ObjectGetPropertyMethodInfo
ResolveDiscovererAudioInfoMethod "getQdata" o = GObject.Object.ObjectGetQdataMethodInfo
ResolveDiscovererAudioInfoMethod "getSampleRate" o = DiscovererAudioInfoGetSampleRateMethodInfo
ResolveDiscovererAudioInfoMethod "getStreamId" o = GstPbutils.DiscovererStreamInfo.DiscovererStreamInfoGetStreamIdMethodInfo
ResolveDiscovererAudioInfoMethod "getStreamTypeNick" o = GstPbutils.DiscovererStreamInfo.DiscovererStreamInfoGetStreamTypeNickMethodInfo
ResolveDiscovererAudioInfoMethod "getTags" o = GstPbutils.DiscovererStreamInfo.DiscovererStreamInfoGetTagsMethodInfo
ResolveDiscovererAudioInfoMethod "getToc" o = GstPbutils.DiscovererStreamInfo.DiscovererStreamInfoGetTocMethodInfo
ResolveDiscovererAudioInfoMethod "setData" o = GObject.Object.ObjectSetDataMethodInfo
ResolveDiscovererAudioInfoMethod "setDataFull" o = GObject.Object.ObjectSetDataFullMethodInfo
ResolveDiscovererAudioInfoMethod "setProperty" o = GObject.Object.ObjectSetPropertyMethodInfo
ResolveDiscovererAudioInfoMethod l o = O.MethodResolutionFailed l o
instance (info ~ ResolveDiscovererAudioInfoMethod t DiscovererAudioInfo, O.MethodInfo info DiscovererAudioInfo p) => OL.IsLabel t (DiscovererAudioInfo -> p) where
#if MIN_VERSION_base(4,10,0)
fromLabel = O.overloadedMethod @info
#else
fromLabel _ = O.overloadedMethod @info
#endif
#endif
#if defined(ENABLE_OVERLOADING)
instance O.HasAttributeList DiscovererAudioInfo
type instance O.AttributeList DiscovererAudioInfo = DiscovererAudioInfoAttributeList
type DiscovererAudioInfoAttributeList = ('[ ] :: [(Symbol, *)])
#endif
#if defined(ENABLE_OVERLOADING)
#endif
#if defined(ENABLE_OVERLOADING)
type instance O.SignalList DiscovererAudioInfo = DiscovererAudioInfoSignalList
type DiscovererAudioInfoSignalList = ('[ '("notify", GObject.Object.ObjectNotifySignalInfo)] :: [(Symbol, *)])
#endif
foreign import ccall "gst_discoverer_audio_info_get_bitrate" gst_discoverer_audio_info_get_bitrate ::
Ptr DiscovererAudioInfo ->
IO Word32
discovererAudioInfoGetBitrate ::
(B.CallStack.HasCallStack, MonadIO m, IsDiscovererAudioInfo a) =>
a
-> m Word32
discovererAudioInfoGetBitrate :: a -> m Word32
discovererAudioInfoGetBitrate info :: a
info = IO Word32 -> m Word32
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 DiscovererAudioInfo
info' <- a -> IO (Ptr DiscovererAudioInfo)
forall a b. (HasCallStack, ManagedPtrNewtype a) => a -> IO (Ptr b)
unsafeManagedPtrCastPtr a
info
Word32
result <- Ptr DiscovererAudioInfo -> IO Word32
gst_discoverer_audio_info_get_bitrate Ptr DiscovererAudioInfo
info'
a -> IO ()
forall a. ManagedPtrNewtype a => a -> IO ()
touchManagedPtr a
info
Word32 -> IO Word32
forall (m :: * -> *) a. Monad m => a -> m a
return Word32
result
#if defined(ENABLE_OVERLOADING)
data DiscovererAudioInfoGetBitrateMethodInfo
instance (signature ~ (m Word32), MonadIO m, IsDiscovererAudioInfo a) => O.MethodInfo DiscovererAudioInfoGetBitrateMethodInfo a signature where
overloadedMethod = discovererAudioInfoGetBitrate
#endif
foreign import ccall "gst_discoverer_audio_info_get_channel_mask" gst_discoverer_audio_info_get_channel_mask ::
Ptr DiscovererAudioInfo ->
IO Word64
discovererAudioInfoGetChannelMask ::
(B.CallStack.HasCallStack, MonadIO m, IsDiscovererAudioInfo a) =>
a
-> m Word64
discovererAudioInfoGetChannelMask :: a -> m Word64
discovererAudioInfoGetChannelMask info :: a
info = IO Word64 -> m Word64
forall (m :: * -> *) a. MonadIO m => IO a -> m a
liftIO (IO Word64 -> m Word64) -> IO Word64 -> m Word64
forall a b. (a -> b) -> a -> b
$ do
Ptr DiscovererAudioInfo
info' <- a -> IO (Ptr DiscovererAudioInfo)
forall a b. (HasCallStack, ManagedPtrNewtype a) => a -> IO (Ptr b)
unsafeManagedPtrCastPtr a
info
Word64
result <- Ptr DiscovererAudioInfo -> IO Word64
gst_discoverer_audio_info_get_channel_mask Ptr DiscovererAudioInfo
info'
a -> IO ()
forall a. ManagedPtrNewtype a => a -> IO ()
touchManagedPtr a
info
Word64 -> IO Word64
forall (m :: * -> *) a. Monad m => a -> m a
return Word64
result
#if defined(ENABLE_OVERLOADING)
data DiscovererAudioInfoGetChannelMaskMethodInfo
instance (signature ~ (m Word64), MonadIO m, IsDiscovererAudioInfo a) => O.MethodInfo DiscovererAudioInfoGetChannelMaskMethodInfo a signature where
overloadedMethod = discovererAudioInfoGetChannelMask
#endif
foreign import ccall "gst_discoverer_audio_info_get_channels" gst_discoverer_audio_info_get_channels ::
Ptr DiscovererAudioInfo ->
IO Word32
discovererAudioInfoGetChannels ::
(B.CallStack.HasCallStack, MonadIO m, IsDiscovererAudioInfo a) =>
a
-> m Word32
discovererAudioInfoGetChannels :: a -> m Word32
discovererAudioInfoGetChannels info :: a
info = IO Word32 -> m Word32
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 DiscovererAudioInfo
info' <- a -> IO (Ptr DiscovererAudioInfo)
forall a b. (HasCallStack, ManagedPtrNewtype a) => a -> IO (Ptr b)
unsafeManagedPtrCastPtr a
info
Word32
result <- Ptr DiscovererAudioInfo -> IO Word32
gst_discoverer_audio_info_get_channels Ptr DiscovererAudioInfo
info'
a -> IO ()
forall a. ManagedPtrNewtype a => a -> IO ()
touchManagedPtr a
info
Word32 -> IO Word32
forall (m :: * -> *) a. Monad m => a -> m a
return Word32
result
#if defined(ENABLE_OVERLOADING)
data DiscovererAudioInfoGetChannelsMethodInfo
instance (signature ~ (m Word32), MonadIO m, IsDiscovererAudioInfo a) => O.MethodInfo DiscovererAudioInfoGetChannelsMethodInfo a signature where
overloadedMethod = discovererAudioInfoGetChannels
#endif
foreign import ccall "gst_discoverer_audio_info_get_depth" gst_discoverer_audio_info_get_depth ::
Ptr DiscovererAudioInfo ->
IO Word32
discovererAudioInfoGetDepth ::
(B.CallStack.HasCallStack, MonadIO m, IsDiscovererAudioInfo a) =>
a
-> m Word32
discovererAudioInfoGetDepth :: a -> m Word32
discovererAudioInfoGetDepth info :: a
info = IO Word32 -> m Word32
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 DiscovererAudioInfo
info' <- a -> IO (Ptr DiscovererAudioInfo)
forall a b. (HasCallStack, ManagedPtrNewtype a) => a -> IO (Ptr b)
unsafeManagedPtrCastPtr a
info
Word32
result <- Ptr DiscovererAudioInfo -> IO Word32
gst_discoverer_audio_info_get_depth Ptr DiscovererAudioInfo
info'
a -> IO ()
forall a. ManagedPtrNewtype a => a -> IO ()
touchManagedPtr a
info
Word32 -> IO Word32
forall (m :: * -> *) a. Monad m => a -> m a
return Word32
result
#if defined(ENABLE_OVERLOADING)
data DiscovererAudioInfoGetDepthMethodInfo
instance (signature ~ (m Word32), MonadIO m, IsDiscovererAudioInfo a) => O.MethodInfo DiscovererAudioInfoGetDepthMethodInfo a signature where
overloadedMethod = discovererAudioInfoGetDepth
#endif
foreign import ccall "gst_discoverer_audio_info_get_language" gst_discoverer_audio_info_get_language ::
Ptr DiscovererAudioInfo ->
IO CString
discovererAudioInfoGetLanguage ::
(B.CallStack.HasCallStack, MonadIO m, IsDiscovererAudioInfo a) =>
a
-> m T.Text
discovererAudioInfoGetLanguage :: a -> m Text
discovererAudioInfoGetLanguage info :: a
info = IO Text -> m Text
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 DiscovererAudioInfo
info' <- a -> IO (Ptr DiscovererAudioInfo)
forall a b. (HasCallStack, ManagedPtrNewtype a) => a -> IO (Ptr b)
unsafeManagedPtrCastPtr a
info
CString
result <- Ptr DiscovererAudioInfo -> IO CString
gst_discoverer_audio_info_get_language Ptr DiscovererAudioInfo
info'
Text -> CString -> IO ()
forall a. HasCallStack => Text -> Ptr a -> IO ()
checkUnexpectedReturnNULL "discovererAudioInfoGetLanguage" CString
result
Text
result' <- HasCallStack => CString -> IO Text
CString -> IO Text
cstringToText CString
result
a -> IO ()
forall a. ManagedPtrNewtype a => a -> IO ()
touchManagedPtr a
info
Text -> IO Text
forall (m :: * -> *) a. Monad m => a -> m a
return Text
result'
#if defined(ENABLE_OVERLOADING)
data DiscovererAudioInfoGetLanguageMethodInfo
instance (signature ~ (m T.Text), MonadIO m, IsDiscovererAudioInfo a) => O.MethodInfo DiscovererAudioInfoGetLanguageMethodInfo a signature where
overloadedMethod = discovererAudioInfoGetLanguage
#endif
foreign import ccall "gst_discoverer_audio_info_get_max_bitrate" gst_discoverer_audio_info_get_max_bitrate ::
Ptr DiscovererAudioInfo ->
IO Word32
discovererAudioInfoGetMaxBitrate ::
(B.CallStack.HasCallStack, MonadIO m, IsDiscovererAudioInfo a) =>
a
-> m Word32
discovererAudioInfoGetMaxBitrate :: a -> m Word32
discovererAudioInfoGetMaxBitrate info :: a
info = IO Word32 -> m Word32
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 DiscovererAudioInfo
info' <- a -> IO (Ptr DiscovererAudioInfo)
forall a b. (HasCallStack, ManagedPtrNewtype a) => a -> IO (Ptr b)
unsafeManagedPtrCastPtr a
info
Word32
result <- Ptr DiscovererAudioInfo -> IO Word32
gst_discoverer_audio_info_get_max_bitrate Ptr DiscovererAudioInfo
info'
a -> IO ()
forall a. ManagedPtrNewtype a => a -> IO ()
touchManagedPtr a
info
Word32 -> IO Word32
forall (m :: * -> *) a. Monad m => a -> m a
return Word32
result
#if defined(ENABLE_OVERLOADING)
data DiscovererAudioInfoGetMaxBitrateMethodInfo
instance (signature ~ (m Word32), MonadIO m, IsDiscovererAudioInfo a) => O.MethodInfo DiscovererAudioInfoGetMaxBitrateMethodInfo a signature where
overloadedMethod = discovererAudioInfoGetMaxBitrate
#endif
foreign import ccall "gst_discoverer_audio_info_get_sample_rate" gst_discoverer_audio_info_get_sample_rate ::
Ptr DiscovererAudioInfo ->
IO Word32
discovererAudioInfoGetSampleRate ::
(B.CallStack.HasCallStack, MonadIO m, IsDiscovererAudioInfo a) =>
a
-> m Word32
discovererAudioInfoGetSampleRate :: a -> m Word32
discovererAudioInfoGetSampleRate info :: a
info = IO Word32 -> m Word32
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 DiscovererAudioInfo
info' <- a -> IO (Ptr DiscovererAudioInfo)
forall a b. (HasCallStack, ManagedPtrNewtype a) => a -> IO (Ptr b)
unsafeManagedPtrCastPtr a
info
Word32
result <- Ptr DiscovererAudioInfo -> IO Word32
gst_discoverer_audio_info_get_sample_rate Ptr DiscovererAudioInfo
info'
a -> IO ()
forall a. ManagedPtrNewtype a => a -> IO ()
touchManagedPtr a
info
Word32 -> IO Word32
forall (m :: * -> *) a. Monad m => a -> m a
return Word32
result
#if defined(ENABLE_OVERLOADING)
data DiscovererAudioInfoGetSampleRateMethodInfo
instance (signature ~ (m Word32), MonadIO m, IsDiscovererAudioInfo a) => O.MethodInfo DiscovererAudioInfoGetSampleRateMethodInfo a signature where
overloadedMethod = discovererAudioInfoGetSampleRate
#endif