#if (MIN_VERSION_haskell_gi_overloading(1,0,0) && !defined(__HADDOCK_VERSION__))
#define ENABLE_OVERLOADING
#endif
module GI.Gst.Enums
(
BufferingMode(..) ,
BusSyncReply(..) ,
CapsIntersectMode(..) ,
ClockEntryType(..) ,
ClockReturn(..) ,
ClockType(..) ,
CoreError(..) ,
catchCoreError ,
handleCoreError ,
DebugColorMode(..) ,
DebugLevel(..) ,
EventType(..) ,
FlowReturn(..) ,
Format(..) ,
IteratorItem(..) ,
IteratorResult(..) ,
LibraryError(..) ,
catchLibraryError ,
handleLibraryError ,
PadDirection(..) ,
PadLinkReturn(..) ,
PadMode(..) ,
PadPresence(..) ,
PadProbeReturn(..) ,
ParseError(..) ,
catchParseError ,
handleParseError ,
PluginError(..) ,
catchPluginError ,
handlePluginError ,
ProgressType(..) ,
PromiseResult(..) ,
QOSType(..) ,
QueryType(..) ,
Rank(..) ,
ResourceError(..) ,
catchResourceError ,
handleResourceError ,
SearchMode(..) ,
SeekType(..) ,
State(..) ,
StateChange(..) ,
StateChangeReturn(..) ,
StreamError(..) ,
catchStreamError ,
handleStreamError ,
StreamStatusType(..) ,
StructureChangeType(..) ,
TagFlag(..) ,
TagMergeMode(..) ,
TagScope(..) ,
TaskState(..) ,
TocEntryType(..) ,
TocLoopType(..) ,
TocScope(..) ,
TracerValueScope(..) ,
TypeFindProbability(..) ,
URIError(..) ,
catchURIError ,
handleURIError ,
URIType(..) ,
) 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)
#else
#endif
data URIType =
URITypeUnknown
| URITypeSink
| URITypeSrc
| AnotherURIType Int
deriving (Int -> URIType -> ShowS
[URIType] -> ShowS
URIType -> String
(Int -> URIType -> ShowS)
-> (URIType -> String) -> ([URIType] -> ShowS) -> Show URIType
forall a.
(Int -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a
$cshowsPrec :: Int -> URIType -> ShowS
showsPrec :: Int -> URIType -> ShowS
$cshow :: URIType -> String
show :: URIType -> String
$cshowList :: [URIType] -> ShowS
showList :: [URIType] -> ShowS
Show, URIType -> URIType -> Bool
(URIType -> URIType -> Bool)
-> (URIType -> URIType -> Bool) -> Eq URIType
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
$c== :: URIType -> URIType -> Bool
== :: URIType -> URIType -> Bool
$c/= :: URIType -> URIType -> Bool
/= :: URIType -> URIType -> Bool
Eq)
instance P.Enum URIType where
fromEnum :: URIType -> Int
fromEnum URIType
URITypeUnknown = Int
0
fromEnum URIType
URITypeSink = Int
1
fromEnum URIType
URITypeSrc = Int
2
fromEnum (AnotherURIType Int
k) = Int
k
toEnum :: Int -> URIType
toEnum Int
0 = URIType
URITypeUnknown
toEnum Int
1 = URIType
URITypeSink
toEnum Int
2 = URIType
URITypeSrc
toEnum Int
k = Int -> URIType
AnotherURIType Int
k
instance P.Ord URIType where
compare :: URIType -> URIType -> Ordering
compare URIType
a URIType
b = Int -> Int -> Ordering
forall a. Ord a => a -> a -> Ordering
P.compare (URIType -> Int
forall a. Enum a => a -> Int
P.fromEnum URIType
a) (URIType -> Int
forall a. Enum a => a -> Int
P.fromEnum URIType
b)
type instance O.ParentTypes URIType = '[]
instance O.HasParentTypes URIType
foreign import ccall "gst_uri_type_get_type" c_gst_uri_type_get_type ::
IO GType
instance B.Types.TypedObject URIType where
glibType :: IO GType
glibType = IO GType
c_gst_uri_type_get_type
instance B.Types.BoxedEnum URIType
data URIError =
URIErrorUnsupportedProtocol
| URIErrorBadUri
| URIErrorBadState
| URIErrorBadReference
| AnotherURIError Int
deriving (Int -> URIError -> ShowS
[URIError] -> ShowS
URIError -> String
(Int -> URIError -> ShowS)
-> (URIError -> String) -> ([URIError] -> ShowS) -> Show URIError
forall a.
(Int -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a
$cshowsPrec :: Int -> URIError -> ShowS
showsPrec :: Int -> URIError -> ShowS
$cshow :: URIError -> String
show :: URIError -> String
$cshowList :: [URIError] -> ShowS
showList :: [URIError] -> ShowS
Show, URIError -> URIError -> Bool
(URIError -> URIError -> Bool)
-> (URIError -> URIError -> Bool) -> Eq URIError
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
$c== :: URIError -> URIError -> Bool
== :: URIError -> URIError -> Bool
$c/= :: URIError -> URIError -> Bool
/= :: URIError -> URIError -> Bool
Eq)
instance P.Enum URIError where
fromEnum :: URIError -> Int
fromEnum URIError
URIErrorUnsupportedProtocol = Int
0
fromEnum URIError
URIErrorBadUri = Int
1
fromEnum URIError
URIErrorBadState = Int
2
fromEnum URIError
URIErrorBadReference = Int
3
fromEnum (AnotherURIError Int
k) = Int
k
toEnum :: Int -> URIError
toEnum Int
0 = URIError
URIErrorUnsupportedProtocol
toEnum Int
1 = URIError
URIErrorBadUri
toEnum Int
2 = URIError
URIErrorBadState
toEnum Int
3 = URIError
URIErrorBadReference
toEnum Int
k = Int -> URIError
AnotherURIError Int
k
instance P.Ord URIError where
compare :: URIError -> URIError -> Ordering
compare URIError
a URIError
b = Int -> Int -> Ordering
forall a. Ord a => a -> a -> Ordering
P.compare (URIError -> Int
forall a. Enum a => a -> Int
P.fromEnum URIError
a) (URIError -> Int
forall a. Enum a => a -> Int
P.fromEnum URIError
b)
instance GErrorClass URIError where
gerrorClassDomain :: URIError -> Text
gerrorClassDomain URIError
_ = Text
"gst-uri-error-quark"
catchURIError ::
IO a ->
(URIError -> GErrorMessage -> IO a) ->
IO a
catchURIError :: forall a. IO a -> (URIError -> Text -> IO a) -> IO a
catchURIError = IO a -> (URIError -> Text -> IO a) -> IO a
forall err a.
GErrorClass err =>
IO a -> (err -> Text -> IO a) -> IO a
catchGErrorJustDomain
handleURIError ::
(URIError -> GErrorMessage -> IO a) ->
IO a ->
IO a
handleURIError :: forall a. (URIError -> Text -> IO a) -> IO a -> IO a
handleURIError = (URIError -> Text -> IO a) -> IO a -> IO a
forall err a.
GErrorClass err =>
(err -> Text -> IO a) -> IO a -> IO a
handleGErrorJustDomain
type instance O.ParentTypes URIError = '[]
instance O.HasParentTypes URIError
foreign import ccall "gst_uri_error_get_type" c_gst_uri_error_get_type ::
IO GType
instance B.Types.TypedObject URIError where
glibType :: IO GType
glibType = IO GType
c_gst_uri_error_get_type
instance B.Types.BoxedEnum URIError
data TypeFindProbability =
TypeFindProbabilityNone
| TypeFindProbabilityMinimum
| TypeFindProbabilityPossible
| TypeFindProbabilityLikely
| TypeFindProbabilityNearlyCertain
| TypeFindProbabilityMaximum
| AnotherTypeFindProbability Int
deriving (Int -> TypeFindProbability -> ShowS
[TypeFindProbability] -> ShowS
TypeFindProbability -> String
(Int -> TypeFindProbability -> ShowS)
-> (TypeFindProbability -> String)
-> ([TypeFindProbability] -> ShowS)
-> Show TypeFindProbability
forall a.
(Int -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a
$cshowsPrec :: Int -> TypeFindProbability -> ShowS
showsPrec :: Int -> TypeFindProbability -> ShowS
$cshow :: TypeFindProbability -> String
show :: TypeFindProbability -> String
$cshowList :: [TypeFindProbability] -> ShowS
showList :: [TypeFindProbability] -> ShowS
Show, TypeFindProbability -> TypeFindProbability -> Bool
(TypeFindProbability -> TypeFindProbability -> Bool)
-> (TypeFindProbability -> TypeFindProbability -> Bool)
-> Eq TypeFindProbability
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
$c== :: TypeFindProbability -> TypeFindProbability -> Bool
== :: TypeFindProbability -> TypeFindProbability -> Bool
$c/= :: TypeFindProbability -> TypeFindProbability -> Bool
/= :: TypeFindProbability -> TypeFindProbability -> Bool
Eq)
instance P.Enum TypeFindProbability where
fromEnum :: TypeFindProbability -> Int
fromEnum TypeFindProbability
TypeFindProbabilityNone = Int
0
fromEnum TypeFindProbability
TypeFindProbabilityMinimum = Int
1
fromEnum TypeFindProbability
TypeFindProbabilityPossible = Int
50
fromEnum TypeFindProbability
TypeFindProbabilityLikely = Int
80
fromEnum TypeFindProbability
TypeFindProbabilityNearlyCertain = Int
99
fromEnum TypeFindProbability
TypeFindProbabilityMaximum = Int
100
fromEnum (AnotherTypeFindProbability Int
k) = Int
k
toEnum :: Int -> TypeFindProbability
toEnum Int
0 = TypeFindProbability
TypeFindProbabilityNone
toEnum Int
1 = TypeFindProbability
TypeFindProbabilityMinimum
toEnum Int
50 = TypeFindProbability
TypeFindProbabilityPossible
toEnum Int
80 = TypeFindProbability
TypeFindProbabilityLikely
toEnum Int
99 = TypeFindProbability
TypeFindProbabilityNearlyCertain
toEnum Int
100 = TypeFindProbability
TypeFindProbabilityMaximum
toEnum Int
k = Int -> TypeFindProbability
AnotherTypeFindProbability Int
k
instance P.Ord TypeFindProbability where
compare :: TypeFindProbability -> TypeFindProbability -> Ordering
compare TypeFindProbability
a TypeFindProbability
b = Int -> Int -> Ordering
forall a. Ord a => a -> a -> Ordering
P.compare (TypeFindProbability -> Int
forall a. Enum a => a -> Int
P.fromEnum TypeFindProbability
a) (TypeFindProbability -> Int
forall a. Enum a => a -> Int
P.fromEnum TypeFindProbability
b)
type instance O.ParentTypes TypeFindProbability = '[]
instance O.HasParentTypes TypeFindProbability
foreign import ccall "gst_type_find_probability_get_type" c_gst_type_find_probability_get_type ::
IO GType
instance B.Types.TypedObject TypeFindProbability where
glibType :: IO GType
glibType = IO GType
c_gst_type_find_probability_get_type
instance B.Types.BoxedEnum TypeFindProbability
data TracerValueScope =
TracerValueScopeProcess
| TracerValueScopeThread
| TracerValueScopeElement
| TracerValueScopePad
| AnotherTracerValueScope Int
deriving (Int -> TracerValueScope -> ShowS
[TracerValueScope] -> ShowS
TracerValueScope -> String
(Int -> TracerValueScope -> ShowS)
-> (TracerValueScope -> String)
-> ([TracerValueScope] -> ShowS)
-> Show TracerValueScope
forall a.
(Int -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a
$cshowsPrec :: Int -> TracerValueScope -> ShowS
showsPrec :: Int -> TracerValueScope -> ShowS
$cshow :: TracerValueScope -> String
show :: TracerValueScope -> String
$cshowList :: [TracerValueScope] -> ShowS
showList :: [TracerValueScope] -> ShowS
Show, TracerValueScope -> TracerValueScope -> Bool
(TracerValueScope -> TracerValueScope -> Bool)
-> (TracerValueScope -> TracerValueScope -> Bool)
-> Eq TracerValueScope
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
$c== :: TracerValueScope -> TracerValueScope -> Bool
== :: TracerValueScope -> TracerValueScope -> Bool
$c/= :: TracerValueScope -> TracerValueScope -> Bool
/= :: TracerValueScope -> TracerValueScope -> Bool
Eq)
instance P.Enum TracerValueScope where
fromEnum :: TracerValueScope -> Int
fromEnum TracerValueScope
TracerValueScopeProcess = Int
0
fromEnum TracerValueScope
TracerValueScopeThread = Int
1
fromEnum TracerValueScope
TracerValueScopeElement = Int
2
fromEnum TracerValueScope
TracerValueScopePad = Int
3
fromEnum (AnotherTracerValueScope Int
k) = Int
k
toEnum :: Int -> TracerValueScope
toEnum Int
0 = TracerValueScope
TracerValueScopeProcess
toEnum Int
1 = TracerValueScope
TracerValueScopeThread
toEnum Int
2 = TracerValueScope
TracerValueScopeElement
toEnum Int
3 = TracerValueScope
TracerValueScopePad
toEnum Int
k = Int -> TracerValueScope
AnotherTracerValueScope Int
k
instance P.Ord TracerValueScope where
compare :: TracerValueScope -> TracerValueScope -> Ordering
compare TracerValueScope
a TracerValueScope
b = Int -> Int -> Ordering
forall a. Ord a => a -> a -> Ordering
P.compare (TracerValueScope -> Int
forall a. Enum a => a -> Int
P.fromEnum TracerValueScope
a) (TracerValueScope -> Int
forall a. Enum a => a -> Int
P.fromEnum TracerValueScope
b)
type instance O.ParentTypes TracerValueScope = '[]
instance O.HasParentTypes TracerValueScope
foreign import ccall "gst_tracer_value_scope_get_type" c_gst_tracer_value_scope_get_type ::
IO GType
instance B.Types.TypedObject TracerValueScope where
glibType :: IO GType
glibType = IO GType
c_gst_tracer_value_scope_get_type
instance B.Types.BoxedEnum TracerValueScope
data TocScope =
TocScopeGlobal
| TocScopeCurrent
| AnotherTocScope Int
deriving (Int -> TocScope -> ShowS
[TocScope] -> ShowS
TocScope -> String
(Int -> TocScope -> ShowS)
-> (TocScope -> String) -> ([TocScope] -> ShowS) -> Show TocScope
forall a.
(Int -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a
$cshowsPrec :: Int -> TocScope -> ShowS
showsPrec :: Int -> TocScope -> ShowS
$cshow :: TocScope -> String
show :: TocScope -> String
$cshowList :: [TocScope] -> ShowS
showList :: [TocScope] -> ShowS
Show, TocScope -> TocScope -> Bool
(TocScope -> TocScope -> Bool)
-> (TocScope -> TocScope -> Bool) -> Eq TocScope
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
$c== :: TocScope -> TocScope -> Bool
== :: TocScope -> TocScope -> Bool
$c/= :: TocScope -> TocScope -> Bool
/= :: TocScope -> TocScope -> Bool
Eq)
instance P.Enum TocScope where
fromEnum :: TocScope -> Int
fromEnum TocScope
TocScopeGlobal = Int
1
fromEnum TocScope
TocScopeCurrent = Int
2
fromEnum (AnotherTocScope Int
k) = Int
k
toEnum :: Int -> TocScope
toEnum Int
1 = TocScope
TocScopeGlobal
toEnum Int
2 = TocScope
TocScopeCurrent
toEnum Int
k = Int -> TocScope
AnotherTocScope Int
k
instance P.Ord TocScope where
compare :: TocScope -> TocScope -> Ordering
compare TocScope
a TocScope
b = Int -> Int -> Ordering
forall a. Ord a => a -> a -> Ordering
P.compare (TocScope -> Int
forall a. Enum a => a -> Int
P.fromEnum TocScope
a) (TocScope -> Int
forall a. Enum a => a -> Int
P.fromEnum TocScope
b)
type instance O.ParentTypes TocScope = '[]
instance O.HasParentTypes TocScope
foreign import ccall "gst_toc_scope_get_type" c_gst_toc_scope_get_type ::
IO GType
instance B.Types.TypedObject TocScope where
glibType :: IO GType
glibType = IO GType
c_gst_toc_scope_get_type
instance B.Types.BoxedEnum TocScope
data TocLoopType =
TocLoopTypeNone
| TocLoopTypeForward
| TocLoopTypeReverse
| TocLoopTypePingPong
| AnotherTocLoopType Int
deriving (Int -> TocLoopType -> ShowS
[TocLoopType] -> ShowS
TocLoopType -> String
(Int -> TocLoopType -> ShowS)
-> (TocLoopType -> String)
-> ([TocLoopType] -> ShowS)
-> Show TocLoopType
forall a.
(Int -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a
$cshowsPrec :: Int -> TocLoopType -> ShowS
showsPrec :: Int -> TocLoopType -> ShowS
$cshow :: TocLoopType -> String
show :: TocLoopType -> String
$cshowList :: [TocLoopType] -> ShowS
showList :: [TocLoopType] -> ShowS
Show, TocLoopType -> TocLoopType -> Bool
(TocLoopType -> TocLoopType -> Bool)
-> (TocLoopType -> TocLoopType -> Bool) -> Eq TocLoopType
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
$c== :: TocLoopType -> TocLoopType -> Bool
== :: TocLoopType -> TocLoopType -> Bool
$c/= :: TocLoopType -> TocLoopType -> Bool
/= :: TocLoopType -> TocLoopType -> Bool
Eq)
instance P.Enum TocLoopType where
fromEnum :: TocLoopType -> Int
fromEnum TocLoopType
TocLoopTypeNone = Int
0
fromEnum TocLoopType
TocLoopTypeForward = Int
1
fromEnum TocLoopType
TocLoopTypeReverse = Int
2
fromEnum TocLoopType
TocLoopTypePingPong = Int
3
fromEnum (AnotherTocLoopType Int
k) = Int
k
toEnum :: Int -> TocLoopType
toEnum Int
0 = TocLoopType
TocLoopTypeNone
toEnum Int
1 = TocLoopType
TocLoopTypeForward
toEnum Int
2 = TocLoopType
TocLoopTypeReverse
toEnum Int
3 = TocLoopType
TocLoopTypePingPong
toEnum Int
k = Int -> TocLoopType
AnotherTocLoopType Int
k
instance P.Ord TocLoopType where
compare :: TocLoopType -> TocLoopType -> Ordering
compare TocLoopType
a TocLoopType
b = Int -> Int -> Ordering
forall a. Ord a => a -> a -> Ordering
P.compare (TocLoopType -> Int
forall a. Enum a => a -> Int
P.fromEnum TocLoopType
a) (TocLoopType -> Int
forall a. Enum a => a -> Int
P.fromEnum TocLoopType
b)
type instance O.ParentTypes TocLoopType = '[]
instance O.HasParentTypes TocLoopType
foreign import ccall "gst_toc_loop_type_get_type" c_gst_toc_loop_type_get_type ::
IO GType
instance B.Types.TypedObject TocLoopType where
glibType :: IO GType
glibType = IO GType
c_gst_toc_loop_type_get_type
instance B.Types.BoxedEnum TocLoopType
data TocEntryType =
TocEntryTypeAngle
| TocEntryTypeVersion
| TocEntryTypeEdition
| TocEntryTypeInvalid
| TocEntryTypeTitle
| TocEntryTypeTrack
| TocEntryTypeChapter
| AnotherTocEntryType Int
deriving (Int -> TocEntryType -> ShowS
[TocEntryType] -> ShowS
TocEntryType -> String
(Int -> TocEntryType -> ShowS)
-> (TocEntryType -> String)
-> ([TocEntryType] -> ShowS)
-> Show TocEntryType
forall a.
(Int -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a
$cshowsPrec :: Int -> TocEntryType -> ShowS
showsPrec :: Int -> TocEntryType -> ShowS
$cshow :: TocEntryType -> String
show :: TocEntryType -> String
$cshowList :: [TocEntryType] -> ShowS
showList :: [TocEntryType] -> ShowS
Show, TocEntryType -> TocEntryType -> Bool
(TocEntryType -> TocEntryType -> Bool)
-> (TocEntryType -> TocEntryType -> Bool) -> Eq TocEntryType
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
$c== :: TocEntryType -> TocEntryType -> Bool
== :: TocEntryType -> TocEntryType -> Bool
$c/= :: TocEntryType -> TocEntryType -> Bool
/= :: TocEntryType -> TocEntryType -> Bool
Eq)
instance P.Enum TocEntryType where
fromEnum :: TocEntryType -> Int
fromEnum TocEntryType
TocEntryTypeAngle = Int
-3
fromEnum TocEntryType
TocEntryTypeVersion = Int
-2
fromEnum TocEntryType
TocEntryTypeEdition = Int
-1
fromEnum TocEntryType
TocEntryTypeInvalid = Int
0
fromEnum TocEntryType
TocEntryTypeTitle = Int
1
fromEnum TocEntryType
TocEntryTypeTrack = Int
2
fromEnum TocEntryType
TocEntryTypeChapter = Int
3
fromEnum (AnotherTocEntryType Int
k) = Int
k
toEnum :: Int -> TocEntryType
toEnum Int
-3 = TocEntryType
TocEntryTypeAngle
toEnum Int
-2 = TocEntryType
TocEntryTypeVersion
toEnum Int
-1 = TocEntryType
TocEntryTypeEdition
toEnum Int
0 = TocEntryType
TocEntryTypeInvalid
toEnum Int
1 = TocEntryType
TocEntryTypeTitle
toEnum Int
2 = TocEntryType
TocEntryTypeTrack
toEnum Int
3 = TocEntryType
TocEntryTypeChapter
toEnum Int
k = Int -> TocEntryType
AnotherTocEntryType Int
k
instance P.Ord TocEntryType where
compare :: TocEntryType -> TocEntryType -> Ordering
compare TocEntryType
a TocEntryType
b = Int -> Int -> Ordering
forall a. Ord a => a -> a -> Ordering
P.compare (TocEntryType -> Int
forall a. Enum a => a -> Int
P.fromEnum TocEntryType
a) (TocEntryType -> Int
forall a. Enum a => a -> Int
P.fromEnum TocEntryType
b)
type instance O.ParentTypes TocEntryType = '[]
instance O.HasParentTypes TocEntryType
foreign import ccall "gst_toc_entry_type_get_type" c_gst_toc_entry_type_get_type ::
IO GType
instance B.Types.TypedObject TocEntryType where
glibType :: IO GType
glibType = IO GType
c_gst_toc_entry_type_get_type
instance B.Types.BoxedEnum TocEntryType
data TaskState =
TaskStateStarted
| TaskStateStopped
| TaskStatePaused
| AnotherTaskState Int
deriving (Int -> TaskState -> ShowS
[TaskState] -> ShowS
TaskState -> String
(Int -> TaskState -> ShowS)
-> (TaskState -> String)
-> ([TaskState] -> ShowS)
-> Show TaskState
forall a.
(Int -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a
$cshowsPrec :: Int -> TaskState -> ShowS
showsPrec :: Int -> TaskState -> ShowS
$cshow :: TaskState -> String
show :: TaskState -> String
$cshowList :: [TaskState] -> ShowS
showList :: [TaskState] -> ShowS
Show, TaskState -> TaskState -> Bool
(TaskState -> TaskState -> Bool)
-> (TaskState -> TaskState -> Bool) -> Eq TaskState
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
$c== :: TaskState -> TaskState -> Bool
== :: TaskState -> TaskState -> Bool
$c/= :: TaskState -> TaskState -> Bool
/= :: TaskState -> TaskState -> Bool
Eq)
instance P.Enum TaskState where
fromEnum :: TaskState -> Int
fromEnum TaskState
TaskStateStarted = Int
0
fromEnum TaskState
TaskStateStopped = Int
1
fromEnum TaskState
TaskStatePaused = Int
2
fromEnum (AnotherTaskState Int
k) = Int
k
toEnum :: Int -> TaskState
toEnum Int
0 = TaskState
TaskStateStarted
toEnum Int
1 = TaskState
TaskStateStopped
toEnum Int
2 = TaskState
TaskStatePaused
toEnum Int
k = Int -> TaskState
AnotherTaskState Int
k
instance P.Ord TaskState where
compare :: TaskState -> TaskState -> Ordering
compare TaskState
a TaskState
b = Int -> Int -> Ordering
forall a. Ord a => a -> a -> Ordering
P.compare (TaskState -> Int
forall a. Enum a => a -> Int
P.fromEnum TaskState
a) (TaskState -> Int
forall a. Enum a => a -> Int
P.fromEnum TaskState
b)
type instance O.ParentTypes TaskState = '[]
instance O.HasParentTypes TaskState
foreign import ccall "gst_task_state_get_type" c_gst_task_state_get_type ::
IO GType
instance B.Types.TypedObject TaskState where
glibType :: IO GType
glibType = IO GType
c_gst_task_state_get_type
instance B.Types.BoxedEnum TaskState
data TagScope =
TagScopeStream
| TagScopeGlobal
| AnotherTagScope Int
deriving (Int -> TagScope -> ShowS
[TagScope] -> ShowS
TagScope -> String
(Int -> TagScope -> ShowS)
-> (TagScope -> String) -> ([TagScope] -> ShowS) -> Show TagScope
forall a.
(Int -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a
$cshowsPrec :: Int -> TagScope -> ShowS
showsPrec :: Int -> TagScope -> ShowS
$cshow :: TagScope -> String
show :: TagScope -> String
$cshowList :: [TagScope] -> ShowS
showList :: [TagScope] -> ShowS
Show, TagScope -> TagScope -> Bool
(TagScope -> TagScope -> Bool)
-> (TagScope -> TagScope -> Bool) -> Eq TagScope
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
$c== :: TagScope -> TagScope -> Bool
== :: TagScope -> TagScope -> Bool
$c/= :: TagScope -> TagScope -> Bool
/= :: TagScope -> TagScope -> Bool
Eq)
instance P.Enum TagScope where
fromEnum :: TagScope -> Int
fromEnum TagScope
TagScopeStream = Int
0
fromEnum TagScope
TagScopeGlobal = Int
1
fromEnum (AnotherTagScope Int
k) = Int
k
toEnum :: Int -> TagScope
toEnum Int
0 = TagScope
TagScopeStream
toEnum Int
1 = TagScope
TagScopeGlobal
toEnum Int
k = Int -> TagScope
AnotherTagScope Int
k
instance P.Ord TagScope where
compare :: TagScope -> TagScope -> Ordering
compare TagScope
a TagScope
b = Int -> Int -> Ordering
forall a. Ord a => a -> a -> Ordering
P.compare (TagScope -> Int
forall a. Enum a => a -> Int
P.fromEnum TagScope
a) (TagScope -> Int
forall a. Enum a => a -> Int
P.fromEnum TagScope
b)
type instance O.ParentTypes TagScope = '[]
instance O.HasParentTypes TagScope
foreign import ccall "gst_tag_scope_get_type" c_gst_tag_scope_get_type ::
IO GType
instance B.Types.TypedObject TagScope where
glibType :: IO GType
glibType = IO GType
c_gst_tag_scope_get_type
instance B.Types.BoxedEnum TagScope
data TagMergeMode =
TagMergeModeUndefined
| TagMergeModeReplaceAll
| TagMergeModeReplace
| TagMergeModeAppend
| TagMergeModePrepend
| TagMergeModeKeep
| TagMergeModeKeepAll
| TagMergeModeCount
| AnotherTagMergeMode Int
deriving (Int -> TagMergeMode -> ShowS
[TagMergeMode] -> ShowS
TagMergeMode -> String
(Int -> TagMergeMode -> ShowS)
-> (TagMergeMode -> String)
-> ([TagMergeMode] -> ShowS)
-> Show TagMergeMode
forall a.
(Int -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a
$cshowsPrec :: Int -> TagMergeMode -> ShowS
showsPrec :: Int -> TagMergeMode -> ShowS
$cshow :: TagMergeMode -> String
show :: TagMergeMode -> String
$cshowList :: [TagMergeMode] -> ShowS
showList :: [TagMergeMode] -> ShowS
Show, TagMergeMode -> TagMergeMode -> Bool
(TagMergeMode -> TagMergeMode -> Bool)
-> (TagMergeMode -> TagMergeMode -> Bool) -> Eq TagMergeMode
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
$c== :: TagMergeMode -> TagMergeMode -> Bool
== :: TagMergeMode -> TagMergeMode -> Bool
$c/= :: TagMergeMode -> TagMergeMode -> Bool
/= :: TagMergeMode -> TagMergeMode -> Bool
Eq)
instance P.Enum TagMergeMode where
fromEnum :: TagMergeMode -> Int
fromEnum TagMergeMode
TagMergeModeUndefined = Int
0
fromEnum TagMergeMode
TagMergeModeReplaceAll = Int
1
fromEnum TagMergeMode
TagMergeModeReplace = Int
2
fromEnum TagMergeMode
TagMergeModeAppend = Int
3
fromEnum TagMergeMode
TagMergeModePrepend = Int
4
fromEnum TagMergeMode
TagMergeModeKeep = Int
5
fromEnum TagMergeMode
TagMergeModeKeepAll = Int
6
fromEnum TagMergeMode
TagMergeModeCount = Int
7
fromEnum (AnotherTagMergeMode Int
k) = Int
k
toEnum :: Int -> TagMergeMode
toEnum Int
0 = TagMergeMode
TagMergeModeUndefined
toEnum Int
1 = TagMergeMode
TagMergeModeReplaceAll
toEnum Int
2 = TagMergeMode
TagMergeModeReplace
toEnum Int
3 = TagMergeMode
TagMergeModeAppend
toEnum Int
4 = TagMergeMode
TagMergeModePrepend
toEnum Int
5 = TagMergeMode
TagMergeModeKeep
toEnum Int
6 = TagMergeMode
TagMergeModeKeepAll
toEnum Int
7 = TagMergeMode
TagMergeModeCount
toEnum Int
k = Int -> TagMergeMode
AnotherTagMergeMode Int
k
instance P.Ord TagMergeMode where
compare :: TagMergeMode -> TagMergeMode -> Ordering
compare TagMergeMode
a TagMergeMode
b = Int -> Int -> Ordering
forall a. Ord a => a -> a -> Ordering
P.compare (TagMergeMode -> Int
forall a. Enum a => a -> Int
P.fromEnum TagMergeMode
a) (TagMergeMode -> Int
forall a. Enum a => a -> Int
P.fromEnum TagMergeMode
b)
type instance O.ParentTypes TagMergeMode = '[]
instance O.HasParentTypes TagMergeMode
foreign import ccall "gst_tag_merge_mode_get_type" c_gst_tag_merge_mode_get_type ::
IO GType
instance B.Types.TypedObject TagMergeMode where
glibType :: IO GType
glibType = IO GType
c_gst_tag_merge_mode_get_type
instance B.Types.BoxedEnum TagMergeMode
data TagFlag =
TagFlagUndefined
| TagFlagMeta
| TagFlagEncoded
| TagFlagDecoded
| TagFlagCount
| AnotherTagFlag Int
deriving (Int -> TagFlag -> ShowS
[TagFlag] -> ShowS
TagFlag -> String
(Int -> TagFlag -> ShowS)
-> (TagFlag -> String) -> ([TagFlag] -> ShowS) -> Show TagFlag
forall a.
(Int -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a
$cshowsPrec :: Int -> TagFlag -> ShowS
showsPrec :: Int -> TagFlag -> ShowS
$cshow :: TagFlag -> String
show :: TagFlag -> String
$cshowList :: [TagFlag] -> ShowS
showList :: [TagFlag] -> ShowS
Show, TagFlag -> TagFlag -> Bool
(TagFlag -> TagFlag -> Bool)
-> (TagFlag -> TagFlag -> Bool) -> Eq TagFlag
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
$c== :: TagFlag -> TagFlag -> Bool
== :: TagFlag -> TagFlag -> Bool
$c/= :: TagFlag -> TagFlag -> Bool
/= :: TagFlag -> TagFlag -> Bool
Eq)
instance P.Enum TagFlag where
fromEnum :: TagFlag -> Int
fromEnum TagFlag
TagFlagUndefined = Int
0
fromEnum TagFlag
TagFlagMeta = Int
1
fromEnum TagFlag
TagFlagEncoded = Int
2
fromEnum TagFlag
TagFlagDecoded = Int
3
fromEnum TagFlag
TagFlagCount = Int
4
fromEnum (AnotherTagFlag Int
k) = Int
k
toEnum :: Int -> TagFlag
toEnum Int
0 = TagFlag
TagFlagUndefined
toEnum Int
1 = TagFlag
TagFlagMeta
toEnum Int
2 = TagFlag
TagFlagEncoded
toEnum Int
3 = TagFlag
TagFlagDecoded
toEnum Int
4 = TagFlag
TagFlagCount
toEnum Int
k = Int -> TagFlag
AnotherTagFlag Int
k
instance P.Ord TagFlag where
compare :: TagFlag -> TagFlag -> Ordering
compare TagFlag
a TagFlag
b = Int -> Int -> Ordering
forall a. Ord a => a -> a -> Ordering
P.compare (TagFlag -> Int
forall a. Enum a => a -> Int
P.fromEnum TagFlag
a) (TagFlag -> Int
forall a. Enum a => a -> Int
P.fromEnum TagFlag
b)
type instance O.ParentTypes TagFlag = '[]
instance O.HasParentTypes TagFlag
foreign import ccall "gst_tag_flag_get_type" c_gst_tag_flag_get_type ::
IO GType
instance B.Types.TypedObject TagFlag where
glibType :: IO GType
glibType = IO GType
c_gst_tag_flag_get_type
instance B.Types.BoxedEnum TagFlag
data StructureChangeType =
StructureChangeTypeLink
| StructureChangeTypeUnlink
| AnotherStructureChangeType Int
deriving (Int -> StructureChangeType -> ShowS
[StructureChangeType] -> ShowS
StructureChangeType -> String
(Int -> StructureChangeType -> ShowS)
-> (StructureChangeType -> String)
-> ([StructureChangeType] -> ShowS)
-> Show StructureChangeType
forall a.
(Int -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a
$cshowsPrec :: Int -> StructureChangeType -> ShowS
showsPrec :: Int -> StructureChangeType -> ShowS
$cshow :: StructureChangeType -> String
show :: StructureChangeType -> String
$cshowList :: [StructureChangeType] -> ShowS
showList :: [StructureChangeType] -> ShowS
Show, StructureChangeType -> StructureChangeType -> Bool
(StructureChangeType -> StructureChangeType -> Bool)
-> (StructureChangeType -> StructureChangeType -> Bool)
-> Eq StructureChangeType
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
$c== :: StructureChangeType -> StructureChangeType -> Bool
== :: StructureChangeType -> StructureChangeType -> Bool
$c/= :: StructureChangeType -> StructureChangeType -> Bool
/= :: StructureChangeType -> StructureChangeType -> Bool
Eq)
instance P.Enum StructureChangeType where
fromEnum :: StructureChangeType -> Int
fromEnum StructureChangeType
StructureChangeTypeLink = Int
0
fromEnum StructureChangeType
StructureChangeTypeUnlink = Int
1
fromEnum (AnotherStructureChangeType Int
k) = Int
k
toEnum :: Int -> StructureChangeType
toEnum Int
0 = StructureChangeType
StructureChangeTypeLink
toEnum Int
1 = StructureChangeType
StructureChangeTypeUnlink
toEnum Int
k = Int -> StructureChangeType
AnotherStructureChangeType Int
k
instance P.Ord StructureChangeType where
compare :: StructureChangeType -> StructureChangeType -> Ordering
compare StructureChangeType
a StructureChangeType
b = Int -> Int -> Ordering
forall a. Ord a => a -> a -> Ordering
P.compare (StructureChangeType -> Int
forall a. Enum a => a -> Int
P.fromEnum StructureChangeType
a) (StructureChangeType -> Int
forall a. Enum a => a -> Int
P.fromEnum StructureChangeType
b)
type instance O.ParentTypes StructureChangeType = '[]
instance O.HasParentTypes StructureChangeType
foreign import ccall "gst_structure_change_type_get_type" c_gst_structure_change_type_get_type ::
IO GType
instance B.Types.TypedObject StructureChangeType where
glibType :: IO GType
glibType = IO GType
c_gst_structure_change_type_get_type
instance B.Types.BoxedEnum StructureChangeType
data StreamStatusType =
StreamStatusTypeCreate
| StreamStatusTypeEnter
| StreamStatusTypeLeave
| StreamStatusTypeDestroy
| StreamStatusTypeStart
| StreamStatusTypePause
| StreamStatusTypeStop
| AnotherStreamStatusType Int
deriving (Int -> StreamStatusType -> ShowS
[StreamStatusType] -> ShowS
StreamStatusType -> String
(Int -> StreamStatusType -> ShowS)
-> (StreamStatusType -> String)
-> ([StreamStatusType] -> ShowS)
-> Show StreamStatusType
forall a.
(Int -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a
$cshowsPrec :: Int -> StreamStatusType -> ShowS
showsPrec :: Int -> StreamStatusType -> ShowS
$cshow :: StreamStatusType -> String
show :: StreamStatusType -> String
$cshowList :: [StreamStatusType] -> ShowS
showList :: [StreamStatusType] -> ShowS
Show, StreamStatusType -> StreamStatusType -> Bool
(StreamStatusType -> StreamStatusType -> Bool)
-> (StreamStatusType -> StreamStatusType -> Bool)
-> Eq StreamStatusType
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
$c== :: StreamStatusType -> StreamStatusType -> Bool
== :: StreamStatusType -> StreamStatusType -> Bool
$c/= :: StreamStatusType -> StreamStatusType -> Bool
/= :: StreamStatusType -> StreamStatusType -> Bool
Eq)
instance P.Enum StreamStatusType where
fromEnum :: StreamStatusType -> Int
fromEnum StreamStatusType
StreamStatusTypeCreate = Int
0
fromEnum StreamStatusType
StreamStatusTypeEnter = Int
1
fromEnum StreamStatusType
StreamStatusTypeLeave = Int
2
fromEnum StreamStatusType
StreamStatusTypeDestroy = Int
3
fromEnum StreamStatusType
StreamStatusTypeStart = Int
8
fromEnum StreamStatusType
StreamStatusTypePause = Int
9
fromEnum StreamStatusType
StreamStatusTypeStop = Int
10
fromEnum (AnotherStreamStatusType Int
k) = Int
k
toEnum :: Int -> StreamStatusType
toEnum Int
0 = StreamStatusType
StreamStatusTypeCreate
toEnum Int
1 = StreamStatusType
StreamStatusTypeEnter
toEnum Int
2 = StreamStatusType
StreamStatusTypeLeave
toEnum Int
3 = StreamStatusType
StreamStatusTypeDestroy
toEnum Int
8 = StreamStatusType
StreamStatusTypeStart
toEnum Int
9 = StreamStatusType
StreamStatusTypePause
toEnum Int
10 = StreamStatusType
StreamStatusTypeStop
toEnum Int
k = Int -> StreamStatusType
AnotherStreamStatusType Int
k
instance P.Ord StreamStatusType where
compare :: StreamStatusType -> StreamStatusType -> Ordering
compare StreamStatusType
a StreamStatusType
b = Int -> Int -> Ordering
forall a. Ord a => a -> a -> Ordering
P.compare (StreamStatusType -> Int
forall a. Enum a => a -> Int
P.fromEnum StreamStatusType
a) (StreamStatusType -> Int
forall a. Enum a => a -> Int
P.fromEnum StreamStatusType
b)
type instance O.ParentTypes StreamStatusType = '[]
instance O.HasParentTypes StreamStatusType
foreign import ccall "gst_stream_status_type_get_type" c_gst_stream_status_type_get_type ::
IO GType
instance B.Types.TypedObject StreamStatusType where
glibType :: IO GType
glibType = IO GType
c_gst_stream_status_type_get_type
instance B.Types.BoxedEnum StreamStatusType
data StreamError =
StreamErrorFailed
| StreamErrorTooLazy
| StreamErrorNotImplemented
| StreamErrorTypeNotFound
| StreamErrorWrongType
| StreamErrorCodecNotFound
| StreamErrorDecode
| StreamErrorEncode
| StreamErrorDemux
| StreamErrorMux
| StreamErrorFormat
| StreamErrorDecrypt
| StreamErrorDecryptNokey
| StreamErrorNumErrors
| AnotherStreamError Int
deriving (Int -> StreamError -> ShowS
[StreamError] -> ShowS
StreamError -> String
(Int -> StreamError -> ShowS)
-> (StreamError -> String)
-> ([StreamError] -> ShowS)
-> Show StreamError
forall a.
(Int -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a
$cshowsPrec :: Int -> StreamError -> ShowS
showsPrec :: Int -> StreamError -> ShowS
$cshow :: StreamError -> String
show :: StreamError -> String
$cshowList :: [StreamError] -> ShowS
showList :: [StreamError] -> ShowS
Show, StreamError -> StreamError -> Bool
(StreamError -> StreamError -> Bool)
-> (StreamError -> StreamError -> Bool) -> Eq StreamError
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
$c== :: StreamError -> StreamError -> Bool
== :: StreamError -> StreamError -> Bool
$c/= :: StreamError -> StreamError -> Bool
/= :: StreamError -> StreamError -> Bool
Eq)
instance P.Enum StreamError where
fromEnum :: StreamError -> Int
fromEnum StreamError
StreamErrorFailed = Int
1
fromEnum StreamError
StreamErrorTooLazy = Int
2
fromEnum StreamError
StreamErrorNotImplemented = Int
3
fromEnum StreamError
StreamErrorTypeNotFound = Int
4
fromEnum StreamError
StreamErrorWrongType = Int
5
fromEnum StreamError
StreamErrorCodecNotFound = Int
6
fromEnum StreamError
StreamErrorDecode = Int
7
fromEnum StreamError
StreamErrorEncode = Int
8
fromEnum StreamError
StreamErrorDemux = Int
9
fromEnum StreamError
StreamErrorMux = Int
10
fromEnum StreamError
StreamErrorFormat = Int
11
fromEnum StreamError
StreamErrorDecrypt = Int
12
fromEnum StreamError
StreamErrorDecryptNokey = Int
13
fromEnum StreamError
StreamErrorNumErrors = Int
14
fromEnum (AnotherStreamError Int
k) = Int
k
toEnum :: Int -> StreamError
toEnum Int
1 = StreamError
StreamErrorFailed
toEnum Int
2 = StreamError
StreamErrorTooLazy
toEnum Int
3 = StreamError
StreamErrorNotImplemented
toEnum Int
4 = StreamError
StreamErrorTypeNotFound
toEnum Int
5 = StreamError
StreamErrorWrongType
toEnum Int
6 = StreamError
StreamErrorCodecNotFound
toEnum Int
7 = StreamError
StreamErrorDecode
toEnum Int
8 = StreamError
StreamErrorEncode
toEnum Int
9 = StreamError
StreamErrorDemux
toEnum Int
10 = StreamError
StreamErrorMux
toEnum Int
11 = StreamError
StreamErrorFormat
toEnum Int
12 = StreamError
StreamErrorDecrypt
toEnum Int
13 = StreamError
StreamErrorDecryptNokey
toEnum Int
14 = StreamError
StreamErrorNumErrors
toEnum Int
k = Int -> StreamError
AnotherStreamError Int
k
instance P.Ord StreamError where
compare :: StreamError -> StreamError -> Ordering
compare StreamError
a StreamError
b = Int -> Int -> Ordering
forall a. Ord a => a -> a -> Ordering
P.compare (StreamError -> Int
forall a. Enum a => a -> Int
P.fromEnum StreamError
a) (StreamError -> Int
forall a. Enum a => a -> Int
P.fromEnum StreamError
b)
instance GErrorClass StreamError where
gerrorClassDomain :: StreamError -> Text
gerrorClassDomain StreamError
_ = Text
"gst-stream-error-quark"
catchStreamError ::
IO a ->
(StreamError -> GErrorMessage -> IO a) ->
IO a
catchStreamError :: forall a. IO a -> (StreamError -> Text -> IO a) -> IO a
catchStreamError = IO a -> (StreamError -> Text -> IO a) -> IO a
forall err a.
GErrorClass err =>
IO a -> (err -> Text -> IO a) -> IO a
catchGErrorJustDomain
handleStreamError ::
(StreamError -> GErrorMessage -> IO a) ->
IO a ->
IO a
handleStreamError :: forall a. (StreamError -> Text -> IO a) -> IO a -> IO a
handleStreamError = (StreamError -> Text -> IO a) -> IO a -> IO a
forall err a.
GErrorClass err =>
(err -> Text -> IO a) -> IO a -> IO a
handleGErrorJustDomain
type instance O.ParentTypes StreamError = '[]
instance O.HasParentTypes StreamError
foreign import ccall "gst_stream_error_get_type" c_gst_stream_error_get_type ::
IO GType
instance B.Types.TypedObject StreamError where
glibType :: IO GType
glibType = IO GType
c_gst_stream_error_get_type
instance B.Types.BoxedEnum StreamError
data StateChangeReturn =
StateChangeReturnFailure
| StateChangeReturnSuccess
| StateChangeReturnAsync
| StateChangeReturnNoPreroll
| AnotherStateChangeReturn Int
deriving (Int -> StateChangeReturn -> ShowS
[StateChangeReturn] -> ShowS
StateChangeReturn -> String
(Int -> StateChangeReturn -> ShowS)
-> (StateChangeReturn -> String)
-> ([StateChangeReturn] -> ShowS)
-> Show StateChangeReturn
forall a.
(Int -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a
$cshowsPrec :: Int -> StateChangeReturn -> ShowS
showsPrec :: Int -> StateChangeReturn -> ShowS
$cshow :: StateChangeReturn -> String
show :: StateChangeReturn -> String
$cshowList :: [StateChangeReturn] -> ShowS
showList :: [StateChangeReturn] -> ShowS
Show, StateChangeReturn -> StateChangeReturn -> Bool
(StateChangeReturn -> StateChangeReturn -> Bool)
-> (StateChangeReturn -> StateChangeReturn -> Bool)
-> Eq StateChangeReturn
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
$c== :: StateChangeReturn -> StateChangeReturn -> Bool
== :: StateChangeReturn -> StateChangeReturn -> Bool
$c/= :: StateChangeReturn -> StateChangeReturn -> Bool
/= :: StateChangeReturn -> StateChangeReturn -> Bool
Eq)
instance P.Enum StateChangeReturn where
fromEnum :: StateChangeReturn -> Int
fromEnum StateChangeReturn
StateChangeReturnFailure = Int
0
fromEnum StateChangeReturn
StateChangeReturnSuccess = Int
1
fromEnum StateChangeReturn
StateChangeReturnAsync = Int
2
fromEnum StateChangeReturn
StateChangeReturnNoPreroll = Int
3
fromEnum (AnotherStateChangeReturn Int
k) = Int
k
toEnum :: Int -> StateChangeReturn
toEnum Int
0 = StateChangeReturn
StateChangeReturnFailure
toEnum Int
1 = StateChangeReturn
StateChangeReturnSuccess
toEnum Int
2 = StateChangeReturn
StateChangeReturnAsync
toEnum Int
3 = StateChangeReturn
StateChangeReturnNoPreroll
toEnum Int
k = Int -> StateChangeReturn
AnotherStateChangeReturn Int
k
instance P.Ord StateChangeReturn where
compare :: StateChangeReturn -> StateChangeReturn -> Ordering
compare StateChangeReturn
a StateChangeReturn
b = Int -> Int -> Ordering
forall a. Ord a => a -> a -> Ordering
P.compare (StateChangeReturn -> Int
forall a. Enum a => a -> Int
P.fromEnum StateChangeReturn
a) (StateChangeReturn -> Int
forall a. Enum a => a -> Int
P.fromEnum StateChangeReturn
b)
type instance O.ParentTypes StateChangeReturn = '[]
instance O.HasParentTypes StateChangeReturn
foreign import ccall "gst_state_change_return_get_type" c_gst_state_change_return_get_type ::
IO GType
instance B.Types.TypedObject StateChangeReturn where
glibType :: IO GType
glibType = IO GType
c_gst_state_change_return_get_type
instance B.Types.BoxedEnum StateChangeReturn
data StateChange =
StateChangeNullToReady
| StateChangeReadyToPaused
| StateChangePausedToPlaying
| StateChangePlayingToPaused
| StateChangePausedToReady
| StateChangeReadyToNull
| StateChangeNullToNull
| StateChangeReadyToReady
| StateChangePausedToPaused
| StateChangePlayingToPlaying
| AnotherStateChange Int
deriving (Int -> StateChange -> ShowS
[StateChange] -> ShowS
StateChange -> String
(Int -> StateChange -> ShowS)
-> (StateChange -> String)
-> ([StateChange] -> ShowS)
-> Show StateChange
forall a.
(Int -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a
$cshowsPrec :: Int -> StateChange -> ShowS
showsPrec :: Int -> StateChange -> ShowS
$cshow :: StateChange -> String
show :: StateChange -> String
$cshowList :: [StateChange] -> ShowS
showList :: [StateChange] -> ShowS
Show, StateChange -> StateChange -> Bool
(StateChange -> StateChange -> Bool)
-> (StateChange -> StateChange -> Bool) -> Eq StateChange
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
$c== :: StateChange -> StateChange -> Bool
== :: StateChange -> StateChange -> Bool
$c/= :: StateChange -> StateChange -> Bool
/= :: StateChange -> StateChange -> Bool
Eq)
instance P.Enum StateChange where
fromEnum :: StateChange -> Int
fromEnum StateChange
StateChangeNullToReady = Int
10
fromEnum StateChange
StateChangeReadyToPaused = Int
19
fromEnum StateChange
StateChangePausedToPlaying = Int
28
fromEnum StateChange
StateChangePlayingToPaused = Int
35
fromEnum StateChange
StateChangePausedToReady = Int
26
fromEnum StateChange
StateChangeReadyToNull = Int
17
fromEnum StateChange
StateChangeNullToNull = Int
9
fromEnum StateChange
StateChangeReadyToReady = Int
18
fromEnum StateChange
StateChangePausedToPaused = Int
27
fromEnum StateChange
StateChangePlayingToPlaying = Int
36
fromEnum (AnotherStateChange Int
k) = Int
k
toEnum :: Int -> StateChange
toEnum Int
10 = StateChange
StateChangeNullToReady
toEnum Int
19 = StateChange
StateChangeReadyToPaused
toEnum Int
28 = StateChange
StateChangePausedToPlaying
toEnum Int
35 = StateChange
StateChangePlayingToPaused
toEnum Int
26 = StateChange
StateChangePausedToReady
toEnum Int
17 = StateChange
StateChangeReadyToNull
toEnum Int
9 = StateChange
StateChangeNullToNull
toEnum Int
18 = StateChange
StateChangeReadyToReady
toEnum Int
27 = StateChange
StateChangePausedToPaused
toEnum Int
36 = StateChange
StateChangePlayingToPlaying
toEnum Int
k = Int -> StateChange
AnotherStateChange Int
k
instance P.Ord StateChange where
compare :: StateChange -> StateChange -> Ordering
compare StateChange
a StateChange
b = Int -> Int -> Ordering
forall a. Ord a => a -> a -> Ordering
P.compare (StateChange -> Int
forall a. Enum a => a -> Int
P.fromEnum StateChange
a) (StateChange -> Int
forall a. Enum a => a -> Int
P.fromEnum StateChange
b)
type instance O.ParentTypes StateChange = '[]
instance O.HasParentTypes StateChange
foreign import ccall "gst_state_change_get_type" c_gst_state_change_get_type ::
IO GType
instance B.Types.TypedObject StateChange where
glibType :: IO GType
glibType = IO GType
c_gst_state_change_get_type
instance B.Types.BoxedEnum StateChange
data State =
StateVoidPending
| StateNull
| StateReady
| StatePaused
| StatePlaying
| AnotherState Int
deriving (Int -> State -> ShowS
[State] -> ShowS
State -> String
(Int -> State -> ShowS)
-> (State -> String) -> ([State] -> ShowS) -> Show State
forall a.
(Int -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a
$cshowsPrec :: Int -> State -> ShowS
showsPrec :: Int -> State -> ShowS
$cshow :: State -> String
show :: State -> String
$cshowList :: [State] -> ShowS
showList :: [State] -> ShowS
Show, State -> State -> Bool
(State -> State -> Bool) -> (State -> State -> Bool) -> Eq State
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
$c== :: State -> State -> Bool
== :: State -> State -> Bool
$c/= :: State -> State -> Bool
/= :: State -> State -> Bool
Eq)
instance P.Enum State where
fromEnum :: State -> Int
fromEnum State
StateVoidPending = Int
0
fromEnum State
StateNull = Int
1
fromEnum State
StateReady = Int
2
fromEnum State
StatePaused = Int
3
fromEnum State
StatePlaying = Int
4
fromEnum (AnotherState Int
k) = Int
k
toEnum :: Int -> State
toEnum Int
0 = State
StateVoidPending
toEnum Int
1 = State
StateNull
toEnum Int
2 = State
StateReady
toEnum Int
3 = State
StatePaused
toEnum Int
4 = State
StatePlaying
toEnum Int
k = Int -> State
AnotherState Int
k
instance P.Ord State where
compare :: State -> State -> Ordering
compare State
a State
b = Int -> Int -> Ordering
forall a. Ord a => a -> a -> Ordering
P.compare (State -> Int
forall a. Enum a => a -> Int
P.fromEnum State
a) (State -> Int
forall a. Enum a => a -> Int
P.fromEnum State
b)
type instance O.ParentTypes State = '[]
instance O.HasParentTypes State
foreign import ccall "gst_state_get_type" c_gst_state_get_type ::
IO GType
instance B.Types.TypedObject State where
glibType :: IO GType
glibType = IO GType
c_gst_state_get_type
instance B.Types.BoxedEnum State
data SeekType =
SeekTypeNone
| SeekTypeSet
| SeekTypeEnd
| AnotherSeekType Int
deriving (Int -> SeekType -> ShowS
[SeekType] -> ShowS
SeekType -> String
(Int -> SeekType -> ShowS)
-> (SeekType -> String) -> ([SeekType] -> ShowS) -> Show SeekType
forall a.
(Int -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a
$cshowsPrec :: Int -> SeekType -> ShowS
showsPrec :: Int -> SeekType -> ShowS
$cshow :: SeekType -> String
show :: SeekType -> String
$cshowList :: [SeekType] -> ShowS
showList :: [SeekType] -> ShowS
Show, SeekType -> SeekType -> Bool
(SeekType -> SeekType -> Bool)
-> (SeekType -> SeekType -> Bool) -> Eq SeekType
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
$c== :: SeekType -> SeekType -> Bool
== :: SeekType -> SeekType -> Bool
$c/= :: SeekType -> SeekType -> Bool
/= :: SeekType -> SeekType -> Bool
Eq)
instance P.Enum SeekType where
fromEnum :: SeekType -> Int
fromEnum SeekType
SeekTypeNone = Int
0
fromEnum SeekType
SeekTypeSet = Int
1
fromEnum SeekType
SeekTypeEnd = Int
2
fromEnum (AnotherSeekType Int
k) = Int
k
toEnum :: Int -> SeekType
toEnum Int
0 = SeekType
SeekTypeNone
toEnum Int
1 = SeekType
SeekTypeSet
toEnum Int
2 = SeekType
SeekTypeEnd
toEnum Int
k = Int -> SeekType
AnotherSeekType Int
k
instance P.Ord SeekType where
compare :: SeekType -> SeekType -> Ordering
compare SeekType
a SeekType
b = Int -> Int -> Ordering
forall a. Ord a => a -> a -> Ordering
P.compare (SeekType -> Int
forall a. Enum a => a -> Int
P.fromEnum SeekType
a) (SeekType -> Int
forall a. Enum a => a -> Int
P.fromEnum SeekType
b)
type instance O.ParentTypes SeekType = '[]
instance O.HasParentTypes SeekType
foreign import ccall "gst_seek_type_get_type" c_gst_seek_type_get_type ::
IO GType
instance B.Types.TypedObject SeekType where
glibType :: IO GType
glibType = IO GType
c_gst_seek_type_get_type
instance B.Types.BoxedEnum SeekType
data SearchMode =
SearchModeExact
| SearchModeBefore
| SearchModeAfter
| AnotherSearchMode Int
deriving (Int -> SearchMode -> ShowS
[SearchMode] -> ShowS
SearchMode -> String
(Int -> SearchMode -> ShowS)
-> (SearchMode -> String)
-> ([SearchMode] -> ShowS)
-> Show SearchMode
forall a.
(Int -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a
$cshowsPrec :: Int -> SearchMode -> ShowS
showsPrec :: Int -> SearchMode -> ShowS
$cshow :: SearchMode -> String
show :: SearchMode -> String
$cshowList :: [SearchMode] -> ShowS
showList :: [SearchMode] -> ShowS
Show, SearchMode -> SearchMode -> Bool
(SearchMode -> SearchMode -> Bool)
-> (SearchMode -> SearchMode -> Bool) -> Eq SearchMode
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
$c== :: SearchMode -> SearchMode -> Bool
== :: SearchMode -> SearchMode -> Bool
$c/= :: SearchMode -> SearchMode -> Bool
/= :: SearchMode -> SearchMode -> Bool
Eq)
instance P.Enum SearchMode where
fromEnum :: SearchMode -> Int
fromEnum SearchMode
SearchModeExact = Int
0
fromEnum SearchMode
SearchModeBefore = Int
1
fromEnum SearchMode
SearchModeAfter = Int
2
fromEnum (AnotherSearchMode Int
k) = Int
k
toEnum :: Int -> SearchMode
toEnum Int
0 = SearchMode
SearchModeExact
toEnum Int
1 = SearchMode
SearchModeBefore
toEnum Int
2 = SearchMode
SearchModeAfter
toEnum Int
k = Int -> SearchMode
AnotherSearchMode Int
k
instance P.Ord SearchMode where
compare :: SearchMode -> SearchMode -> Ordering
compare SearchMode
a SearchMode
b = Int -> Int -> Ordering
forall a. Ord a => a -> a -> Ordering
P.compare (SearchMode -> Int
forall a. Enum a => a -> Int
P.fromEnum SearchMode
a) (SearchMode -> Int
forall a. Enum a => a -> Int
P.fromEnum SearchMode
b)
type instance O.ParentTypes SearchMode = '[]
instance O.HasParentTypes SearchMode
foreign import ccall "gst_search_mode_get_type" c_gst_search_mode_get_type ::
IO GType
instance B.Types.TypedObject SearchMode where
glibType :: IO GType
glibType = IO GType
c_gst_search_mode_get_type
instance B.Types.BoxedEnum SearchMode
data ResourceError =
ResourceErrorFailed
| ResourceErrorTooLazy
| ResourceErrorNotFound
| ResourceErrorBusy
| ResourceErrorOpenRead
| ResourceErrorOpenWrite
| ResourceErrorOpenReadWrite
| ResourceErrorClose
| ResourceErrorRead
| ResourceErrorWrite
| ResourceErrorSeek
| ResourceErrorSync
| ResourceErrorSettings
| ResourceErrorNoSpaceLeft
| ResourceErrorNotAuthorized
| ResourceErrorNumErrors
| AnotherResourceError Int
deriving (Int -> ResourceError -> ShowS
[ResourceError] -> ShowS
ResourceError -> String
(Int -> ResourceError -> ShowS)
-> (ResourceError -> String)
-> ([ResourceError] -> ShowS)
-> Show ResourceError
forall a.
(Int -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a
$cshowsPrec :: Int -> ResourceError -> ShowS
showsPrec :: Int -> ResourceError -> ShowS
$cshow :: ResourceError -> String
show :: ResourceError -> String
$cshowList :: [ResourceError] -> ShowS
showList :: [ResourceError] -> ShowS
Show, ResourceError -> ResourceError -> Bool
(ResourceError -> ResourceError -> Bool)
-> (ResourceError -> ResourceError -> Bool) -> Eq ResourceError
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
$c== :: ResourceError -> ResourceError -> Bool
== :: ResourceError -> ResourceError -> Bool
$c/= :: ResourceError -> ResourceError -> Bool
/= :: ResourceError -> ResourceError -> Bool
Eq)
instance P.Enum ResourceError where
fromEnum :: ResourceError -> Int
fromEnum ResourceError
ResourceErrorFailed = Int
1
fromEnum ResourceError
ResourceErrorTooLazy = Int
2
fromEnum ResourceError
ResourceErrorNotFound = Int
3
fromEnum ResourceError
ResourceErrorBusy = Int
4
fromEnum ResourceError
ResourceErrorOpenRead = Int
5
fromEnum ResourceError
ResourceErrorOpenWrite = Int
6
fromEnum ResourceError
ResourceErrorOpenReadWrite = Int
7
fromEnum ResourceError
ResourceErrorClose = Int
8
fromEnum ResourceError
ResourceErrorRead = Int
9
fromEnum ResourceError
ResourceErrorWrite = Int
10
fromEnum ResourceError
ResourceErrorSeek = Int
11
fromEnum ResourceError
ResourceErrorSync = Int
12
fromEnum ResourceError
ResourceErrorSettings = Int
13
fromEnum ResourceError
ResourceErrorNoSpaceLeft = Int
14
fromEnum ResourceError
ResourceErrorNotAuthorized = Int
15
fromEnum ResourceError
ResourceErrorNumErrors = Int
16
fromEnum (AnotherResourceError Int
k) = Int
k
toEnum :: Int -> ResourceError
toEnum Int
1 = ResourceError
ResourceErrorFailed
toEnum Int
2 = ResourceError
ResourceErrorTooLazy
toEnum Int
3 = ResourceError
ResourceErrorNotFound
toEnum Int
4 = ResourceError
ResourceErrorBusy
toEnum Int
5 = ResourceError
ResourceErrorOpenRead
toEnum Int
6 = ResourceError
ResourceErrorOpenWrite
toEnum Int
7 = ResourceError
ResourceErrorOpenReadWrite
toEnum Int
8 = ResourceError
ResourceErrorClose
toEnum Int
9 = ResourceError
ResourceErrorRead
toEnum Int
10 = ResourceError
ResourceErrorWrite
toEnum Int
11 = ResourceError
ResourceErrorSeek
toEnum Int
12 = ResourceError
ResourceErrorSync
toEnum Int
13 = ResourceError
ResourceErrorSettings
toEnum Int
14 = ResourceError
ResourceErrorNoSpaceLeft
toEnum Int
15 = ResourceError
ResourceErrorNotAuthorized
toEnum Int
16 = ResourceError
ResourceErrorNumErrors
toEnum Int
k = Int -> ResourceError
AnotherResourceError Int
k
instance P.Ord ResourceError where
compare :: ResourceError -> ResourceError -> Ordering
compare ResourceError
a ResourceError
b = Int -> Int -> Ordering
forall a. Ord a => a -> a -> Ordering
P.compare (ResourceError -> Int
forall a. Enum a => a -> Int
P.fromEnum ResourceError
a) (ResourceError -> Int
forall a. Enum a => a -> Int
P.fromEnum ResourceError
b)
instance GErrorClass ResourceError where
gerrorClassDomain :: ResourceError -> Text
gerrorClassDomain ResourceError
_ = Text
"gst-resource-error-quark"
catchResourceError ::
IO a ->
(ResourceError -> GErrorMessage -> IO a) ->
IO a
catchResourceError :: forall a. IO a -> (ResourceError -> Text -> IO a) -> IO a
catchResourceError = IO a -> (ResourceError -> Text -> IO a) -> IO a
forall err a.
GErrorClass err =>
IO a -> (err -> Text -> IO a) -> IO a
catchGErrorJustDomain
handleResourceError ::
(ResourceError -> GErrorMessage -> IO a) ->
IO a ->
IO a
handleResourceError :: forall a. (ResourceError -> Text -> IO a) -> IO a -> IO a
handleResourceError = (ResourceError -> Text -> IO a) -> IO a -> IO a
forall err a.
GErrorClass err =>
(err -> Text -> IO a) -> IO a -> IO a
handleGErrorJustDomain
type instance O.ParentTypes ResourceError = '[]
instance O.HasParentTypes ResourceError
foreign import ccall "gst_resource_error_get_type" c_gst_resource_error_get_type ::
IO GType
instance B.Types.TypedObject ResourceError where
glibType :: IO GType
glibType = IO GType
c_gst_resource_error_get_type
instance B.Types.BoxedEnum ResourceError
data Rank =
RankNone
| RankMarginal
| RankSecondary
| RankPrimary
| AnotherRank Int
deriving (Int -> Rank -> ShowS
[Rank] -> ShowS
Rank -> String
(Int -> Rank -> ShowS)
-> (Rank -> String) -> ([Rank] -> ShowS) -> Show Rank
forall a.
(Int -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a
$cshowsPrec :: Int -> Rank -> ShowS
showsPrec :: Int -> Rank -> ShowS
$cshow :: Rank -> String
show :: Rank -> String
$cshowList :: [Rank] -> ShowS
showList :: [Rank] -> ShowS
Show, Rank -> Rank -> Bool
(Rank -> Rank -> Bool) -> (Rank -> Rank -> Bool) -> Eq Rank
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
$c== :: Rank -> Rank -> Bool
== :: Rank -> Rank -> Bool
$c/= :: Rank -> Rank -> Bool
/= :: Rank -> Rank -> Bool
Eq)
instance P.Enum Rank where
fromEnum :: Rank -> Int
fromEnum Rank
RankNone = Int
0
fromEnum Rank
RankMarginal = Int
64
fromEnum Rank
RankSecondary = Int
128
fromEnum Rank
RankPrimary = Int
256
fromEnum (AnotherRank Int
k) = Int
k
toEnum :: Int -> Rank
toEnum Int
0 = Rank
RankNone
toEnum Int
64 = Rank
RankMarginal
toEnum Int
128 = Rank
RankSecondary
toEnum Int
256 = Rank
RankPrimary
toEnum Int
k = Int -> Rank
AnotherRank Int
k
instance P.Ord Rank where
compare :: Rank -> Rank -> Ordering
compare Rank
a Rank
b = Int -> Int -> Ordering
forall a. Ord a => a -> a -> Ordering
P.compare (Rank -> Int
forall a. Enum a => a -> Int
P.fromEnum Rank
a) (Rank -> Int
forall a. Enum a => a -> Int
P.fromEnum Rank
b)
type instance O.ParentTypes Rank = '[]
instance O.HasParentTypes Rank
foreign import ccall "gst_rank_get_type" c_gst_rank_get_type ::
IO GType
instance B.Types.TypedObject Rank where
glibType :: IO GType
glibType = IO GType
c_gst_rank_get_type
instance B.Types.BoxedEnum Rank
data QueryType =
QueryTypeUnknown
| QueryTypePosition
| QueryTypeDuration
| QueryTypeLatency
| QueryTypeJitter
| QueryTypeRate
| QueryTypeSeeking
| QueryTypeSegment
| QueryTypeConvert
| QueryTypeFormats
| QueryTypeBuffering
| QueryTypeCustom
| QueryTypeUri
| QueryTypeAllocation
| QueryTypeScheduling
| QueryTypeAcceptCaps
| QueryTypeCaps
| QueryTypeDrain
| QueryTypeContext
| QueryTypeBitrate
| QueryTypeSelectable
| AnotherQueryType Int
deriving (Int -> QueryType -> ShowS
[QueryType] -> ShowS
QueryType -> String
(Int -> QueryType -> ShowS)
-> (QueryType -> String)
-> ([QueryType] -> ShowS)
-> Show QueryType
forall a.
(Int -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a
$cshowsPrec :: Int -> QueryType -> ShowS
showsPrec :: Int -> QueryType -> ShowS
$cshow :: QueryType -> String
show :: QueryType -> String
$cshowList :: [QueryType] -> ShowS
showList :: [QueryType] -> ShowS
Show, QueryType -> QueryType -> Bool
(QueryType -> QueryType -> Bool)
-> (QueryType -> QueryType -> Bool) -> Eq QueryType
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
$c== :: QueryType -> QueryType -> Bool
== :: QueryType -> QueryType -> Bool
$c/= :: QueryType -> QueryType -> Bool
/= :: QueryType -> QueryType -> Bool
Eq)
instance P.Enum QueryType where
fromEnum :: QueryType -> Int
fromEnum QueryType
QueryTypeUnknown = Int
0
fromEnum QueryType
QueryTypePosition = Int
2563
fromEnum QueryType
QueryTypeDuration = Int
5123
fromEnum QueryType
QueryTypeLatency = Int
7683
fromEnum QueryType
QueryTypeJitter = Int
10243
fromEnum QueryType
QueryTypeRate = Int
12803
fromEnum QueryType
QueryTypeSeeking = Int
15363
fromEnum QueryType
QueryTypeSegment = Int
17923
fromEnum QueryType
QueryTypeConvert = Int
20483
fromEnum QueryType
QueryTypeFormats = Int
23043
fromEnum QueryType
QueryTypeBuffering = Int
28163
fromEnum QueryType
QueryTypeCustom = Int
30723
fromEnum QueryType
QueryTypeUri = Int
33283
fromEnum QueryType
QueryTypeAllocation = Int
35846
fromEnum QueryType
QueryTypeScheduling = Int
38401
fromEnum QueryType
QueryTypeAcceptCaps = Int
40963
fromEnum QueryType
QueryTypeCaps = Int
43523
fromEnum QueryType
QueryTypeDrain = Int
46086
fromEnum QueryType
QueryTypeContext = Int
48643
fromEnum QueryType
QueryTypeBitrate = Int
51202
fromEnum QueryType
QueryTypeSelectable = Int
53763
fromEnum (AnotherQueryType Int
k) = Int
k
toEnum :: Int -> QueryType
toEnum Int
0 = QueryType
QueryTypeUnknown
toEnum Int
2563 = QueryType
QueryTypePosition
toEnum Int
5123 = QueryType
QueryTypeDuration
toEnum Int
7683 = QueryType
QueryTypeLatency
toEnum Int
10243 = QueryType
QueryTypeJitter
toEnum Int
12803 = QueryType
QueryTypeRate
toEnum Int
15363 = QueryType
QueryTypeSeeking
toEnum Int
17923 = QueryType
QueryTypeSegment
toEnum Int
20483 = QueryType
QueryTypeConvert
toEnum Int
23043 = QueryType
QueryTypeFormats
toEnum Int
28163 = QueryType
QueryTypeBuffering
toEnum Int
30723 = QueryType
QueryTypeCustom
toEnum Int
33283 = QueryType
QueryTypeUri
toEnum Int
35846 = QueryType
QueryTypeAllocation
toEnum Int
38401 = QueryType
QueryTypeScheduling
toEnum Int
40963 = QueryType
QueryTypeAcceptCaps
toEnum Int
43523 = QueryType
QueryTypeCaps
toEnum Int
46086 = QueryType
QueryTypeDrain
toEnum Int
48643 = QueryType
QueryTypeContext
toEnum Int
51202 = QueryType
QueryTypeBitrate
toEnum Int
53763 = QueryType
QueryTypeSelectable
toEnum Int
k = Int -> QueryType
AnotherQueryType Int
k
instance P.Ord QueryType where
compare :: QueryType -> QueryType -> Ordering
compare QueryType
a QueryType
b = Int -> Int -> Ordering
forall a. Ord a => a -> a -> Ordering
P.compare (QueryType -> Int
forall a. Enum a => a -> Int
P.fromEnum QueryType
a) (QueryType -> Int
forall a. Enum a => a -> Int
P.fromEnum QueryType
b)
type instance O.ParentTypes QueryType = '[]
instance O.HasParentTypes QueryType
foreign import ccall "gst_query_type_get_type" c_gst_query_type_get_type ::
IO GType
instance B.Types.TypedObject QueryType where
glibType :: IO GType
glibType = IO GType
c_gst_query_type_get_type
instance B.Types.BoxedEnum QueryType
data QOSType =
QOSTypeOverflow
| QOSTypeUnderflow
| QOSTypeThrottle
| AnotherQOSType Int
deriving (Int -> QOSType -> ShowS
[QOSType] -> ShowS
QOSType -> String
(Int -> QOSType -> ShowS)
-> (QOSType -> String) -> ([QOSType] -> ShowS) -> Show QOSType
forall a.
(Int -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a
$cshowsPrec :: Int -> QOSType -> ShowS
showsPrec :: Int -> QOSType -> ShowS
$cshow :: QOSType -> String
show :: QOSType -> String
$cshowList :: [QOSType] -> ShowS
showList :: [QOSType] -> ShowS
Show, QOSType -> QOSType -> Bool
(QOSType -> QOSType -> Bool)
-> (QOSType -> QOSType -> Bool) -> Eq QOSType
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
$c== :: QOSType -> QOSType -> Bool
== :: QOSType -> QOSType -> Bool
$c/= :: QOSType -> QOSType -> Bool
/= :: QOSType -> QOSType -> Bool
Eq)
instance P.Enum QOSType where
fromEnum :: QOSType -> Int
fromEnum QOSType
QOSTypeOverflow = Int
0
fromEnum QOSType
QOSTypeUnderflow = Int
1
fromEnum QOSType
QOSTypeThrottle = Int
2
fromEnum (AnotherQOSType Int
k) = Int
k
toEnum :: Int -> QOSType
toEnum Int
0 = QOSType
QOSTypeOverflow
toEnum Int
1 = QOSType
QOSTypeUnderflow
toEnum Int
2 = QOSType
QOSTypeThrottle
toEnum Int
k = Int -> QOSType
AnotherQOSType Int
k
instance P.Ord QOSType where
compare :: QOSType -> QOSType -> Ordering
compare QOSType
a QOSType
b = Int -> Int -> Ordering
forall a. Ord a => a -> a -> Ordering
P.compare (QOSType -> Int
forall a. Enum a => a -> Int
P.fromEnum QOSType
a) (QOSType -> Int
forall a. Enum a => a -> Int
P.fromEnum QOSType
b)
type instance O.ParentTypes QOSType = '[]
instance O.HasParentTypes QOSType
foreign import ccall "gst_qos_type_get_type" c_gst_qos_type_get_type ::
IO GType
instance B.Types.TypedObject QOSType where
glibType :: IO GType
glibType = IO GType
c_gst_qos_type_get_type
instance B.Types.BoxedEnum QOSType
data PromiseResult =
PromiseResultPending
| PromiseResultInterrupted
| PromiseResultReplied
| PromiseResultExpired
| AnotherPromiseResult Int
deriving (Int -> PromiseResult -> ShowS
[PromiseResult] -> ShowS
PromiseResult -> String
(Int -> PromiseResult -> ShowS)
-> (PromiseResult -> String)
-> ([PromiseResult] -> ShowS)
-> Show PromiseResult
forall a.
(Int -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a
$cshowsPrec :: Int -> PromiseResult -> ShowS
showsPrec :: Int -> PromiseResult -> ShowS
$cshow :: PromiseResult -> String
show :: PromiseResult -> String
$cshowList :: [PromiseResult] -> ShowS
showList :: [PromiseResult] -> ShowS
Show, PromiseResult -> PromiseResult -> Bool
(PromiseResult -> PromiseResult -> Bool)
-> (PromiseResult -> PromiseResult -> Bool) -> Eq PromiseResult
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
$c== :: PromiseResult -> PromiseResult -> Bool
== :: PromiseResult -> PromiseResult -> Bool
$c/= :: PromiseResult -> PromiseResult -> Bool
/= :: PromiseResult -> PromiseResult -> Bool
Eq)
instance P.Enum PromiseResult where
fromEnum :: PromiseResult -> Int
fromEnum PromiseResult
PromiseResultPending = Int
0
fromEnum PromiseResult
PromiseResultInterrupted = Int
1
fromEnum PromiseResult
PromiseResultReplied = Int
2
fromEnum PromiseResult
PromiseResultExpired = Int
3
fromEnum (AnotherPromiseResult Int
k) = Int
k
toEnum :: Int -> PromiseResult
toEnum Int
0 = PromiseResult
PromiseResultPending
toEnum Int
1 = PromiseResult
PromiseResultInterrupted
toEnum Int
2 = PromiseResult
PromiseResultReplied
toEnum Int
3 = PromiseResult
PromiseResultExpired
toEnum Int
k = Int -> PromiseResult
AnotherPromiseResult Int
k
instance P.Ord PromiseResult where
compare :: PromiseResult -> PromiseResult -> Ordering
compare PromiseResult
a PromiseResult
b = Int -> Int -> Ordering
forall a. Ord a => a -> a -> Ordering
P.compare (PromiseResult -> Int
forall a. Enum a => a -> Int
P.fromEnum PromiseResult
a) (PromiseResult -> Int
forall a. Enum a => a -> Int
P.fromEnum PromiseResult
b)
type instance O.ParentTypes PromiseResult = '[]
instance O.HasParentTypes PromiseResult
foreign import ccall "gst_promise_result_get_type" c_gst_promise_result_get_type ::
IO GType
instance B.Types.TypedObject PromiseResult where
glibType :: IO GType
glibType = IO GType
c_gst_promise_result_get_type
instance B.Types.BoxedEnum PromiseResult
data ProgressType =
ProgressTypeStart
| ProgressTypeContinue
| ProgressTypeComplete
| ProgressTypeCanceled
| ProgressTypeError
| AnotherProgressType Int
deriving (Int -> ProgressType -> ShowS
[ProgressType] -> ShowS
ProgressType -> String
(Int -> ProgressType -> ShowS)
-> (ProgressType -> String)
-> ([ProgressType] -> ShowS)
-> Show ProgressType
forall a.
(Int -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a
$cshowsPrec :: Int -> ProgressType -> ShowS
showsPrec :: Int -> ProgressType -> ShowS
$cshow :: ProgressType -> String
show :: ProgressType -> String
$cshowList :: [ProgressType] -> ShowS
showList :: [ProgressType] -> ShowS
Show, ProgressType -> ProgressType -> Bool
(ProgressType -> ProgressType -> Bool)
-> (ProgressType -> ProgressType -> Bool) -> Eq ProgressType
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
$c== :: ProgressType -> ProgressType -> Bool
== :: ProgressType -> ProgressType -> Bool
$c/= :: ProgressType -> ProgressType -> Bool
/= :: ProgressType -> ProgressType -> Bool
Eq)
instance P.Enum ProgressType where
fromEnum :: ProgressType -> Int
fromEnum ProgressType
ProgressTypeStart = Int
0
fromEnum ProgressType
ProgressTypeContinue = Int
1
fromEnum ProgressType
ProgressTypeComplete = Int
2
fromEnum ProgressType
ProgressTypeCanceled = Int
3
fromEnum ProgressType
ProgressTypeError = Int
4
fromEnum (AnotherProgressType Int
k) = Int
k
toEnum :: Int -> ProgressType
toEnum Int
0 = ProgressType
ProgressTypeStart
toEnum Int
1 = ProgressType
ProgressTypeContinue
toEnum Int
2 = ProgressType
ProgressTypeComplete
toEnum Int
3 = ProgressType
ProgressTypeCanceled
toEnum Int
4 = ProgressType
ProgressTypeError
toEnum Int
k = Int -> ProgressType
AnotherProgressType Int
k
instance P.Ord ProgressType where
compare :: ProgressType -> ProgressType -> Ordering
compare ProgressType
a ProgressType
b = Int -> Int -> Ordering
forall a. Ord a => a -> a -> Ordering
P.compare (ProgressType -> Int
forall a. Enum a => a -> Int
P.fromEnum ProgressType
a) (ProgressType -> Int
forall a. Enum a => a -> Int
P.fromEnum ProgressType
b)
type instance O.ParentTypes ProgressType = '[]
instance O.HasParentTypes ProgressType
foreign import ccall "gst_progress_type_get_type" c_gst_progress_type_get_type ::
IO GType
instance B.Types.TypedObject ProgressType where
glibType :: IO GType
glibType = IO GType
c_gst_progress_type_get_type
instance B.Types.BoxedEnum ProgressType
data PluginError =
PluginErrorModule
| PluginErrorDependencies
| PluginErrorNameMismatch
| AnotherPluginError Int
deriving (Int -> PluginError -> ShowS
[PluginError] -> ShowS
PluginError -> String
(Int -> PluginError -> ShowS)
-> (PluginError -> String)
-> ([PluginError] -> ShowS)
-> Show PluginError
forall a.
(Int -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a
$cshowsPrec :: Int -> PluginError -> ShowS
showsPrec :: Int -> PluginError -> ShowS
$cshow :: PluginError -> String
show :: PluginError -> String
$cshowList :: [PluginError] -> ShowS
showList :: [PluginError] -> ShowS
Show, PluginError -> PluginError -> Bool
(PluginError -> PluginError -> Bool)
-> (PluginError -> PluginError -> Bool) -> Eq PluginError
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
$c== :: PluginError -> PluginError -> Bool
== :: PluginError -> PluginError -> Bool
$c/= :: PluginError -> PluginError -> Bool
/= :: PluginError -> PluginError -> Bool
Eq)
instance P.Enum PluginError where
fromEnum :: PluginError -> Int
fromEnum PluginError
PluginErrorModule = Int
0
fromEnum PluginError
PluginErrorDependencies = Int
1
fromEnum PluginError
PluginErrorNameMismatch = Int
2
fromEnum (AnotherPluginError Int
k) = Int
k
toEnum :: Int -> PluginError
toEnum Int
0 = PluginError
PluginErrorModule
toEnum Int
1 = PluginError
PluginErrorDependencies
toEnum Int
2 = PluginError
PluginErrorNameMismatch
toEnum Int
k = Int -> PluginError
AnotherPluginError Int
k
instance P.Ord PluginError where
compare :: PluginError -> PluginError -> Ordering
compare PluginError
a PluginError
b = Int -> Int -> Ordering
forall a. Ord a => a -> a -> Ordering
P.compare (PluginError -> Int
forall a. Enum a => a -> Int
P.fromEnum PluginError
a) (PluginError -> Int
forall a. Enum a => a -> Int
P.fromEnum PluginError
b)
instance GErrorClass PluginError where
gerrorClassDomain :: PluginError -> Text
gerrorClassDomain PluginError
_ = Text
"gst_plugin_error"
catchPluginError ::
IO a ->
(PluginError -> GErrorMessage -> IO a) ->
IO a
catchPluginError :: forall a. IO a -> (PluginError -> Text -> IO a) -> IO a
catchPluginError = IO a -> (PluginError -> Text -> IO a) -> IO a
forall err a.
GErrorClass err =>
IO a -> (err -> Text -> IO a) -> IO a
catchGErrorJustDomain
handlePluginError ::
(PluginError -> GErrorMessage -> IO a) ->
IO a ->
IO a
handlePluginError :: forall a. (PluginError -> Text -> IO a) -> IO a -> IO a
handlePluginError = (PluginError -> Text -> IO a) -> IO a -> IO a
forall err a.
GErrorClass err =>
(err -> Text -> IO a) -> IO a -> IO a
handleGErrorJustDomain
type instance O.ParentTypes PluginError = '[]
instance O.HasParentTypes PluginError
foreign import ccall "gst_plugin_error_get_type" c_gst_plugin_error_get_type ::
IO GType
instance B.Types.TypedObject PluginError where
glibType :: IO GType
glibType = IO GType
c_gst_plugin_error_get_type
instance B.Types.BoxedEnum PluginError
data ParseError =
ParseErrorSyntax
| ParseErrorNoSuchElement
| ParseErrorNoSuchProperty
| ParseErrorLink
| ParseErrorCouldNotSetProperty
| ParseErrorEmptyBin
| ParseErrorEmpty
| ParseErrorDelayedLink
| AnotherParseError Int
deriving (Int -> ParseError -> ShowS
[ParseError] -> ShowS
ParseError -> String
(Int -> ParseError -> ShowS)
-> (ParseError -> String)
-> ([ParseError] -> ShowS)
-> Show ParseError
forall a.
(Int -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a
$cshowsPrec :: Int -> ParseError -> ShowS
showsPrec :: Int -> ParseError -> ShowS
$cshow :: ParseError -> String
show :: ParseError -> String
$cshowList :: [ParseError] -> ShowS
showList :: [ParseError] -> ShowS
Show, ParseError -> ParseError -> Bool
(ParseError -> ParseError -> Bool)
-> (ParseError -> ParseError -> Bool) -> Eq ParseError
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
$c== :: ParseError -> ParseError -> Bool
== :: ParseError -> ParseError -> Bool
$c/= :: ParseError -> ParseError -> Bool
/= :: ParseError -> ParseError -> Bool
Eq)
instance P.Enum ParseError where
fromEnum :: ParseError -> Int
fromEnum ParseError
ParseErrorSyntax = Int
0
fromEnum ParseError
ParseErrorNoSuchElement = Int
1
fromEnum ParseError
ParseErrorNoSuchProperty = Int
2
fromEnum ParseError
ParseErrorLink = Int
3
fromEnum ParseError
ParseErrorCouldNotSetProperty = Int
4
fromEnum ParseError
ParseErrorEmptyBin = Int
5
fromEnum ParseError
ParseErrorEmpty = Int
6
fromEnum ParseError
ParseErrorDelayedLink = Int
7
fromEnum (AnotherParseError Int
k) = Int
k
toEnum :: Int -> ParseError
toEnum Int
0 = ParseError
ParseErrorSyntax
toEnum Int
1 = ParseError
ParseErrorNoSuchElement
toEnum Int
2 = ParseError
ParseErrorNoSuchProperty
toEnum Int
3 = ParseError
ParseErrorLink
toEnum Int
4 = ParseError
ParseErrorCouldNotSetProperty
toEnum Int
5 = ParseError
ParseErrorEmptyBin
toEnum Int
6 = ParseError
ParseErrorEmpty
toEnum Int
7 = ParseError
ParseErrorDelayedLink
toEnum Int
k = Int -> ParseError
AnotherParseError Int
k
instance P.Ord ParseError where
compare :: ParseError -> ParseError -> Ordering
compare ParseError
a ParseError
b = Int -> Int -> Ordering
forall a. Ord a => a -> a -> Ordering
P.compare (ParseError -> Int
forall a. Enum a => a -> Int
P.fromEnum ParseError
a) (ParseError -> Int
forall a. Enum a => a -> Int
P.fromEnum ParseError
b)
instance GErrorClass ParseError where
gerrorClassDomain :: ParseError -> Text
gerrorClassDomain ParseError
_ = Text
"gst_parse_error"
catchParseError ::
IO a ->
(ParseError -> GErrorMessage -> IO a) ->
IO a
catchParseError :: forall a. IO a -> (ParseError -> Text -> IO a) -> IO a
catchParseError = IO a -> (ParseError -> Text -> IO a) -> IO a
forall err a.
GErrorClass err =>
IO a -> (err -> Text -> IO a) -> IO a
catchGErrorJustDomain
handleParseError ::
(ParseError -> GErrorMessage -> IO a) ->
IO a ->
IO a
handleParseError :: forall a. (ParseError -> Text -> IO a) -> IO a -> IO a
handleParseError = (ParseError -> Text -> IO a) -> IO a -> IO a
forall err a.
GErrorClass err =>
(err -> Text -> IO a) -> IO a -> IO a
handleGErrorJustDomain
type instance O.ParentTypes ParseError = '[]
instance O.HasParentTypes ParseError
foreign import ccall "gst_parse_error_get_type" c_gst_parse_error_get_type ::
IO GType
instance B.Types.TypedObject ParseError where
glibType :: IO GType
glibType = IO GType
c_gst_parse_error_get_type
instance B.Types.BoxedEnum ParseError
data PadProbeReturn =
PadProbeReturnDrop
| PadProbeReturnOk
| PadProbeReturnRemove
| PadProbeReturnPass
| PadProbeReturnHandled
| AnotherPadProbeReturn Int
deriving (Int -> PadProbeReturn -> ShowS
[PadProbeReturn] -> ShowS
PadProbeReturn -> String
(Int -> PadProbeReturn -> ShowS)
-> (PadProbeReturn -> String)
-> ([PadProbeReturn] -> ShowS)
-> Show PadProbeReturn
forall a.
(Int -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a
$cshowsPrec :: Int -> PadProbeReturn -> ShowS
showsPrec :: Int -> PadProbeReturn -> ShowS
$cshow :: PadProbeReturn -> String
show :: PadProbeReturn -> String
$cshowList :: [PadProbeReturn] -> ShowS
showList :: [PadProbeReturn] -> ShowS
Show, PadProbeReturn -> PadProbeReturn -> Bool
(PadProbeReturn -> PadProbeReturn -> Bool)
-> (PadProbeReturn -> PadProbeReturn -> Bool) -> Eq PadProbeReturn
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
$c== :: PadProbeReturn -> PadProbeReturn -> Bool
== :: PadProbeReturn -> PadProbeReturn -> Bool
$c/= :: PadProbeReturn -> PadProbeReturn -> Bool
/= :: PadProbeReturn -> PadProbeReturn -> Bool
Eq)
instance P.Enum PadProbeReturn where
fromEnum :: PadProbeReturn -> Int
fromEnum PadProbeReturn
PadProbeReturnDrop = Int
0
fromEnum PadProbeReturn
PadProbeReturnOk = Int
1
fromEnum PadProbeReturn
PadProbeReturnRemove = Int
2
fromEnum PadProbeReturn
PadProbeReturnPass = Int
3
fromEnum PadProbeReturn
PadProbeReturnHandled = Int
4
fromEnum (AnotherPadProbeReturn Int
k) = Int
k
toEnum :: Int -> PadProbeReturn
toEnum Int
0 = PadProbeReturn
PadProbeReturnDrop
toEnum Int
1 = PadProbeReturn
PadProbeReturnOk
toEnum Int
2 = PadProbeReturn
PadProbeReturnRemove
toEnum Int
3 = PadProbeReturn
PadProbeReturnPass
toEnum Int
4 = PadProbeReturn
PadProbeReturnHandled
toEnum Int
k = Int -> PadProbeReturn
AnotherPadProbeReturn Int
k
instance P.Ord PadProbeReturn where
compare :: PadProbeReturn -> PadProbeReturn -> Ordering
compare PadProbeReturn
a PadProbeReturn
b = Int -> Int -> Ordering
forall a. Ord a => a -> a -> Ordering
P.compare (PadProbeReturn -> Int
forall a. Enum a => a -> Int
P.fromEnum PadProbeReturn
a) (PadProbeReturn -> Int
forall a. Enum a => a -> Int
P.fromEnum PadProbeReturn
b)
type instance O.ParentTypes PadProbeReturn = '[]
instance O.HasParentTypes PadProbeReturn
foreign import ccall "gst_pad_probe_return_get_type" c_gst_pad_probe_return_get_type ::
IO GType
instance B.Types.TypedObject PadProbeReturn where
glibType :: IO GType
glibType = IO GType
c_gst_pad_probe_return_get_type
instance B.Types.BoxedEnum PadProbeReturn
data PadPresence =
PadPresenceAlways
| PadPresenceSometimes
| PadPresenceRequest
| AnotherPadPresence Int
deriving (Int -> PadPresence -> ShowS
[PadPresence] -> ShowS
PadPresence -> String
(Int -> PadPresence -> ShowS)
-> (PadPresence -> String)
-> ([PadPresence] -> ShowS)
-> Show PadPresence
forall a.
(Int -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a
$cshowsPrec :: Int -> PadPresence -> ShowS
showsPrec :: Int -> PadPresence -> ShowS
$cshow :: PadPresence -> String
show :: PadPresence -> String
$cshowList :: [PadPresence] -> ShowS
showList :: [PadPresence] -> ShowS
Show, PadPresence -> PadPresence -> Bool
(PadPresence -> PadPresence -> Bool)
-> (PadPresence -> PadPresence -> Bool) -> Eq PadPresence
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
$c== :: PadPresence -> PadPresence -> Bool
== :: PadPresence -> PadPresence -> Bool
$c/= :: PadPresence -> PadPresence -> Bool
/= :: PadPresence -> PadPresence -> Bool
Eq)
instance P.Enum PadPresence where
fromEnum :: PadPresence -> Int
fromEnum PadPresence
PadPresenceAlways = Int
0
fromEnum PadPresence
PadPresenceSometimes = Int
1
fromEnum PadPresence
PadPresenceRequest = Int
2
fromEnum (AnotherPadPresence Int
k) = Int
k
toEnum :: Int -> PadPresence
toEnum Int
0 = PadPresence
PadPresenceAlways
toEnum Int
1 = PadPresence
PadPresenceSometimes
toEnum Int
2 = PadPresence
PadPresenceRequest
toEnum Int
k = Int -> PadPresence
AnotherPadPresence Int
k
instance P.Ord PadPresence where
compare :: PadPresence -> PadPresence -> Ordering
compare PadPresence
a PadPresence
b = Int -> Int -> Ordering
forall a. Ord a => a -> a -> Ordering
P.compare (PadPresence -> Int
forall a. Enum a => a -> Int
P.fromEnum PadPresence
a) (PadPresence -> Int
forall a. Enum a => a -> Int
P.fromEnum PadPresence
b)
type instance O.ParentTypes PadPresence = '[]
instance O.HasParentTypes PadPresence
foreign import ccall "gst_pad_presence_get_type" c_gst_pad_presence_get_type ::
IO GType
instance B.Types.TypedObject PadPresence where
glibType :: IO GType
glibType = IO GType
c_gst_pad_presence_get_type
instance B.Types.BoxedEnum PadPresence
data PadMode =
PadModeNone
| PadModePush
| PadModePull
| AnotherPadMode Int
deriving (Int -> PadMode -> ShowS
[PadMode] -> ShowS
PadMode -> String
(Int -> PadMode -> ShowS)
-> (PadMode -> String) -> ([PadMode] -> ShowS) -> Show PadMode
forall a.
(Int -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a
$cshowsPrec :: Int -> PadMode -> ShowS
showsPrec :: Int -> PadMode -> ShowS
$cshow :: PadMode -> String
show :: PadMode -> String
$cshowList :: [PadMode] -> ShowS
showList :: [PadMode] -> ShowS
Show, PadMode -> PadMode -> Bool
(PadMode -> PadMode -> Bool)
-> (PadMode -> PadMode -> Bool) -> Eq PadMode
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
$c== :: PadMode -> PadMode -> Bool
== :: PadMode -> PadMode -> Bool
$c/= :: PadMode -> PadMode -> Bool
/= :: PadMode -> PadMode -> Bool
Eq)
instance P.Enum PadMode where
fromEnum :: PadMode -> Int
fromEnum PadMode
PadModeNone = Int
0
fromEnum PadMode
PadModePush = Int
1
fromEnum PadMode
PadModePull = Int
2
fromEnum (AnotherPadMode Int
k) = Int
k
toEnum :: Int -> PadMode
toEnum Int
0 = PadMode
PadModeNone
toEnum Int
1 = PadMode
PadModePush
toEnum Int
2 = PadMode
PadModePull
toEnum Int
k = Int -> PadMode
AnotherPadMode Int
k
instance P.Ord PadMode where
compare :: PadMode -> PadMode -> Ordering
compare PadMode
a PadMode
b = Int -> Int -> Ordering
forall a. Ord a => a -> a -> Ordering
P.compare (PadMode -> Int
forall a. Enum a => a -> Int
P.fromEnum PadMode
a) (PadMode -> Int
forall a. Enum a => a -> Int
P.fromEnum PadMode
b)
type instance O.ParentTypes PadMode = '[]
instance O.HasParentTypes PadMode
foreign import ccall "gst_pad_mode_get_type" c_gst_pad_mode_get_type ::
IO GType
instance B.Types.TypedObject PadMode where
glibType :: IO GType
glibType = IO GType
c_gst_pad_mode_get_type
instance B.Types.BoxedEnum PadMode
data PadLinkReturn =
PadLinkReturnOk
| PadLinkReturnWrongHierarchy
| PadLinkReturnWasLinked
| PadLinkReturnWrongDirection
| PadLinkReturnNoformat
| PadLinkReturnNosched
| PadLinkReturnRefused
| AnotherPadLinkReturn Int
deriving (Int -> PadLinkReturn -> ShowS
[PadLinkReturn] -> ShowS
PadLinkReturn -> String
(Int -> PadLinkReturn -> ShowS)
-> (PadLinkReturn -> String)
-> ([PadLinkReturn] -> ShowS)
-> Show PadLinkReturn
forall a.
(Int -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a
$cshowsPrec :: Int -> PadLinkReturn -> ShowS
showsPrec :: Int -> PadLinkReturn -> ShowS
$cshow :: PadLinkReturn -> String
show :: PadLinkReturn -> String
$cshowList :: [PadLinkReturn] -> ShowS
showList :: [PadLinkReturn] -> ShowS
Show, PadLinkReturn -> PadLinkReturn -> Bool
(PadLinkReturn -> PadLinkReturn -> Bool)
-> (PadLinkReturn -> PadLinkReturn -> Bool) -> Eq PadLinkReturn
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
$c== :: PadLinkReturn -> PadLinkReturn -> Bool
== :: PadLinkReturn -> PadLinkReturn -> Bool
$c/= :: PadLinkReturn -> PadLinkReturn -> Bool
/= :: PadLinkReturn -> PadLinkReturn -> Bool
Eq)
instance P.Enum PadLinkReturn where
fromEnum :: PadLinkReturn -> Int
fromEnum PadLinkReturn
PadLinkReturnOk = Int
0
fromEnum PadLinkReturn
PadLinkReturnWrongHierarchy = Int
-1
fromEnum PadLinkReturn
PadLinkReturnWasLinked = Int
-2
fromEnum PadLinkReturn
PadLinkReturnWrongDirection = Int
-3
fromEnum PadLinkReturn
PadLinkReturnNoformat = Int
-4
fromEnum PadLinkReturn
PadLinkReturnNosched = Int
-5
fromEnum PadLinkReturn
PadLinkReturnRefused = Int
-6
fromEnum (AnotherPadLinkReturn Int
k) = Int
k
toEnum :: Int -> PadLinkReturn
toEnum Int
0 = PadLinkReturn
PadLinkReturnOk
toEnum Int
-1 = PadLinkReturn
PadLinkReturnWrongHierarchy
toEnum Int
-2 = PadLinkReturn
PadLinkReturnWasLinked
toEnum Int
-3 = PadLinkReturn
PadLinkReturnWrongDirection
toEnum Int
-4 = PadLinkReturn
PadLinkReturnNoformat
toEnum Int
-5 = PadLinkReturn
PadLinkReturnNosched
toEnum Int
-6 = PadLinkReturn
PadLinkReturnRefused
toEnum Int
k = Int -> PadLinkReturn
AnotherPadLinkReturn Int
k
instance P.Ord PadLinkReturn where
compare :: PadLinkReturn -> PadLinkReturn -> Ordering
compare PadLinkReturn
a PadLinkReturn
b = Int -> Int -> Ordering
forall a. Ord a => a -> a -> Ordering
P.compare (PadLinkReturn -> Int
forall a. Enum a => a -> Int
P.fromEnum PadLinkReturn
a) (PadLinkReturn -> Int
forall a. Enum a => a -> Int
P.fromEnum PadLinkReturn
b)
type instance O.ParentTypes PadLinkReturn = '[]
instance O.HasParentTypes PadLinkReturn
foreign import ccall "gst_pad_link_return_get_type" c_gst_pad_link_return_get_type ::
IO GType
instance B.Types.TypedObject PadLinkReturn where
glibType :: IO GType
glibType = IO GType
c_gst_pad_link_return_get_type
instance B.Types.BoxedEnum PadLinkReturn
data PadDirection =
PadDirectionUnknown
| PadDirectionSrc
| PadDirectionSink
| AnotherPadDirection Int
deriving (Int -> PadDirection -> ShowS
[PadDirection] -> ShowS
PadDirection -> String
(Int -> PadDirection -> ShowS)
-> (PadDirection -> String)
-> ([PadDirection] -> ShowS)
-> Show PadDirection
forall a.
(Int -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a
$cshowsPrec :: Int -> PadDirection -> ShowS
showsPrec :: Int -> PadDirection -> ShowS
$cshow :: PadDirection -> String
show :: PadDirection -> String
$cshowList :: [PadDirection] -> ShowS
showList :: [PadDirection] -> ShowS
Show, PadDirection -> PadDirection -> Bool
(PadDirection -> PadDirection -> Bool)
-> (PadDirection -> PadDirection -> Bool) -> Eq PadDirection
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
$c== :: PadDirection -> PadDirection -> Bool
== :: PadDirection -> PadDirection -> Bool
$c/= :: PadDirection -> PadDirection -> Bool
/= :: PadDirection -> PadDirection -> Bool
Eq)
instance P.Enum PadDirection where
fromEnum :: PadDirection -> Int
fromEnum PadDirection
PadDirectionUnknown = Int
0
fromEnum PadDirection
PadDirectionSrc = Int
1
fromEnum PadDirection
PadDirectionSink = Int
2
fromEnum (AnotherPadDirection Int
k) = Int
k
toEnum :: Int -> PadDirection
toEnum Int
0 = PadDirection
PadDirectionUnknown
toEnum Int
1 = PadDirection
PadDirectionSrc
toEnum Int
2 = PadDirection
PadDirectionSink
toEnum Int
k = Int -> PadDirection
AnotherPadDirection Int
k
instance P.Ord PadDirection where
compare :: PadDirection -> PadDirection -> Ordering
compare PadDirection
a PadDirection
b = Int -> Int -> Ordering
forall a. Ord a => a -> a -> Ordering
P.compare (PadDirection -> Int
forall a. Enum a => a -> Int
P.fromEnum PadDirection
a) (PadDirection -> Int
forall a. Enum a => a -> Int
P.fromEnum PadDirection
b)
type instance O.ParentTypes PadDirection = '[]
instance O.HasParentTypes PadDirection
foreign import ccall "gst_pad_direction_get_type" c_gst_pad_direction_get_type ::
IO GType
instance B.Types.TypedObject PadDirection where
glibType :: IO GType
glibType = IO GType
c_gst_pad_direction_get_type
instance B.Types.BoxedEnum PadDirection
data LibraryError =
LibraryErrorFailed
| LibraryErrorTooLazy
| LibraryErrorInit
| LibraryErrorShutdown
| LibraryErrorSettings
| LibraryErrorEncode
| LibraryErrorNumErrors
| AnotherLibraryError Int
deriving (Int -> LibraryError -> ShowS
[LibraryError] -> ShowS
LibraryError -> String
(Int -> LibraryError -> ShowS)
-> (LibraryError -> String)
-> ([LibraryError] -> ShowS)
-> Show LibraryError
forall a.
(Int -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a
$cshowsPrec :: Int -> LibraryError -> ShowS
showsPrec :: Int -> LibraryError -> ShowS
$cshow :: LibraryError -> String
show :: LibraryError -> String
$cshowList :: [LibraryError] -> ShowS
showList :: [LibraryError] -> ShowS
Show, LibraryError -> LibraryError -> Bool
(LibraryError -> LibraryError -> Bool)
-> (LibraryError -> LibraryError -> Bool) -> Eq LibraryError
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
$c== :: LibraryError -> LibraryError -> Bool
== :: LibraryError -> LibraryError -> Bool
$c/= :: LibraryError -> LibraryError -> Bool
/= :: LibraryError -> LibraryError -> Bool
Eq)
instance P.Enum LibraryError where
fromEnum :: LibraryError -> Int
fromEnum LibraryError
LibraryErrorFailed = Int
1
fromEnum LibraryError
LibraryErrorTooLazy = Int
2
fromEnum LibraryError
LibraryErrorInit = Int
3
fromEnum LibraryError
LibraryErrorShutdown = Int
4
fromEnum LibraryError
LibraryErrorSettings = Int
5
fromEnum LibraryError
LibraryErrorEncode = Int
6
fromEnum LibraryError
LibraryErrorNumErrors = Int
7
fromEnum (AnotherLibraryError Int
k) = Int
k
toEnum :: Int -> LibraryError
toEnum Int
1 = LibraryError
LibraryErrorFailed
toEnum Int
2 = LibraryError
LibraryErrorTooLazy
toEnum Int
3 = LibraryError
LibraryErrorInit
toEnum Int
4 = LibraryError
LibraryErrorShutdown
toEnum Int
5 = LibraryError
LibraryErrorSettings
toEnum Int
6 = LibraryError
LibraryErrorEncode
toEnum Int
7 = LibraryError
LibraryErrorNumErrors
toEnum Int
k = Int -> LibraryError
AnotherLibraryError Int
k
instance P.Ord LibraryError where
compare :: LibraryError -> LibraryError -> Ordering
compare LibraryError
a LibraryError
b = Int -> Int -> Ordering
forall a. Ord a => a -> a -> Ordering
P.compare (LibraryError -> Int
forall a. Enum a => a -> Int
P.fromEnum LibraryError
a) (LibraryError -> Int
forall a. Enum a => a -> Int
P.fromEnum LibraryError
b)
instance GErrorClass LibraryError where
gerrorClassDomain :: LibraryError -> Text
gerrorClassDomain LibraryError
_ = Text
"gst-library-error-quark"
catchLibraryError ::
IO a ->
(LibraryError -> GErrorMessage -> IO a) ->
IO a
catchLibraryError :: forall a. IO a -> (LibraryError -> Text -> IO a) -> IO a
catchLibraryError = IO a -> (LibraryError -> Text -> IO a) -> IO a
forall err a.
GErrorClass err =>
IO a -> (err -> Text -> IO a) -> IO a
catchGErrorJustDomain
handleLibraryError ::
(LibraryError -> GErrorMessage -> IO a) ->
IO a ->
IO a
handleLibraryError :: forall a. (LibraryError -> Text -> IO a) -> IO a -> IO a
handleLibraryError = (LibraryError -> Text -> IO a) -> IO a -> IO a
forall err a.
GErrorClass err =>
(err -> Text -> IO a) -> IO a -> IO a
handleGErrorJustDomain
type instance O.ParentTypes LibraryError = '[]
instance O.HasParentTypes LibraryError
foreign import ccall "gst_library_error_get_type" c_gst_library_error_get_type ::
IO GType
instance B.Types.TypedObject LibraryError where
glibType :: IO GType
glibType = IO GType
c_gst_library_error_get_type
instance B.Types.BoxedEnum LibraryError
data IteratorResult =
IteratorResultDone
| IteratorResultOk
| IteratorResultResync
| IteratorResultError
| AnotherIteratorResult Int
deriving (Int -> IteratorResult -> ShowS
[IteratorResult] -> ShowS
IteratorResult -> String
(Int -> IteratorResult -> ShowS)
-> (IteratorResult -> String)
-> ([IteratorResult] -> ShowS)
-> Show IteratorResult
forall a.
(Int -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a
$cshowsPrec :: Int -> IteratorResult -> ShowS
showsPrec :: Int -> IteratorResult -> ShowS
$cshow :: IteratorResult -> String
show :: IteratorResult -> String
$cshowList :: [IteratorResult] -> ShowS
showList :: [IteratorResult] -> ShowS
Show, IteratorResult -> IteratorResult -> Bool
(IteratorResult -> IteratorResult -> Bool)
-> (IteratorResult -> IteratorResult -> Bool) -> Eq IteratorResult
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
$c== :: IteratorResult -> IteratorResult -> Bool
== :: IteratorResult -> IteratorResult -> Bool
$c/= :: IteratorResult -> IteratorResult -> Bool
/= :: IteratorResult -> IteratorResult -> Bool
Eq)
instance P.Enum IteratorResult where
fromEnum :: IteratorResult -> Int
fromEnum IteratorResult
IteratorResultDone = Int
0
fromEnum IteratorResult
IteratorResultOk = Int
1
fromEnum IteratorResult
IteratorResultResync = Int
2
fromEnum IteratorResult
IteratorResultError = Int
3
fromEnum (AnotherIteratorResult Int
k) = Int
k
toEnum :: Int -> IteratorResult
toEnum Int
0 = IteratorResult
IteratorResultDone
toEnum Int
1 = IteratorResult
IteratorResultOk
toEnum Int
2 = IteratorResult
IteratorResultResync
toEnum Int
3 = IteratorResult
IteratorResultError
toEnum Int
k = Int -> IteratorResult
AnotherIteratorResult Int
k
instance P.Ord IteratorResult where
compare :: IteratorResult -> IteratorResult -> Ordering
compare IteratorResult
a IteratorResult
b = Int -> Int -> Ordering
forall a. Ord a => a -> a -> Ordering
P.compare (IteratorResult -> Int
forall a. Enum a => a -> Int
P.fromEnum IteratorResult
a) (IteratorResult -> Int
forall a. Enum a => a -> Int
P.fromEnum IteratorResult
b)
type instance O.ParentTypes IteratorResult = '[]
instance O.HasParentTypes IteratorResult
foreign import ccall "gst_iterator_result_get_type" c_gst_iterator_result_get_type ::
IO GType
instance B.Types.TypedObject IteratorResult where
glibType :: IO GType
glibType = IO GType
c_gst_iterator_result_get_type
instance B.Types.BoxedEnum IteratorResult
data IteratorItem =
IteratorItemSkip
| IteratorItemPass
| IteratorItemEnd
| AnotherIteratorItem Int
deriving (Int -> IteratorItem -> ShowS
[IteratorItem] -> ShowS
IteratorItem -> String
(Int -> IteratorItem -> ShowS)
-> (IteratorItem -> String)
-> ([IteratorItem] -> ShowS)
-> Show IteratorItem
forall a.
(Int -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a
$cshowsPrec :: Int -> IteratorItem -> ShowS
showsPrec :: Int -> IteratorItem -> ShowS
$cshow :: IteratorItem -> String
show :: IteratorItem -> String
$cshowList :: [IteratorItem] -> ShowS
showList :: [IteratorItem] -> ShowS
Show, IteratorItem -> IteratorItem -> Bool
(IteratorItem -> IteratorItem -> Bool)
-> (IteratorItem -> IteratorItem -> Bool) -> Eq IteratorItem
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
$c== :: IteratorItem -> IteratorItem -> Bool
== :: IteratorItem -> IteratorItem -> Bool
$c/= :: IteratorItem -> IteratorItem -> Bool
/= :: IteratorItem -> IteratorItem -> Bool
Eq)
instance P.Enum IteratorItem where
fromEnum :: IteratorItem -> Int
fromEnum IteratorItem
IteratorItemSkip = Int
0
fromEnum IteratorItem
IteratorItemPass = Int
1
fromEnum IteratorItem
IteratorItemEnd = Int
2
fromEnum (AnotherIteratorItem Int
k) = Int
k
toEnum :: Int -> IteratorItem
toEnum Int
0 = IteratorItem
IteratorItemSkip
toEnum Int
1 = IteratorItem
IteratorItemPass
toEnum Int
2 = IteratorItem
IteratorItemEnd
toEnum Int
k = Int -> IteratorItem
AnotherIteratorItem Int
k
instance P.Ord IteratorItem where
compare :: IteratorItem -> IteratorItem -> Ordering
compare IteratorItem
a IteratorItem
b = Int -> Int -> Ordering
forall a. Ord a => a -> a -> Ordering
P.compare (IteratorItem -> Int
forall a. Enum a => a -> Int
P.fromEnum IteratorItem
a) (IteratorItem -> Int
forall a. Enum a => a -> Int
P.fromEnum IteratorItem
b)
type instance O.ParentTypes IteratorItem = '[]
instance O.HasParentTypes IteratorItem
foreign import ccall "gst_iterator_item_get_type" c_gst_iterator_item_get_type ::
IO GType
instance B.Types.TypedObject IteratorItem where
glibType :: IO GType
glibType = IO GType
c_gst_iterator_item_get_type
instance B.Types.BoxedEnum IteratorItem
data Format =
FormatUndefined
| FormatDefault
| FormatBytes
| FormatTime
| FormatBuffers
| FormatPercent
| AnotherFormat Int
deriving (Int -> Format -> ShowS
[Format] -> ShowS
Format -> String
(Int -> Format -> ShowS)
-> (Format -> String) -> ([Format] -> ShowS) -> Show Format
forall a.
(Int -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a
$cshowsPrec :: Int -> Format -> ShowS
showsPrec :: Int -> Format -> ShowS
$cshow :: Format -> String
show :: Format -> String
$cshowList :: [Format] -> ShowS
showList :: [Format] -> ShowS
Show, Format -> Format -> Bool
(Format -> Format -> Bool)
-> (Format -> Format -> Bool) -> Eq Format
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
$c== :: Format -> Format -> Bool
== :: Format -> Format -> Bool
$c/= :: Format -> Format -> Bool
/= :: Format -> Format -> Bool
Eq)
instance P.Enum Format where
fromEnum :: Format -> Int
fromEnum Format
FormatUndefined = Int
0
fromEnum Format
FormatDefault = Int
1
fromEnum Format
FormatBytes = Int
2
fromEnum Format
FormatTime = Int
3
fromEnum Format
FormatBuffers = Int
4
fromEnum Format
FormatPercent = Int
5
fromEnum (AnotherFormat Int
k) = Int
k
toEnum :: Int -> Format
toEnum Int
0 = Format
FormatUndefined
toEnum Int
1 = Format
FormatDefault
toEnum Int
2 = Format
FormatBytes
toEnum Int
3 = Format
FormatTime
toEnum Int
4 = Format
FormatBuffers
toEnum Int
5 = Format
FormatPercent
toEnum Int
k = Int -> Format
AnotherFormat Int
k
instance P.Ord Format where
compare :: Format -> Format -> Ordering
compare Format
a Format
b = Int -> Int -> Ordering
forall a. Ord a => a -> a -> Ordering
P.compare (Format -> Int
forall a. Enum a => a -> Int
P.fromEnum Format
a) (Format -> Int
forall a. Enum a => a -> Int
P.fromEnum Format
b)
type instance O.ParentTypes Format = '[]
instance O.HasParentTypes Format
foreign import ccall "gst_format_get_type" c_gst_format_get_type ::
IO GType
instance B.Types.TypedObject Format where
glibType :: IO GType
glibType = IO GType
c_gst_format_get_type
instance B.Types.BoxedEnum Format
data FlowReturn =
FlowReturnCustomSuccess2
| FlowReturnCustomSuccess1
| FlowReturnCustomSuccess
| FlowReturnOk
| FlowReturnNotLinked
| FlowReturnFlushing
| FlowReturnEos
| FlowReturnNotNegotiated
| FlowReturnError
| FlowReturnNotSupported
| FlowReturnCustomError
| FlowReturnCustomError1
| FlowReturnCustomError2
| AnotherFlowReturn Int
deriving (Int -> FlowReturn -> ShowS
[FlowReturn] -> ShowS
FlowReturn -> String
(Int -> FlowReturn -> ShowS)
-> (FlowReturn -> String)
-> ([FlowReturn] -> ShowS)
-> Show FlowReturn
forall a.
(Int -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a
$cshowsPrec :: Int -> FlowReturn -> ShowS
showsPrec :: Int -> FlowReturn -> ShowS
$cshow :: FlowReturn -> String
show :: FlowReturn -> String
$cshowList :: [FlowReturn] -> ShowS
showList :: [FlowReturn] -> ShowS
Show, FlowReturn -> FlowReturn -> Bool
(FlowReturn -> FlowReturn -> Bool)
-> (FlowReturn -> FlowReturn -> Bool) -> Eq FlowReturn
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
$c== :: FlowReturn -> FlowReturn -> Bool
== :: FlowReturn -> FlowReturn -> Bool
$c/= :: FlowReturn -> FlowReturn -> Bool
/= :: FlowReturn -> FlowReturn -> Bool
Eq)
instance P.Enum FlowReturn where
fromEnum :: FlowReturn -> Int
fromEnum FlowReturn
FlowReturnCustomSuccess2 = Int
102
fromEnum FlowReturn
FlowReturnCustomSuccess1 = Int
101
fromEnum FlowReturn
FlowReturnCustomSuccess = Int
100
fromEnum FlowReturn
FlowReturnOk = Int
0
fromEnum FlowReturn
FlowReturnNotLinked = Int
-1
fromEnum FlowReturn
FlowReturnFlushing = Int
-2
fromEnum FlowReturn
FlowReturnEos = Int
-3
fromEnum FlowReturn
FlowReturnNotNegotiated = Int
-4
fromEnum FlowReturn
FlowReturnError = Int
-5
fromEnum FlowReturn
FlowReturnNotSupported = Int
-6
fromEnum FlowReturn
FlowReturnCustomError = Int
-100
fromEnum FlowReturn
FlowReturnCustomError1 = Int
-101
fromEnum FlowReturn
FlowReturnCustomError2 = Int
-102
fromEnum (AnotherFlowReturn Int
k) = Int
k
toEnum :: Int -> FlowReturn
toEnum Int
102 = FlowReturn
FlowReturnCustomSuccess2
toEnum Int
101 = FlowReturn
FlowReturnCustomSuccess1
toEnum Int
100 = FlowReturn
FlowReturnCustomSuccess
toEnum Int
0 = FlowReturn
FlowReturnOk
toEnum Int
-1 = FlowReturn
FlowReturnNotLinked
toEnum Int
-2 = FlowReturn
FlowReturnFlushing
toEnum Int
-3 = FlowReturn
FlowReturnEos
toEnum Int
-4 = FlowReturn
FlowReturnNotNegotiated
toEnum Int
-5 = FlowReturn
FlowReturnError
toEnum Int
-6 = FlowReturn
FlowReturnNotSupported
toEnum Int
-100 = FlowReturn
FlowReturnCustomError
toEnum Int
-101 = FlowReturn
FlowReturnCustomError1
toEnum Int
-102 = FlowReturn
FlowReturnCustomError2
toEnum Int
k = Int -> FlowReturn
AnotherFlowReturn Int
k
instance P.Ord FlowReturn where
compare :: FlowReturn -> FlowReturn -> Ordering
compare FlowReturn
a FlowReturn
b = Int -> Int -> Ordering
forall a. Ord a => a -> a -> Ordering
P.compare (FlowReturn -> Int
forall a. Enum a => a -> Int
P.fromEnum FlowReturn
a) (FlowReturn -> Int
forall a. Enum a => a -> Int
P.fromEnum FlowReturn
b)
type instance O.ParentTypes FlowReturn = '[]
instance O.HasParentTypes FlowReturn
foreign import ccall "gst_flow_return_get_type" c_gst_flow_return_get_type ::
IO GType
instance B.Types.TypedObject FlowReturn where
glibType :: IO GType
glibType = IO GType
c_gst_flow_return_get_type
instance B.Types.BoxedEnum FlowReturn
data EventType =
EventTypeUnknown
| EventTypeFlushStart
| EventTypeFlushStop
| EventTypeStreamStart
| EventTypeCaps
| EventTypeSegment
| EventTypeStreamCollection
| EventTypeTag
| EventTypeBuffersize
| EventTypeSinkMessage
| EventTypeStreamGroupDone
| EventTypeEos
| EventTypeToc
| EventTypeProtection
| EventTypeSegmentDone
| EventTypeGap
| EventTypeInstantRateChange
| EventTypeQos
| EventTypeSeek
| EventTypeNavigation
| EventTypeLatency
| EventTypeStep
| EventTypeReconfigure
| EventTypeTocSelect
| EventTypeSelectStreams
| EventTypeInstantRateSyncTime
| EventTypeCustomUpstream
| EventTypeCustomDownstream
| EventTypeCustomDownstreamOob
| EventTypeCustomDownstreamSticky
| EventTypeCustomBoth
| EventTypeCustomBothOob
| AnotherEventType Int
deriving (Int -> EventType -> ShowS
[EventType] -> ShowS
EventType -> String
(Int -> EventType -> ShowS)
-> (EventType -> String)
-> ([EventType] -> ShowS)
-> Show EventType
forall a.
(Int -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a
$cshowsPrec :: Int -> EventType -> ShowS
showsPrec :: Int -> EventType -> ShowS
$cshow :: EventType -> String
show :: EventType -> String
$cshowList :: [EventType] -> ShowS
showList :: [EventType] -> ShowS
Show, EventType -> EventType -> Bool
(EventType -> EventType -> Bool)
-> (EventType -> EventType -> Bool) -> Eq EventType
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
$c== :: EventType -> EventType -> Bool
== :: EventType -> EventType -> Bool
$c/= :: EventType -> EventType -> Bool
/= :: EventType -> EventType -> Bool
Eq)
instance P.Enum EventType where
fromEnum :: EventType -> Int
fromEnum EventType
EventTypeUnknown = Int
0
fromEnum EventType
EventTypeFlushStart = Int
2563
fromEnum EventType
EventTypeFlushStop = Int
5127
fromEnum EventType
EventTypeStreamStart = Int
10254
fromEnum EventType
EventTypeCaps = Int
12814
fromEnum EventType
EventTypeSegment = Int
17934
fromEnum EventType
EventTypeStreamCollection = Int
19230
fromEnum EventType
EventTypeTag = Int
20510
fromEnum EventType
EventTypeBuffersize = Int
23054
fromEnum EventType
EventTypeSinkMessage = Int
25630
fromEnum EventType
EventTypeStreamGroupDone = Int
26894
fromEnum EventType
EventTypeEos = Int
28174
fromEnum EventType
EventTypeToc = Int
30750
fromEnum EventType
EventTypeProtection = Int
33310
fromEnum EventType
EventTypeSegmentDone = Int
38406
fromEnum EventType
EventTypeGap = Int
40966
fromEnum EventType
EventTypeInstantRateChange = Int
46090
fromEnum EventType
EventTypeQos = Int
48641
fromEnum EventType
EventTypeSeek = Int
51201
fromEnum EventType
EventTypeNavigation = Int
53761
fromEnum EventType
EventTypeLatency = Int
56321
fromEnum EventType
EventTypeStep = Int
58881
fromEnum EventType
EventTypeReconfigure = Int
61441
fromEnum EventType
EventTypeTocSelect = Int
64001
fromEnum EventType
EventTypeSelectStreams = Int
66561
fromEnum EventType
EventTypeInstantRateSyncTime = Int
66817
fromEnum EventType
EventTypeCustomUpstream = Int
69121
fromEnum EventType
EventTypeCustomDownstream = Int
71686
fromEnum EventType
EventTypeCustomDownstreamOob = Int
74242
fromEnum EventType
EventTypeCustomDownstreamSticky = Int
76830
fromEnum EventType
EventTypeCustomBoth = Int
79367
fromEnum EventType
EventTypeCustomBothOob = Int
81923
fromEnum (AnotherEventType Int
k) = Int
k
toEnum :: Int -> EventType
toEnum Int
0 = EventType
EventTypeUnknown
toEnum Int
2563 = EventType
EventTypeFlushStart
toEnum Int
5127 = EventType
EventTypeFlushStop
toEnum Int
10254 = EventType
EventTypeStreamStart
toEnum Int
12814 = EventType
EventTypeCaps
toEnum Int
17934 = EventType
EventTypeSegment
toEnum Int
19230 = EventType
EventTypeStreamCollection
toEnum Int
20510 = EventType
EventTypeTag
toEnum Int
23054 = EventType
EventTypeBuffersize
toEnum Int
25630 = EventType
EventTypeSinkMessage
toEnum Int
26894 = EventType
EventTypeStreamGroupDone
toEnum Int
28174 = EventType
EventTypeEos
toEnum Int
30750 = EventType
EventTypeToc
toEnum Int
33310 = EventType
EventTypeProtection
toEnum Int
38406 = EventType
EventTypeSegmentDone
toEnum Int
40966 = EventType
EventTypeGap
toEnum Int
46090 = EventType
EventTypeInstantRateChange
toEnum Int
48641 = EventType
EventTypeQos
toEnum Int
51201 = EventType
EventTypeSeek
toEnum Int
53761 = EventType
EventTypeNavigation
toEnum Int
56321 = EventType
EventTypeLatency
toEnum Int
58881 = EventType
EventTypeStep
toEnum Int
61441 = EventType
EventTypeReconfigure
toEnum Int
64001 = EventType
EventTypeTocSelect
toEnum Int
66561 = EventType
EventTypeSelectStreams
toEnum Int
66817 = EventType
EventTypeInstantRateSyncTime
toEnum Int
69121 = EventType
EventTypeCustomUpstream
toEnum Int
71686 = EventType
EventTypeCustomDownstream
toEnum Int
74242 = EventType
EventTypeCustomDownstreamOob
toEnum Int
76830 = EventType
EventTypeCustomDownstreamSticky
toEnum Int
79367 = EventType
EventTypeCustomBoth
toEnum Int
81923 = EventType
EventTypeCustomBothOob
toEnum Int
k = Int -> EventType
AnotherEventType Int
k
instance P.Ord EventType where
compare :: EventType -> EventType -> Ordering
compare EventType
a EventType
b = Int -> Int -> Ordering
forall a. Ord a => a -> a -> Ordering
P.compare (EventType -> Int
forall a. Enum a => a -> Int
P.fromEnum EventType
a) (EventType -> Int
forall a. Enum a => a -> Int
P.fromEnum EventType
b)
type instance O.ParentTypes EventType = '[]
instance O.HasParentTypes EventType
foreign import ccall "gst_event_type_get_type" c_gst_event_type_get_type ::
IO GType
instance B.Types.TypedObject EventType where
glibType :: IO GType
glibType = IO GType
c_gst_event_type_get_type
instance B.Types.BoxedEnum EventType
data DebugLevel =
DebugLevelNone
| DebugLevelError
| DebugLevelWarning
| DebugLevelFixme
| DebugLevelInfo
| DebugLevelDebug
| DebugLevelLog
| DebugLevelTrace
| DebugLevelMemdump
| DebugLevelCount
| AnotherDebugLevel Int
deriving (Int -> DebugLevel -> ShowS
[DebugLevel] -> ShowS
DebugLevel -> String
(Int -> DebugLevel -> ShowS)
-> (DebugLevel -> String)
-> ([DebugLevel] -> ShowS)
-> Show DebugLevel
forall a.
(Int -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a
$cshowsPrec :: Int -> DebugLevel -> ShowS
showsPrec :: Int -> DebugLevel -> ShowS
$cshow :: DebugLevel -> String
show :: DebugLevel -> String
$cshowList :: [DebugLevel] -> ShowS
showList :: [DebugLevel] -> ShowS
Show, DebugLevel -> DebugLevel -> Bool
(DebugLevel -> DebugLevel -> Bool)
-> (DebugLevel -> DebugLevel -> Bool) -> Eq DebugLevel
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
$c== :: DebugLevel -> DebugLevel -> Bool
== :: DebugLevel -> DebugLevel -> Bool
$c/= :: DebugLevel -> DebugLevel -> Bool
/= :: DebugLevel -> DebugLevel -> Bool
Eq)
instance P.Enum DebugLevel where
fromEnum :: DebugLevel -> Int
fromEnum DebugLevel
DebugLevelNone = Int
0
fromEnum DebugLevel
DebugLevelError = Int
1
fromEnum DebugLevel
DebugLevelWarning = Int
2
fromEnum DebugLevel
DebugLevelFixme = Int
3
fromEnum DebugLevel
DebugLevelInfo = Int
4
fromEnum DebugLevel
DebugLevelDebug = Int
5
fromEnum DebugLevel
DebugLevelLog = Int
6
fromEnum DebugLevel
DebugLevelTrace = Int
7
fromEnum DebugLevel
DebugLevelMemdump = Int
9
fromEnum DebugLevel
DebugLevelCount = Int
10
fromEnum (AnotherDebugLevel Int
k) = Int
k
toEnum :: Int -> DebugLevel
toEnum Int
0 = DebugLevel
DebugLevelNone
toEnum Int
1 = DebugLevel
DebugLevelError
toEnum Int
2 = DebugLevel
DebugLevelWarning
toEnum Int
3 = DebugLevel
DebugLevelFixme
toEnum Int
4 = DebugLevel
DebugLevelInfo
toEnum Int
5 = DebugLevel
DebugLevelDebug
toEnum Int
6 = DebugLevel
DebugLevelLog
toEnum Int
7 = DebugLevel
DebugLevelTrace
toEnum Int
9 = DebugLevel
DebugLevelMemdump
toEnum Int
10 = DebugLevel
DebugLevelCount
toEnum Int
k = Int -> DebugLevel
AnotherDebugLevel Int
k
instance P.Ord DebugLevel where
compare :: DebugLevel -> DebugLevel -> Ordering
compare DebugLevel
a DebugLevel
b = Int -> Int -> Ordering
forall a. Ord a => a -> a -> Ordering
P.compare (DebugLevel -> Int
forall a. Enum a => a -> Int
P.fromEnum DebugLevel
a) (DebugLevel -> Int
forall a. Enum a => a -> Int
P.fromEnum DebugLevel
b)
type instance O.ParentTypes DebugLevel = '[]
instance O.HasParentTypes DebugLevel
foreign import ccall "gst_debug_level_get_type" c_gst_debug_level_get_type ::
IO GType
instance B.Types.TypedObject DebugLevel where
glibType :: IO GType
glibType = IO GType
c_gst_debug_level_get_type
instance B.Types.BoxedEnum DebugLevel
data DebugColorMode =
DebugColorModeOff
| DebugColorModeOn
| DebugColorModeUnix
| AnotherDebugColorMode Int
deriving (Int -> DebugColorMode -> ShowS
[DebugColorMode] -> ShowS
DebugColorMode -> String
(Int -> DebugColorMode -> ShowS)
-> (DebugColorMode -> String)
-> ([DebugColorMode] -> ShowS)
-> Show DebugColorMode
forall a.
(Int -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a
$cshowsPrec :: Int -> DebugColorMode -> ShowS
showsPrec :: Int -> DebugColorMode -> ShowS
$cshow :: DebugColorMode -> String
show :: DebugColorMode -> String
$cshowList :: [DebugColorMode] -> ShowS
showList :: [DebugColorMode] -> ShowS
Show, DebugColorMode -> DebugColorMode -> Bool
(DebugColorMode -> DebugColorMode -> Bool)
-> (DebugColorMode -> DebugColorMode -> Bool) -> Eq DebugColorMode
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
$c== :: DebugColorMode -> DebugColorMode -> Bool
== :: DebugColorMode -> DebugColorMode -> Bool
$c/= :: DebugColorMode -> DebugColorMode -> Bool
/= :: DebugColorMode -> DebugColorMode -> Bool
Eq)
instance P.Enum DebugColorMode where
fromEnum :: DebugColorMode -> Int
fromEnum DebugColorMode
DebugColorModeOff = Int
0
fromEnum DebugColorMode
DebugColorModeOn = Int
1
fromEnum DebugColorMode
DebugColorModeUnix = Int
2
fromEnum (AnotherDebugColorMode Int
k) = Int
k
toEnum :: Int -> DebugColorMode
toEnum Int
0 = DebugColorMode
DebugColorModeOff
toEnum Int
1 = DebugColorMode
DebugColorModeOn
toEnum Int
2 = DebugColorMode
DebugColorModeUnix
toEnum Int
k = Int -> DebugColorMode
AnotherDebugColorMode Int
k
instance P.Ord DebugColorMode where
compare :: DebugColorMode -> DebugColorMode -> Ordering
compare DebugColorMode
a DebugColorMode
b = Int -> Int -> Ordering
forall a. Ord a => a -> a -> Ordering
P.compare (DebugColorMode -> Int
forall a. Enum a => a -> Int
P.fromEnum DebugColorMode
a) (DebugColorMode -> Int
forall a. Enum a => a -> Int
P.fromEnum DebugColorMode
b)
type instance O.ParentTypes DebugColorMode = '[]
instance O.HasParentTypes DebugColorMode
foreign import ccall "gst_debug_color_mode_get_type" c_gst_debug_color_mode_get_type ::
IO GType
instance B.Types.TypedObject DebugColorMode where
glibType :: IO GType
glibType = IO GType
c_gst_debug_color_mode_get_type
instance B.Types.BoxedEnum DebugColorMode
data CoreError =
CoreErrorFailed
| CoreErrorTooLazy
| CoreErrorNotImplemented
| CoreErrorStateChange
| CoreErrorPad
| CoreErrorThread
| CoreErrorNegotiation
| CoreErrorEvent
| CoreErrorSeek
| CoreErrorCaps
| CoreErrorTag
| CoreErrorMissingPlugin
| CoreErrorClock
| CoreErrorDisabled
| CoreErrorNumErrors
| AnotherCoreError Int
deriving (Int -> CoreError -> ShowS
[CoreError] -> ShowS
CoreError -> String
(Int -> CoreError -> ShowS)
-> (CoreError -> String)
-> ([CoreError] -> ShowS)
-> Show CoreError
forall a.
(Int -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a
$cshowsPrec :: Int -> CoreError -> ShowS
showsPrec :: Int -> CoreError -> ShowS
$cshow :: CoreError -> String
show :: CoreError -> String
$cshowList :: [CoreError] -> ShowS
showList :: [CoreError] -> ShowS
Show, CoreError -> CoreError -> Bool
(CoreError -> CoreError -> Bool)
-> (CoreError -> CoreError -> Bool) -> Eq CoreError
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
$c== :: CoreError -> CoreError -> Bool
== :: CoreError -> CoreError -> Bool
$c/= :: CoreError -> CoreError -> Bool
/= :: CoreError -> CoreError -> Bool
Eq)
instance P.Enum CoreError where
fromEnum :: CoreError -> Int
fromEnum CoreError
CoreErrorFailed = Int
1
fromEnum CoreError
CoreErrorTooLazy = Int
2
fromEnum CoreError
CoreErrorNotImplemented = Int
3
fromEnum CoreError
CoreErrorStateChange = Int
4
fromEnum CoreError
CoreErrorPad = Int
5
fromEnum CoreError
CoreErrorThread = Int
6
fromEnum CoreError
CoreErrorNegotiation = Int
7
fromEnum CoreError
CoreErrorEvent = Int
8
fromEnum CoreError
CoreErrorSeek = Int
9
fromEnum CoreError
CoreErrorCaps = Int
10
fromEnum CoreError
CoreErrorTag = Int
11
fromEnum CoreError
CoreErrorMissingPlugin = Int
12
fromEnum CoreError
CoreErrorClock = Int
13
fromEnum CoreError
CoreErrorDisabled = Int
14
fromEnum CoreError
CoreErrorNumErrors = Int
15
fromEnum (AnotherCoreError Int
k) = Int
k
toEnum :: Int -> CoreError
toEnum Int
1 = CoreError
CoreErrorFailed
toEnum Int
2 = CoreError
CoreErrorTooLazy
toEnum Int
3 = CoreError
CoreErrorNotImplemented
toEnum Int
4 = CoreError
CoreErrorStateChange
toEnum Int
5 = CoreError
CoreErrorPad
toEnum Int
6 = CoreError
CoreErrorThread
toEnum Int
7 = CoreError
CoreErrorNegotiation
toEnum Int
8 = CoreError
CoreErrorEvent
toEnum Int
9 = CoreError
CoreErrorSeek
toEnum Int
10 = CoreError
CoreErrorCaps
toEnum Int
11 = CoreError
CoreErrorTag
toEnum Int
12 = CoreError
CoreErrorMissingPlugin
toEnum Int
13 = CoreError
CoreErrorClock
toEnum Int
14 = CoreError
CoreErrorDisabled
toEnum Int
15 = CoreError
CoreErrorNumErrors
toEnum Int
k = Int -> CoreError
AnotherCoreError Int
k
instance P.Ord CoreError where
compare :: CoreError -> CoreError -> Ordering
compare CoreError
a CoreError
b = Int -> Int -> Ordering
forall a. Ord a => a -> a -> Ordering
P.compare (CoreError -> Int
forall a. Enum a => a -> Int
P.fromEnum CoreError
a) (CoreError -> Int
forall a. Enum a => a -> Int
P.fromEnum CoreError
b)
instance GErrorClass CoreError where
gerrorClassDomain :: CoreError -> Text
gerrorClassDomain CoreError
_ = Text
"gst-core-error-quark"
catchCoreError ::
IO a ->
(CoreError -> GErrorMessage -> IO a) ->
IO a
catchCoreError :: forall a. IO a -> (CoreError -> Text -> IO a) -> IO a
catchCoreError = IO a -> (CoreError -> Text -> IO a) -> IO a
forall err a.
GErrorClass err =>
IO a -> (err -> Text -> IO a) -> IO a
catchGErrorJustDomain
handleCoreError ::
(CoreError -> GErrorMessage -> IO a) ->
IO a ->
IO a
handleCoreError :: forall a. (CoreError -> Text -> IO a) -> IO a -> IO a
handleCoreError = (CoreError -> Text -> IO a) -> IO a -> IO a
forall err a.
GErrorClass err =>
(err -> Text -> IO a) -> IO a -> IO a
handleGErrorJustDomain
type instance O.ParentTypes CoreError = '[]
instance O.HasParentTypes CoreError
foreign import ccall "gst_core_error_get_type" c_gst_core_error_get_type ::
IO GType
instance B.Types.TypedObject CoreError where
glibType :: IO GType
glibType = IO GType
c_gst_core_error_get_type
instance B.Types.BoxedEnum CoreError
data ClockType =
ClockTypeRealtime
| ClockTypeMonotonic
| ClockTypeOther
| ClockTypeTai
| AnotherClockType Int
deriving (Int -> ClockType -> ShowS
[ClockType] -> ShowS
ClockType -> String
(Int -> ClockType -> ShowS)
-> (ClockType -> String)
-> ([ClockType] -> ShowS)
-> Show ClockType
forall a.
(Int -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a
$cshowsPrec :: Int -> ClockType -> ShowS
showsPrec :: Int -> ClockType -> ShowS
$cshow :: ClockType -> String
show :: ClockType -> String
$cshowList :: [ClockType] -> ShowS
showList :: [ClockType] -> ShowS
Show, ClockType -> ClockType -> Bool
(ClockType -> ClockType -> Bool)
-> (ClockType -> ClockType -> Bool) -> Eq ClockType
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
$c== :: ClockType -> ClockType -> Bool
== :: ClockType -> ClockType -> Bool
$c/= :: ClockType -> ClockType -> Bool
/= :: ClockType -> ClockType -> Bool
Eq)
instance P.Enum ClockType where
fromEnum :: ClockType -> Int
fromEnum ClockType
ClockTypeRealtime = Int
0
fromEnum ClockType
ClockTypeMonotonic = Int
1
fromEnum ClockType
ClockTypeOther = Int
2
fromEnum ClockType
ClockTypeTai = Int
3
fromEnum (AnotherClockType Int
k) = Int
k
toEnum :: Int -> ClockType
toEnum Int
0 = ClockType
ClockTypeRealtime
toEnum Int
1 = ClockType
ClockTypeMonotonic
toEnum Int
2 = ClockType
ClockTypeOther
toEnum Int
3 = ClockType
ClockTypeTai
toEnum Int
k = Int -> ClockType
AnotherClockType Int
k
instance P.Ord ClockType where
compare :: ClockType -> ClockType -> Ordering
compare ClockType
a ClockType
b = Int -> Int -> Ordering
forall a. Ord a => a -> a -> Ordering
P.compare (ClockType -> Int
forall a. Enum a => a -> Int
P.fromEnum ClockType
a) (ClockType -> Int
forall a. Enum a => a -> Int
P.fromEnum ClockType
b)
type instance O.ParentTypes ClockType = '[]
instance O.HasParentTypes ClockType
foreign import ccall "gst_clock_type_get_type" c_gst_clock_type_get_type ::
IO GType
instance B.Types.TypedObject ClockType where
glibType :: IO GType
glibType = IO GType
c_gst_clock_type_get_type
instance B.Types.BoxedEnum ClockType
data ClockReturn =
ClockReturnOk
| ClockReturnEarly
| ClockReturnUnscheduled
| ClockReturnBusy
| ClockReturnBadtime
| ClockReturnError
| ClockReturnUnsupported
| ClockReturnDone
| AnotherClockReturn Int
deriving (Int -> ClockReturn -> ShowS
[ClockReturn] -> ShowS
ClockReturn -> String
(Int -> ClockReturn -> ShowS)
-> (ClockReturn -> String)
-> ([ClockReturn] -> ShowS)
-> Show ClockReturn
forall a.
(Int -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a
$cshowsPrec :: Int -> ClockReturn -> ShowS
showsPrec :: Int -> ClockReturn -> ShowS
$cshow :: ClockReturn -> String
show :: ClockReturn -> String
$cshowList :: [ClockReturn] -> ShowS
showList :: [ClockReturn] -> ShowS
Show, ClockReturn -> ClockReturn -> Bool
(ClockReturn -> ClockReturn -> Bool)
-> (ClockReturn -> ClockReturn -> Bool) -> Eq ClockReturn
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
$c== :: ClockReturn -> ClockReturn -> Bool
== :: ClockReturn -> ClockReturn -> Bool
$c/= :: ClockReturn -> ClockReturn -> Bool
/= :: ClockReturn -> ClockReturn -> Bool
Eq)
instance P.Enum ClockReturn where
fromEnum :: ClockReturn -> Int
fromEnum ClockReturn
ClockReturnOk = Int
0
fromEnum ClockReturn
ClockReturnEarly = Int
1
fromEnum ClockReturn
ClockReturnUnscheduled = Int
2
fromEnum ClockReturn
ClockReturnBusy = Int
3
fromEnum ClockReturn
ClockReturnBadtime = Int
4
fromEnum ClockReturn
ClockReturnError = Int
5
fromEnum ClockReturn
ClockReturnUnsupported = Int
6
fromEnum ClockReturn
ClockReturnDone = Int
7
fromEnum (AnotherClockReturn Int
k) = Int
k
toEnum :: Int -> ClockReturn
toEnum Int
0 = ClockReturn
ClockReturnOk
toEnum Int
1 = ClockReturn
ClockReturnEarly
toEnum Int
2 = ClockReturn
ClockReturnUnscheduled
toEnum Int
3 = ClockReturn
ClockReturnBusy
toEnum Int
4 = ClockReturn
ClockReturnBadtime
toEnum Int
5 = ClockReturn
ClockReturnError
toEnum Int
6 = ClockReturn
ClockReturnUnsupported
toEnum Int
7 = ClockReturn
ClockReturnDone
toEnum Int
k = Int -> ClockReturn
AnotherClockReturn Int
k
instance P.Ord ClockReturn where
compare :: ClockReturn -> ClockReturn -> Ordering
compare ClockReturn
a ClockReturn
b = Int -> Int -> Ordering
forall a. Ord a => a -> a -> Ordering
P.compare (ClockReturn -> Int
forall a. Enum a => a -> Int
P.fromEnum ClockReturn
a) (ClockReturn -> Int
forall a. Enum a => a -> Int
P.fromEnum ClockReturn
b)
type instance O.ParentTypes ClockReturn = '[]
instance O.HasParentTypes ClockReturn
foreign import ccall "gst_clock_return_get_type" c_gst_clock_return_get_type ::
IO GType
instance B.Types.TypedObject ClockReturn where
glibType :: IO GType
glibType = IO GType
c_gst_clock_return_get_type
instance B.Types.BoxedEnum ClockReturn
data ClockEntryType =
ClockEntryTypeSingle
| ClockEntryTypePeriodic
| AnotherClockEntryType Int
deriving (Int -> ClockEntryType -> ShowS
[ClockEntryType] -> ShowS
ClockEntryType -> String
(Int -> ClockEntryType -> ShowS)
-> (ClockEntryType -> String)
-> ([ClockEntryType] -> ShowS)
-> Show ClockEntryType
forall a.
(Int -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a
$cshowsPrec :: Int -> ClockEntryType -> ShowS
showsPrec :: Int -> ClockEntryType -> ShowS
$cshow :: ClockEntryType -> String
show :: ClockEntryType -> String
$cshowList :: [ClockEntryType] -> ShowS
showList :: [ClockEntryType] -> ShowS
Show, ClockEntryType -> ClockEntryType -> Bool
(ClockEntryType -> ClockEntryType -> Bool)
-> (ClockEntryType -> ClockEntryType -> Bool) -> Eq ClockEntryType
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
$c== :: ClockEntryType -> ClockEntryType -> Bool
== :: ClockEntryType -> ClockEntryType -> Bool
$c/= :: ClockEntryType -> ClockEntryType -> Bool
/= :: ClockEntryType -> ClockEntryType -> Bool
Eq)
instance P.Enum ClockEntryType where
fromEnum :: ClockEntryType -> Int
fromEnum ClockEntryType
ClockEntryTypeSingle = Int
0
fromEnum ClockEntryType
ClockEntryTypePeriodic = Int
1
fromEnum (AnotherClockEntryType Int
k) = Int
k
toEnum :: Int -> ClockEntryType
toEnum Int
0 = ClockEntryType
ClockEntryTypeSingle
toEnum Int
1 = ClockEntryType
ClockEntryTypePeriodic
toEnum Int
k = Int -> ClockEntryType
AnotherClockEntryType Int
k
instance P.Ord ClockEntryType where
compare :: ClockEntryType -> ClockEntryType -> Ordering
compare ClockEntryType
a ClockEntryType
b = Int -> Int -> Ordering
forall a. Ord a => a -> a -> Ordering
P.compare (ClockEntryType -> Int
forall a. Enum a => a -> Int
P.fromEnum ClockEntryType
a) (ClockEntryType -> Int
forall a. Enum a => a -> Int
P.fromEnum ClockEntryType
b)
type instance O.ParentTypes ClockEntryType = '[]
instance O.HasParentTypes ClockEntryType
foreign import ccall "gst_clock_entry_type_get_type" c_gst_clock_entry_type_get_type ::
IO GType
instance B.Types.TypedObject ClockEntryType where
glibType :: IO GType
glibType = IO GType
c_gst_clock_entry_type_get_type
instance B.Types.BoxedEnum ClockEntryType
data CapsIntersectMode =
CapsIntersectModeZigZag
| CapsIntersectModeFirst
| AnotherCapsIntersectMode Int
deriving (Int -> CapsIntersectMode -> ShowS
[CapsIntersectMode] -> ShowS
CapsIntersectMode -> String
(Int -> CapsIntersectMode -> ShowS)
-> (CapsIntersectMode -> String)
-> ([CapsIntersectMode] -> ShowS)
-> Show CapsIntersectMode
forall a.
(Int -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a
$cshowsPrec :: Int -> CapsIntersectMode -> ShowS
showsPrec :: Int -> CapsIntersectMode -> ShowS
$cshow :: CapsIntersectMode -> String
show :: CapsIntersectMode -> String
$cshowList :: [CapsIntersectMode] -> ShowS
showList :: [CapsIntersectMode] -> ShowS
Show, CapsIntersectMode -> CapsIntersectMode -> Bool
(CapsIntersectMode -> CapsIntersectMode -> Bool)
-> (CapsIntersectMode -> CapsIntersectMode -> Bool)
-> Eq CapsIntersectMode
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
$c== :: CapsIntersectMode -> CapsIntersectMode -> Bool
== :: CapsIntersectMode -> CapsIntersectMode -> Bool
$c/= :: CapsIntersectMode -> CapsIntersectMode -> Bool
/= :: CapsIntersectMode -> CapsIntersectMode -> Bool
Eq)
instance P.Enum CapsIntersectMode where
fromEnum :: CapsIntersectMode -> Int
fromEnum CapsIntersectMode
CapsIntersectModeZigZag = Int
0
fromEnum CapsIntersectMode
CapsIntersectModeFirst = Int
1
fromEnum (AnotherCapsIntersectMode Int
k) = Int
k
toEnum :: Int -> CapsIntersectMode
toEnum Int
0 = CapsIntersectMode
CapsIntersectModeZigZag
toEnum Int
1 = CapsIntersectMode
CapsIntersectModeFirst
toEnum Int
k = Int -> CapsIntersectMode
AnotherCapsIntersectMode Int
k
instance P.Ord CapsIntersectMode where
compare :: CapsIntersectMode -> CapsIntersectMode -> Ordering
compare CapsIntersectMode
a CapsIntersectMode
b = Int -> Int -> Ordering
forall a. Ord a => a -> a -> Ordering
P.compare (CapsIntersectMode -> Int
forall a. Enum a => a -> Int
P.fromEnum CapsIntersectMode
a) (CapsIntersectMode -> Int
forall a. Enum a => a -> Int
P.fromEnum CapsIntersectMode
b)
type instance O.ParentTypes CapsIntersectMode = '[]
instance O.HasParentTypes CapsIntersectMode
foreign import ccall "gst_caps_intersect_mode_get_type" c_gst_caps_intersect_mode_get_type ::
IO GType
instance B.Types.TypedObject CapsIntersectMode where
glibType :: IO GType
glibType = IO GType
c_gst_caps_intersect_mode_get_type
instance B.Types.BoxedEnum CapsIntersectMode
data BusSyncReply =
BusSyncReplyDrop
| BusSyncReplyPass
| BusSyncReplyAsync
| AnotherBusSyncReply Int
deriving (Int -> BusSyncReply -> ShowS
[BusSyncReply] -> ShowS
BusSyncReply -> String
(Int -> BusSyncReply -> ShowS)
-> (BusSyncReply -> String)
-> ([BusSyncReply] -> ShowS)
-> Show BusSyncReply
forall a.
(Int -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a
$cshowsPrec :: Int -> BusSyncReply -> ShowS
showsPrec :: Int -> BusSyncReply -> ShowS
$cshow :: BusSyncReply -> String
show :: BusSyncReply -> String
$cshowList :: [BusSyncReply] -> ShowS
showList :: [BusSyncReply] -> ShowS
Show, BusSyncReply -> BusSyncReply -> Bool
(BusSyncReply -> BusSyncReply -> Bool)
-> (BusSyncReply -> BusSyncReply -> Bool) -> Eq BusSyncReply
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
$c== :: BusSyncReply -> BusSyncReply -> Bool
== :: BusSyncReply -> BusSyncReply -> Bool
$c/= :: BusSyncReply -> BusSyncReply -> Bool
/= :: BusSyncReply -> BusSyncReply -> Bool
Eq)
instance P.Enum BusSyncReply where
fromEnum :: BusSyncReply -> Int
fromEnum BusSyncReply
BusSyncReplyDrop = Int
0
fromEnum BusSyncReply
BusSyncReplyPass = Int
1
fromEnum BusSyncReply
BusSyncReplyAsync = Int
2
fromEnum (AnotherBusSyncReply Int
k) = Int
k
toEnum :: Int -> BusSyncReply
toEnum Int
0 = BusSyncReply
BusSyncReplyDrop
toEnum Int
1 = BusSyncReply
BusSyncReplyPass
toEnum Int
2 = BusSyncReply
BusSyncReplyAsync
toEnum Int
k = Int -> BusSyncReply
AnotherBusSyncReply Int
k
instance P.Ord BusSyncReply where
compare :: BusSyncReply -> BusSyncReply -> Ordering
compare BusSyncReply
a BusSyncReply
b = Int -> Int -> Ordering
forall a. Ord a => a -> a -> Ordering
P.compare (BusSyncReply -> Int
forall a. Enum a => a -> Int
P.fromEnum BusSyncReply
a) (BusSyncReply -> Int
forall a. Enum a => a -> Int
P.fromEnum BusSyncReply
b)
type instance O.ParentTypes BusSyncReply = '[]
instance O.HasParentTypes BusSyncReply
foreign import ccall "gst_bus_sync_reply_get_type" c_gst_bus_sync_reply_get_type ::
IO GType
instance B.Types.TypedObject BusSyncReply where
glibType :: IO GType
glibType = IO GType
c_gst_bus_sync_reply_get_type
instance B.Types.BoxedEnum BusSyncReply
data BufferingMode =
BufferingModeStream
| BufferingModeDownload
| BufferingModeTimeshift
| BufferingModeLive
| AnotherBufferingMode Int
deriving (Int -> BufferingMode -> ShowS
[BufferingMode] -> ShowS
BufferingMode -> String
(Int -> BufferingMode -> ShowS)
-> (BufferingMode -> String)
-> ([BufferingMode] -> ShowS)
-> Show BufferingMode
forall a.
(Int -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a
$cshowsPrec :: Int -> BufferingMode -> ShowS
showsPrec :: Int -> BufferingMode -> ShowS
$cshow :: BufferingMode -> String
show :: BufferingMode -> String
$cshowList :: [BufferingMode] -> ShowS
showList :: [BufferingMode] -> ShowS
Show, BufferingMode -> BufferingMode -> Bool
(BufferingMode -> BufferingMode -> Bool)
-> (BufferingMode -> BufferingMode -> Bool) -> Eq BufferingMode
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
$c== :: BufferingMode -> BufferingMode -> Bool
== :: BufferingMode -> BufferingMode -> Bool
$c/= :: BufferingMode -> BufferingMode -> Bool
/= :: BufferingMode -> BufferingMode -> Bool
Eq)
instance P.Enum BufferingMode where
fromEnum :: BufferingMode -> Int
fromEnum BufferingMode
BufferingModeStream = Int
0
fromEnum BufferingMode
BufferingModeDownload = Int
1
fromEnum BufferingMode
BufferingModeTimeshift = Int
2
fromEnum BufferingMode
BufferingModeLive = Int
3
fromEnum (AnotherBufferingMode Int
k) = Int
k
toEnum :: Int -> BufferingMode
toEnum Int
0 = BufferingMode
BufferingModeStream
toEnum Int
1 = BufferingMode
BufferingModeDownload
toEnum Int
2 = BufferingMode
BufferingModeTimeshift
toEnum Int
3 = BufferingMode
BufferingModeLive
toEnum Int
k = Int -> BufferingMode
AnotherBufferingMode Int
k
instance P.Ord BufferingMode where
compare :: BufferingMode -> BufferingMode -> Ordering
compare BufferingMode
a BufferingMode
b = Int -> Int -> Ordering
forall a. Ord a => a -> a -> Ordering
P.compare (BufferingMode -> Int
forall a. Enum a => a -> Int
P.fromEnum BufferingMode
a) (BufferingMode -> Int
forall a. Enum a => a -> Int
P.fromEnum BufferingMode
b)
type instance O.ParentTypes BufferingMode = '[]
instance O.HasParentTypes BufferingMode
foreign import ccall "gst_buffering_mode_get_type" c_gst_buffering_mode_get_type ::
IO GType
instance B.Types.TypedObject BufferingMode where
glibType :: IO GType
glibType = IO GType
c_gst_buffering_mode_get_type
instance B.Types.BoxedEnum BufferingMode