module GI.WebKit.Objects.DOMTextTrackCue
(
DOMTextTrackCue(..) ,
IsDOMTextTrackCue ,
toDOMTextTrackCue ,
noDOMTextTrackCue ,
DOMTextTrackCueDispatchEventMethodInfo ,
dOMTextTrackCueDispatchEvent ,
DOMTextTrackCueGetAlignMethodInfo ,
dOMTextTrackCueGetAlign ,
DOMTextTrackCueGetCueAsHtmlMethodInfo ,
dOMTextTrackCueGetCueAsHtml ,
DOMTextTrackCueGetEndTimeMethodInfo ,
dOMTextTrackCueGetEndTime ,
DOMTextTrackCueGetIdMethodInfo ,
dOMTextTrackCueGetId ,
DOMTextTrackCueGetLineMethodInfo ,
dOMTextTrackCueGetLine ,
DOMTextTrackCueGetPauseOnExitMethodInfo ,
dOMTextTrackCueGetPauseOnExit ,
DOMTextTrackCueGetPositionMethodInfo ,
dOMTextTrackCueGetPosition ,
DOMTextTrackCueGetSizeMethodInfo ,
dOMTextTrackCueGetSize ,
DOMTextTrackCueGetSnapToLinesMethodInfo ,
dOMTextTrackCueGetSnapToLines ,
DOMTextTrackCueGetStartTimeMethodInfo ,
dOMTextTrackCueGetStartTime ,
DOMTextTrackCueGetTextMethodInfo ,
dOMTextTrackCueGetText ,
DOMTextTrackCueGetTrackMethodInfo ,
dOMTextTrackCueGetTrack ,
DOMTextTrackCueGetVerticalMethodInfo ,
dOMTextTrackCueGetVertical ,
DOMTextTrackCueSetAlignMethodInfo ,
dOMTextTrackCueSetAlign ,
DOMTextTrackCueSetEndTimeMethodInfo ,
dOMTextTrackCueSetEndTime ,
DOMTextTrackCueSetIdMethodInfo ,
dOMTextTrackCueSetId ,
DOMTextTrackCueSetLineMethodInfo ,
dOMTextTrackCueSetLine ,
DOMTextTrackCueSetPauseOnExitMethodInfo ,
dOMTextTrackCueSetPauseOnExit ,
DOMTextTrackCueSetPositionMethodInfo ,
dOMTextTrackCueSetPosition ,
DOMTextTrackCueSetSizeMethodInfo ,
dOMTextTrackCueSetSize ,
DOMTextTrackCueSetSnapToLinesMethodInfo ,
dOMTextTrackCueSetSnapToLines ,
DOMTextTrackCueSetStartTimeMethodInfo ,
dOMTextTrackCueSetStartTime ,
DOMTextTrackCueSetTextMethodInfo ,
dOMTextTrackCueSetText ,
DOMTextTrackCueSetVerticalMethodInfo ,
dOMTextTrackCueSetVertical ,
DOMTextTrackCueAlignPropertyInfo ,
clearDOMTextTrackCueAlign ,
constructDOMTextTrackCueAlign ,
dOMTextTrackCueAlign ,
getDOMTextTrackCueAlign ,
setDOMTextTrackCueAlign ,
DOMTextTrackCueEndTimePropertyInfo ,
constructDOMTextTrackCueEndTime ,
dOMTextTrackCueEndTime ,
getDOMTextTrackCueEndTime ,
setDOMTextTrackCueEndTime ,
DOMTextTrackCueIdPropertyInfo ,
constructDOMTextTrackCueId ,
dOMTextTrackCueId ,
getDOMTextTrackCueId ,
setDOMTextTrackCueId ,
DOMTextTrackCueLinePropertyInfo ,
constructDOMTextTrackCueLine ,
dOMTextTrackCueLine ,
getDOMTextTrackCueLine ,
setDOMTextTrackCueLine ,
DOMTextTrackCuePauseOnExitPropertyInfo ,
constructDOMTextTrackCuePauseOnExit ,
dOMTextTrackCuePauseOnExit ,
getDOMTextTrackCuePauseOnExit ,
setDOMTextTrackCuePauseOnExit ,
DOMTextTrackCuePositionPropertyInfo ,
constructDOMTextTrackCuePosition ,
dOMTextTrackCuePosition ,
getDOMTextTrackCuePosition ,
setDOMTextTrackCuePosition ,
DOMTextTrackCueSizePropertyInfo ,
constructDOMTextTrackCueSize ,
dOMTextTrackCueSize ,
getDOMTextTrackCueSize ,
setDOMTextTrackCueSize ,
DOMTextTrackCueSnapToLinesPropertyInfo ,
constructDOMTextTrackCueSnapToLines ,
dOMTextTrackCueSnapToLines ,
getDOMTextTrackCueSnapToLines ,
setDOMTextTrackCueSnapToLines ,
DOMTextTrackCueStartTimePropertyInfo ,
constructDOMTextTrackCueStartTime ,
dOMTextTrackCueStartTime ,
getDOMTextTrackCueStartTime ,
setDOMTextTrackCueStartTime ,
DOMTextTrackCueTextPropertyInfo ,
constructDOMTextTrackCueText ,
dOMTextTrackCueText ,
getDOMTextTrackCueText ,
setDOMTextTrackCueText ,
DOMTextTrackCueTrackPropertyInfo ,
dOMTextTrackCueTrack ,
getDOMTextTrackCueTrack ,
DOMTextTrackCueVerticalPropertyInfo ,
clearDOMTextTrackCueVertical ,
constructDOMTextTrackCueVertical ,
dOMTextTrackCueVertical ,
getDOMTextTrackCueVertical ,
setDOMTextTrackCueVertical ,
) where
import Data.GI.Base.ShortPrelude
import qualified Data.GI.Base.ShortPrelude as SP
import qualified Data.GI.Base.Overloading as O
import qualified Prelude as P
import qualified Data.GI.Base.Attributes as GI.Attributes
import qualified Data.GI.Base.ManagedPtr as B.ManagedPtr
import qualified Data.GI.Base.GError as B.GError
import qualified Data.GI.Base.GVariant as B.GVariant
import qualified Data.GI.Base.GParamSpec as B.GParamSpec
import qualified Data.GI.Base.CallStack as B.CallStack
import qualified Data.Text as T
import qualified Data.ByteString.Char8 as B
import qualified Data.Map as Map
import qualified Foreign.Ptr as FP
import qualified GI.GObject.Objects.Object as GObject.Object
import qualified GI.WebKit.Interfaces.DOMEventTarget as WebKit.DOMEventTarget
import qualified GI.WebKit.Objects.DOMDocumentFragment as WebKit.DOMDocumentFragment
import qualified GI.WebKit.Objects.DOMEvent as WebKit.DOMEvent
import qualified GI.WebKit.Objects.DOMObject as WebKit.DOMObject
import qualified GI.WebKit.Objects.DOMTextTrack as WebKit.DOMTextTrack
newtype DOMTextTrackCue = DOMTextTrackCue (ManagedPtr DOMTextTrackCue)
foreign import ccall "webkit_dom_text_track_cue_get_type"
c_webkit_dom_text_track_cue_get_type :: IO GType
instance GObject DOMTextTrackCue where
gobjectType _ = c_webkit_dom_text_track_cue_get_type
class GObject o => IsDOMTextTrackCue o
#if MIN_VERSION_base(4,9,0)
instance (GObject a, O.UnknownAncestorError DOMTextTrackCue a) =>
IsDOMTextTrackCue a
#endif
instance IsDOMTextTrackCue DOMTextTrackCue
instance WebKit.DOMObject.IsDOMObject DOMTextTrackCue
instance GObject.Object.IsObject DOMTextTrackCue
instance WebKit.DOMEventTarget.IsDOMEventTarget DOMTextTrackCue
toDOMTextTrackCue :: IsDOMTextTrackCue o => o -> IO DOMTextTrackCue
toDOMTextTrackCue = unsafeCastTo DOMTextTrackCue
noDOMTextTrackCue :: Maybe DOMTextTrackCue
noDOMTextTrackCue = Nothing
type family ResolveDOMTextTrackCueMethod (t :: Symbol) (o :: *) :: * where
ResolveDOMTextTrackCueMethod "addEventListener" o = WebKit.DOMEventTarget.DOMEventTargetAddEventListenerMethodInfo
ResolveDOMTextTrackCueMethod "bindProperty" o = GObject.Object.ObjectBindPropertyMethodInfo
ResolveDOMTextTrackCueMethod "bindPropertyFull" o = GObject.Object.ObjectBindPropertyFullMethodInfo
ResolveDOMTextTrackCueMethod "dispatchEvent" o = DOMTextTrackCueDispatchEventMethodInfo
ResolveDOMTextTrackCueMethod "forceFloating" o = GObject.Object.ObjectForceFloatingMethodInfo
ResolveDOMTextTrackCueMethod "freezeNotify" o = GObject.Object.ObjectFreezeNotifyMethodInfo
ResolveDOMTextTrackCueMethod "isFloating" o = GObject.Object.ObjectIsFloatingMethodInfo
ResolveDOMTextTrackCueMethod "notify" o = GObject.Object.ObjectNotifyMethodInfo
ResolveDOMTextTrackCueMethod "notifyByPspec" o = GObject.Object.ObjectNotifyByPspecMethodInfo
ResolveDOMTextTrackCueMethod "ref" o = GObject.Object.ObjectRefMethodInfo
ResolveDOMTextTrackCueMethod "refSink" o = GObject.Object.ObjectRefSinkMethodInfo
ResolveDOMTextTrackCueMethod "removeEventListener" o = WebKit.DOMEventTarget.DOMEventTargetRemoveEventListenerMethodInfo
ResolveDOMTextTrackCueMethod "replaceData" o = GObject.Object.ObjectReplaceDataMethodInfo
ResolveDOMTextTrackCueMethod "replaceQdata" o = GObject.Object.ObjectReplaceQdataMethodInfo
ResolveDOMTextTrackCueMethod "runDispose" o = GObject.Object.ObjectRunDisposeMethodInfo
ResolveDOMTextTrackCueMethod "stealData" o = GObject.Object.ObjectStealDataMethodInfo
ResolveDOMTextTrackCueMethod "stealQdata" o = GObject.Object.ObjectStealQdataMethodInfo
ResolveDOMTextTrackCueMethod "thawNotify" o = GObject.Object.ObjectThawNotifyMethodInfo
ResolveDOMTextTrackCueMethod "unref" o = GObject.Object.ObjectUnrefMethodInfo
ResolveDOMTextTrackCueMethod "watchClosure" o = GObject.Object.ObjectWatchClosureMethodInfo
ResolveDOMTextTrackCueMethod "getAlign" o = DOMTextTrackCueGetAlignMethodInfo
ResolveDOMTextTrackCueMethod "getCueAsHtml" o = DOMTextTrackCueGetCueAsHtmlMethodInfo
ResolveDOMTextTrackCueMethod "getData" o = GObject.Object.ObjectGetDataMethodInfo
ResolveDOMTextTrackCueMethod "getEndTime" o = DOMTextTrackCueGetEndTimeMethodInfo
ResolveDOMTextTrackCueMethod "getId" o = DOMTextTrackCueGetIdMethodInfo
ResolveDOMTextTrackCueMethod "getLine" o = DOMTextTrackCueGetLineMethodInfo
ResolveDOMTextTrackCueMethod "getPauseOnExit" o = DOMTextTrackCueGetPauseOnExitMethodInfo
ResolveDOMTextTrackCueMethod "getPosition" o = DOMTextTrackCueGetPositionMethodInfo
ResolveDOMTextTrackCueMethod "getProperty" o = GObject.Object.ObjectGetPropertyMethodInfo
ResolveDOMTextTrackCueMethod "getQdata" o = GObject.Object.ObjectGetQdataMethodInfo
ResolveDOMTextTrackCueMethod "getSize" o = DOMTextTrackCueGetSizeMethodInfo
ResolveDOMTextTrackCueMethod "getSnapToLines" o = DOMTextTrackCueGetSnapToLinesMethodInfo
ResolveDOMTextTrackCueMethod "getStartTime" o = DOMTextTrackCueGetStartTimeMethodInfo
ResolveDOMTextTrackCueMethod "getText" o = DOMTextTrackCueGetTextMethodInfo
ResolveDOMTextTrackCueMethod "getTrack" o = DOMTextTrackCueGetTrackMethodInfo
ResolveDOMTextTrackCueMethod "getVertical" o = DOMTextTrackCueGetVerticalMethodInfo
ResolveDOMTextTrackCueMethod "setAlign" o = DOMTextTrackCueSetAlignMethodInfo
ResolveDOMTextTrackCueMethod "setData" o = GObject.Object.ObjectSetDataMethodInfo
ResolveDOMTextTrackCueMethod "setEndTime" o = DOMTextTrackCueSetEndTimeMethodInfo
ResolveDOMTextTrackCueMethod "setId" o = DOMTextTrackCueSetIdMethodInfo
ResolveDOMTextTrackCueMethod "setLine" o = DOMTextTrackCueSetLineMethodInfo
ResolveDOMTextTrackCueMethod "setPauseOnExit" o = DOMTextTrackCueSetPauseOnExitMethodInfo
ResolveDOMTextTrackCueMethod "setPosition" o = DOMTextTrackCueSetPositionMethodInfo
ResolveDOMTextTrackCueMethod "setProperty" o = GObject.Object.ObjectSetPropertyMethodInfo
ResolveDOMTextTrackCueMethod "setSize" o = DOMTextTrackCueSetSizeMethodInfo
ResolveDOMTextTrackCueMethod "setSnapToLines" o = DOMTextTrackCueSetSnapToLinesMethodInfo
ResolveDOMTextTrackCueMethod "setStartTime" o = DOMTextTrackCueSetStartTimeMethodInfo
ResolveDOMTextTrackCueMethod "setText" o = DOMTextTrackCueSetTextMethodInfo
ResolveDOMTextTrackCueMethod "setVertical" o = DOMTextTrackCueSetVerticalMethodInfo
ResolveDOMTextTrackCueMethod l o = O.MethodResolutionFailed l o
instance (info ~ ResolveDOMTextTrackCueMethod t DOMTextTrackCue, O.MethodInfo info DOMTextTrackCue p) => O.IsLabelProxy t (DOMTextTrackCue -> p) where
fromLabelProxy _ = O.overloadedMethod (O.MethodProxy :: O.MethodProxy info)
#if MIN_VERSION_base(4,9,0)
instance (info ~ ResolveDOMTextTrackCueMethod t DOMTextTrackCue, O.MethodInfo info DOMTextTrackCue p) => O.IsLabel t (DOMTextTrackCue -> p) where
fromLabel _ = O.overloadedMethod (O.MethodProxy :: O.MethodProxy info)
#endif
getDOMTextTrackCueAlign :: (MonadIO m, IsDOMTextTrackCue o) => o -> m (Maybe T.Text)
getDOMTextTrackCueAlign obj = liftIO $ getObjectPropertyString obj "align"
setDOMTextTrackCueAlign :: (MonadIO m, IsDOMTextTrackCue o) => o -> T.Text -> m ()
setDOMTextTrackCueAlign obj val = liftIO $ setObjectPropertyString obj "align" (Just val)
constructDOMTextTrackCueAlign :: (IsDOMTextTrackCue o) => T.Text -> IO (GValueConstruct o)
constructDOMTextTrackCueAlign val = constructObjectPropertyString "align" (Just val)
clearDOMTextTrackCueAlign :: (MonadIO m, IsDOMTextTrackCue o) => o -> m ()
clearDOMTextTrackCueAlign obj = liftIO $ setObjectPropertyString obj "align" (Nothing :: Maybe T.Text)
data DOMTextTrackCueAlignPropertyInfo
instance AttrInfo DOMTextTrackCueAlignPropertyInfo where
type AttrAllowedOps DOMTextTrackCueAlignPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet, 'AttrClear]
type AttrSetTypeConstraint DOMTextTrackCueAlignPropertyInfo = (~) T.Text
type AttrBaseTypeConstraint DOMTextTrackCueAlignPropertyInfo = IsDOMTextTrackCue
type AttrGetType DOMTextTrackCueAlignPropertyInfo = (Maybe T.Text)
type AttrLabel DOMTextTrackCueAlignPropertyInfo = "align"
type AttrOrigin DOMTextTrackCueAlignPropertyInfo = DOMTextTrackCue
attrGet _ = getDOMTextTrackCueAlign
attrSet _ = setDOMTextTrackCueAlign
attrConstruct _ = constructDOMTextTrackCueAlign
attrClear _ = clearDOMTextTrackCueAlign
getDOMTextTrackCueEndTime :: (MonadIO m, IsDOMTextTrackCue o) => o -> m Double
getDOMTextTrackCueEndTime obj = liftIO $ getObjectPropertyDouble obj "end-time"
setDOMTextTrackCueEndTime :: (MonadIO m, IsDOMTextTrackCue o) => o -> Double -> m ()
setDOMTextTrackCueEndTime obj val = liftIO $ setObjectPropertyDouble obj "end-time" val
constructDOMTextTrackCueEndTime :: (IsDOMTextTrackCue o) => Double -> IO (GValueConstruct o)
constructDOMTextTrackCueEndTime val = constructObjectPropertyDouble "end-time" val
data DOMTextTrackCueEndTimePropertyInfo
instance AttrInfo DOMTextTrackCueEndTimePropertyInfo where
type AttrAllowedOps DOMTextTrackCueEndTimePropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]
type AttrSetTypeConstraint DOMTextTrackCueEndTimePropertyInfo = (~) Double
type AttrBaseTypeConstraint DOMTextTrackCueEndTimePropertyInfo = IsDOMTextTrackCue
type AttrGetType DOMTextTrackCueEndTimePropertyInfo = Double
type AttrLabel DOMTextTrackCueEndTimePropertyInfo = "end-time"
type AttrOrigin DOMTextTrackCueEndTimePropertyInfo = DOMTextTrackCue
attrGet _ = getDOMTextTrackCueEndTime
attrSet _ = setDOMTextTrackCueEndTime
attrConstruct _ = constructDOMTextTrackCueEndTime
attrClear _ = undefined
getDOMTextTrackCueId :: (MonadIO m, IsDOMTextTrackCue o) => o -> m (Maybe T.Text)
getDOMTextTrackCueId obj = liftIO $ getObjectPropertyString obj "id"
setDOMTextTrackCueId :: (MonadIO m, IsDOMTextTrackCue o) => o -> T.Text -> m ()
setDOMTextTrackCueId obj val = liftIO $ setObjectPropertyString obj "id" (Just val)
constructDOMTextTrackCueId :: (IsDOMTextTrackCue o) => T.Text -> IO (GValueConstruct o)
constructDOMTextTrackCueId val = constructObjectPropertyString "id" (Just val)
data DOMTextTrackCueIdPropertyInfo
instance AttrInfo DOMTextTrackCueIdPropertyInfo where
type AttrAllowedOps DOMTextTrackCueIdPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]
type AttrSetTypeConstraint DOMTextTrackCueIdPropertyInfo = (~) T.Text
type AttrBaseTypeConstraint DOMTextTrackCueIdPropertyInfo = IsDOMTextTrackCue
type AttrGetType DOMTextTrackCueIdPropertyInfo = (Maybe T.Text)
type AttrLabel DOMTextTrackCueIdPropertyInfo = "id"
type AttrOrigin DOMTextTrackCueIdPropertyInfo = DOMTextTrackCue
attrGet _ = getDOMTextTrackCueId
attrSet _ = setDOMTextTrackCueId
attrConstruct _ = constructDOMTextTrackCueId
attrClear _ = undefined
getDOMTextTrackCueLine :: (MonadIO m, IsDOMTextTrackCue o) => o -> m CLong
getDOMTextTrackCueLine obj = liftIO $ getObjectPropertyLong obj "line"
setDOMTextTrackCueLine :: (MonadIO m, IsDOMTextTrackCue o) => o -> CLong -> m ()
setDOMTextTrackCueLine obj val = liftIO $ setObjectPropertyLong obj "line" val
constructDOMTextTrackCueLine :: (IsDOMTextTrackCue o) => CLong -> IO (GValueConstruct o)
constructDOMTextTrackCueLine val = constructObjectPropertyLong "line" val
data DOMTextTrackCueLinePropertyInfo
instance AttrInfo DOMTextTrackCueLinePropertyInfo where
type AttrAllowedOps DOMTextTrackCueLinePropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]
type AttrSetTypeConstraint DOMTextTrackCueLinePropertyInfo = (~) CLong
type AttrBaseTypeConstraint DOMTextTrackCueLinePropertyInfo = IsDOMTextTrackCue
type AttrGetType DOMTextTrackCueLinePropertyInfo = CLong
type AttrLabel DOMTextTrackCueLinePropertyInfo = "line"
type AttrOrigin DOMTextTrackCueLinePropertyInfo = DOMTextTrackCue
attrGet _ = getDOMTextTrackCueLine
attrSet _ = setDOMTextTrackCueLine
attrConstruct _ = constructDOMTextTrackCueLine
attrClear _ = undefined
getDOMTextTrackCuePauseOnExit :: (MonadIO m, IsDOMTextTrackCue o) => o -> m Bool
getDOMTextTrackCuePauseOnExit obj = liftIO $ getObjectPropertyBool obj "pause-on-exit"
setDOMTextTrackCuePauseOnExit :: (MonadIO m, IsDOMTextTrackCue o) => o -> Bool -> m ()
setDOMTextTrackCuePauseOnExit obj val = liftIO $ setObjectPropertyBool obj "pause-on-exit" val
constructDOMTextTrackCuePauseOnExit :: (IsDOMTextTrackCue o) => Bool -> IO (GValueConstruct o)
constructDOMTextTrackCuePauseOnExit val = constructObjectPropertyBool "pause-on-exit" val
data DOMTextTrackCuePauseOnExitPropertyInfo
instance AttrInfo DOMTextTrackCuePauseOnExitPropertyInfo where
type AttrAllowedOps DOMTextTrackCuePauseOnExitPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]
type AttrSetTypeConstraint DOMTextTrackCuePauseOnExitPropertyInfo = (~) Bool
type AttrBaseTypeConstraint DOMTextTrackCuePauseOnExitPropertyInfo = IsDOMTextTrackCue
type AttrGetType DOMTextTrackCuePauseOnExitPropertyInfo = Bool
type AttrLabel DOMTextTrackCuePauseOnExitPropertyInfo = "pause-on-exit"
type AttrOrigin DOMTextTrackCuePauseOnExitPropertyInfo = DOMTextTrackCue
attrGet _ = getDOMTextTrackCuePauseOnExit
attrSet _ = setDOMTextTrackCuePauseOnExit
attrConstruct _ = constructDOMTextTrackCuePauseOnExit
attrClear _ = undefined
getDOMTextTrackCuePosition :: (MonadIO m, IsDOMTextTrackCue o) => o -> m CLong
getDOMTextTrackCuePosition obj = liftIO $ getObjectPropertyLong obj "position"
setDOMTextTrackCuePosition :: (MonadIO m, IsDOMTextTrackCue o) => o -> CLong -> m ()
setDOMTextTrackCuePosition obj val = liftIO $ setObjectPropertyLong obj "position" val
constructDOMTextTrackCuePosition :: (IsDOMTextTrackCue o) => CLong -> IO (GValueConstruct o)
constructDOMTextTrackCuePosition val = constructObjectPropertyLong "position" val
data DOMTextTrackCuePositionPropertyInfo
instance AttrInfo DOMTextTrackCuePositionPropertyInfo where
type AttrAllowedOps DOMTextTrackCuePositionPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]
type AttrSetTypeConstraint DOMTextTrackCuePositionPropertyInfo = (~) CLong
type AttrBaseTypeConstraint DOMTextTrackCuePositionPropertyInfo = IsDOMTextTrackCue
type AttrGetType DOMTextTrackCuePositionPropertyInfo = CLong
type AttrLabel DOMTextTrackCuePositionPropertyInfo = "position"
type AttrOrigin DOMTextTrackCuePositionPropertyInfo = DOMTextTrackCue
attrGet _ = getDOMTextTrackCuePosition
attrSet _ = setDOMTextTrackCuePosition
attrConstruct _ = constructDOMTextTrackCuePosition
attrClear _ = undefined
getDOMTextTrackCueSize :: (MonadIO m, IsDOMTextTrackCue o) => o -> m CLong
getDOMTextTrackCueSize obj = liftIO $ getObjectPropertyLong obj "size"
setDOMTextTrackCueSize :: (MonadIO m, IsDOMTextTrackCue o) => o -> CLong -> m ()
setDOMTextTrackCueSize obj val = liftIO $ setObjectPropertyLong obj "size" val
constructDOMTextTrackCueSize :: (IsDOMTextTrackCue o) => CLong -> IO (GValueConstruct o)
constructDOMTextTrackCueSize val = constructObjectPropertyLong "size" val
data DOMTextTrackCueSizePropertyInfo
instance AttrInfo DOMTextTrackCueSizePropertyInfo where
type AttrAllowedOps DOMTextTrackCueSizePropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]
type AttrSetTypeConstraint DOMTextTrackCueSizePropertyInfo = (~) CLong
type AttrBaseTypeConstraint DOMTextTrackCueSizePropertyInfo = IsDOMTextTrackCue
type AttrGetType DOMTextTrackCueSizePropertyInfo = CLong
type AttrLabel DOMTextTrackCueSizePropertyInfo = "size"
type AttrOrigin DOMTextTrackCueSizePropertyInfo = DOMTextTrackCue
attrGet _ = getDOMTextTrackCueSize
attrSet _ = setDOMTextTrackCueSize
attrConstruct _ = constructDOMTextTrackCueSize
attrClear _ = undefined
getDOMTextTrackCueSnapToLines :: (MonadIO m, IsDOMTextTrackCue o) => o -> m Bool
getDOMTextTrackCueSnapToLines obj = liftIO $ getObjectPropertyBool obj "snap-to-lines"
setDOMTextTrackCueSnapToLines :: (MonadIO m, IsDOMTextTrackCue o) => o -> Bool -> m ()
setDOMTextTrackCueSnapToLines obj val = liftIO $ setObjectPropertyBool obj "snap-to-lines" val
constructDOMTextTrackCueSnapToLines :: (IsDOMTextTrackCue o) => Bool -> IO (GValueConstruct o)
constructDOMTextTrackCueSnapToLines val = constructObjectPropertyBool "snap-to-lines" val
data DOMTextTrackCueSnapToLinesPropertyInfo
instance AttrInfo DOMTextTrackCueSnapToLinesPropertyInfo where
type AttrAllowedOps DOMTextTrackCueSnapToLinesPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]
type AttrSetTypeConstraint DOMTextTrackCueSnapToLinesPropertyInfo = (~) Bool
type AttrBaseTypeConstraint DOMTextTrackCueSnapToLinesPropertyInfo = IsDOMTextTrackCue
type AttrGetType DOMTextTrackCueSnapToLinesPropertyInfo = Bool
type AttrLabel DOMTextTrackCueSnapToLinesPropertyInfo = "snap-to-lines"
type AttrOrigin DOMTextTrackCueSnapToLinesPropertyInfo = DOMTextTrackCue
attrGet _ = getDOMTextTrackCueSnapToLines
attrSet _ = setDOMTextTrackCueSnapToLines
attrConstruct _ = constructDOMTextTrackCueSnapToLines
attrClear _ = undefined
getDOMTextTrackCueStartTime :: (MonadIO m, IsDOMTextTrackCue o) => o -> m Double
getDOMTextTrackCueStartTime obj = liftIO $ getObjectPropertyDouble obj "start-time"
setDOMTextTrackCueStartTime :: (MonadIO m, IsDOMTextTrackCue o) => o -> Double -> m ()
setDOMTextTrackCueStartTime obj val = liftIO $ setObjectPropertyDouble obj "start-time" val
constructDOMTextTrackCueStartTime :: (IsDOMTextTrackCue o) => Double -> IO (GValueConstruct o)
constructDOMTextTrackCueStartTime val = constructObjectPropertyDouble "start-time" val
data DOMTextTrackCueStartTimePropertyInfo
instance AttrInfo DOMTextTrackCueStartTimePropertyInfo where
type AttrAllowedOps DOMTextTrackCueStartTimePropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]
type AttrSetTypeConstraint DOMTextTrackCueStartTimePropertyInfo = (~) Double
type AttrBaseTypeConstraint DOMTextTrackCueStartTimePropertyInfo = IsDOMTextTrackCue
type AttrGetType DOMTextTrackCueStartTimePropertyInfo = Double
type AttrLabel DOMTextTrackCueStartTimePropertyInfo = "start-time"
type AttrOrigin DOMTextTrackCueStartTimePropertyInfo = DOMTextTrackCue
attrGet _ = getDOMTextTrackCueStartTime
attrSet _ = setDOMTextTrackCueStartTime
attrConstruct _ = constructDOMTextTrackCueStartTime
attrClear _ = undefined
getDOMTextTrackCueText :: (MonadIO m, IsDOMTextTrackCue o) => o -> m (Maybe T.Text)
getDOMTextTrackCueText obj = liftIO $ getObjectPropertyString obj "text"
setDOMTextTrackCueText :: (MonadIO m, IsDOMTextTrackCue o) => o -> T.Text -> m ()
setDOMTextTrackCueText obj val = liftIO $ setObjectPropertyString obj "text" (Just val)
constructDOMTextTrackCueText :: (IsDOMTextTrackCue o) => T.Text -> IO (GValueConstruct o)
constructDOMTextTrackCueText val = constructObjectPropertyString "text" (Just val)
data DOMTextTrackCueTextPropertyInfo
instance AttrInfo DOMTextTrackCueTextPropertyInfo where
type AttrAllowedOps DOMTextTrackCueTextPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]
type AttrSetTypeConstraint DOMTextTrackCueTextPropertyInfo = (~) T.Text
type AttrBaseTypeConstraint DOMTextTrackCueTextPropertyInfo = IsDOMTextTrackCue
type AttrGetType DOMTextTrackCueTextPropertyInfo = (Maybe T.Text)
type AttrLabel DOMTextTrackCueTextPropertyInfo = "text"
type AttrOrigin DOMTextTrackCueTextPropertyInfo = DOMTextTrackCue
attrGet _ = getDOMTextTrackCueText
attrSet _ = setDOMTextTrackCueText
attrConstruct _ = constructDOMTextTrackCueText
attrClear _ = undefined
getDOMTextTrackCueTrack :: (MonadIO m, IsDOMTextTrackCue o) => o -> m (Maybe WebKit.DOMTextTrack.DOMTextTrack)
getDOMTextTrackCueTrack obj = liftIO $ getObjectPropertyObject obj "track" WebKit.DOMTextTrack.DOMTextTrack
data DOMTextTrackCueTrackPropertyInfo
instance AttrInfo DOMTextTrackCueTrackPropertyInfo where
type AttrAllowedOps DOMTextTrackCueTrackPropertyInfo = '[ 'AttrGet, 'AttrClear]
type AttrSetTypeConstraint DOMTextTrackCueTrackPropertyInfo = (~) ()
type AttrBaseTypeConstraint DOMTextTrackCueTrackPropertyInfo = IsDOMTextTrackCue
type AttrGetType DOMTextTrackCueTrackPropertyInfo = (Maybe WebKit.DOMTextTrack.DOMTextTrack)
type AttrLabel DOMTextTrackCueTrackPropertyInfo = "track"
type AttrOrigin DOMTextTrackCueTrackPropertyInfo = DOMTextTrackCue
attrGet _ = getDOMTextTrackCueTrack
attrSet _ = undefined
attrConstruct _ = undefined
attrClear _ = undefined
getDOMTextTrackCueVertical :: (MonadIO m, IsDOMTextTrackCue o) => o -> m (Maybe T.Text)
getDOMTextTrackCueVertical obj = liftIO $ getObjectPropertyString obj "vertical"
setDOMTextTrackCueVertical :: (MonadIO m, IsDOMTextTrackCue o) => o -> T.Text -> m ()
setDOMTextTrackCueVertical obj val = liftIO $ setObjectPropertyString obj "vertical" (Just val)
constructDOMTextTrackCueVertical :: (IsDOMTextTrackCue o) => T.Text -> IO (GValueConstruct o)
constructDOMTextTrackCueVertical val = constructObjectPropertyString "vertical" (Just val)
clearDOMTextTrackCueVertical :: (MonadIO m, IsDOMTextTrackCue o) => o -> m ()
clearDOMTextTrackCueVertical obj = liftIO $ setObjectPropertyString obj "vertical" (Nothing :: Maybe T.Text)
data DOMTextTrackCueVerticalPropertyInfo
instance AttrInfo DOMTextTrackCueVerticalPropertyInfo where
type AttrAllowedOps DOMTextTrackCueVerticalPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet, 'AttrClear]
type AttrSetTypeConstraint DOMTextTrackCueVerticalPropertyInfo = (~) T.Text
type AttrBaseTypeConstraint DOMTextTrackCueVerticalPropertyInfo = IsDOMTextTrackCue
type AttrGetType DOMTextTrackCueVerticalPropertyInfo = (Maybe T.Text)
type AttrLabel DOMTextTrackCueVerticalPropertyInfo = "vertical"
type AttrOrigin DOMTextTrackCueVerticalPropertyInfo = DOMTextTrackCue
attrGet _ = getDOMTextTrackCueVertical
attrSet _ = setDOMTextTrackCueVertical
attrConstruct _ = constructDOMTextTrackCueVertical
attrClear _ = clearDOMTextTrackCueVertical
instance O.HasAttributeList DOMTextTrackCue
type instance O.AttributeList DOMTextTrackCue = DOMTextTrackCueAttributeList
type DOMTextTrackCueAttributeList = ('[ '("align", DOMTextTrackCueAlignPropertyInfo), '("coreObject", WebKit.DOMObject.DOMObjectCoreObjectPropertyInfo), '("endTime", DOMTextTrackCueEndTimePropertyInfo), '("id", DOMTextTrackCueIdPropertyInfo), '("line", DOMTextTrackCueLinePropertyInfo), '("pauseOnExit", DOMTextTrackCuePauseOnExitPropertyInfo), '("position", DOMTextTrackCuePositionPropertyInfo), '("size", DOMTextTrackCueSizePropertyInfo), '("snapToLines", DOMTextTrackCueSnapToLinesPropertyInfo), '("startTime", DOMTextTrackCueStartTimePropertyInfo), '("text", DOMTextTrackCueTextPropertyInfo), '("track", DOMTextTrackCueTrackPropertyInfo), '("vertical", DOMTextTrackCueVerticalPropertyInfo)] :: [(Symbol, *)])
dOMTextTrackCueAlign :: AttrLabelProxy "align"
dOMTextTrackCueAlign = AttrLabelProxy
dOMTextTrackCueEndTime :: AttrLabelProxy "endTime"
dOMTextTrackCueEndTime = AttrLabelProxy
dOMTextTrackCueId :: AttrLabelProxy "id"
dOMTextTrackCueId = AttrLabelProxy
dOMTextTrackCueLine :: AttrLabelProxy "line"
dOMTextTrackCueLine = AttrLabelProxy
dOMTextTrackCuePauseOnExit :: AttrLabelProxy "pauseOnExit"
dOMTextTrackCuePauseOnExit = AttrLabelProxy
dOMTextTrackCuePosition :: AttrLabelProxy "position"
dOMTextTrackCuePosition = AttrLabelProxy
dOMTextTrackCueSize :: AttrLabelProxy "size"
dOMTextTrackCueSize = AttrLabelProxy
dOMTextTrackCueSnapToLines :: AttrLabelProxy "snapToLines"
dOMTextTrackCueSnapToLines = AttrLabelProxy
dOMTextTrackCueStartTime :: AttrLabelProxy "startTime"
dOMTextTrackCueStartTime = AttrLabelProxy
dOMTextTrackCueText :: AttrLabelProxy "text"
dOMTextTrackCueText = AttrLabelProxy
dOMTextTrackCueTrack :: AttrLabelProxy "track"
dOMTextTrackCueTrack = AttrLabelProxy
dOMTextTrackCueVertical :: AttrLabelProxy "vertical"
dOMTextTrackCueVertical = AttrLabelProxy
type instance O.SignalList DOMTextTrackCue = DOMTextTrackCueSignalList
type DOMTextTrackCueSignalList = ('[ '("notify", GObject.Object.ObjectNotifySignalInfo)] :: [(Symbol, *)])
foreign import ccall "webkit_dom_text_track_cue_dispatch_event" webkit_dom_text_track_cue_dispatch_event ::
Ptr DOMTextTrackCue ->
Ptr WebKit.DOMEvent.DOMEvent ->
Ptr (Ptr GError) ->
IO CInt
dOMTextTrackCueDispatchEvent ::
(B.CallStack.HasCallStack, MonadIO m, IsDOMTextTrackCue a, WebKit.DOMEvent.IsDOMEvent b) =>
a
-> b
-> m ()
dOMTextTrackCueDispatchEvent self evt = liftIO $ do
self' <- unsafeManagedPtrCastPtr self
evt' <- unsafeManagedPtrCastPtr evt
onException (do
_ <- propagateGError $ webkit_dom_text_track_cue_dispatch_event self' evt'
touchManagedPtr self
touchManagedPtr evt
return ()
) (do
return ()
)
data DOMTextTrackCueDispatchEventMethodInfo
instance (signature ~ (b -> m ()), MonadIO m, IsDOMTextTrackCue a, WebKit.DOMEvent.IsDOMEvent b) => O.MethodInfo DOMTextTrackCueDispatchEventMethodInfo a signature where
overloadedMethod _ = dOMTextTrackCueDispatchEvent
foreign import ccall "webkit_dom_text_track_cue_get_align" webkit_dom_text_track_cue_get_align ::
Ptr DOMTextTrackCue ->
IO CString
dOMTextTrackCueGetAlign ::
(B.CallStack.HasCallStack, MonadIO m, IsDOMTextTrackCue a) =>
a
-> m T.Text
dOMTextTrackCueGetAlign self = liftIO $ do
self' <- unsafeManagedPtrCastPtr self
result <- webkit_dom_text_track_cue_get_align self'
checkUnexpectedReturnNULL "dOMTextTrackCueGetAlign" result
result' <- cstringToText result
freeMem result
touchManagedPtr self
return result'
data DOMTextTrackCueGetAlignMethodInfo
instance (signature ~ (m T.Text), MonadIO m, IsDOMTextTrackCue a) => O.MethodInfo DOMTextTrackCueGetAlignMethodInfo a signature where
overloadedMethod _ = dOMTextTrackCueGetAlign
foreign import ccall "webkit_dom_text_track_cue_get_cue_as_html" webkit_dom_text_track_cue_get_cue_as_html ::
Ptr DOMTextTrackCue ->
IO (Ptr WebKit.DOMDocumentFragment.DOMDocumentFragment)
dOMTextTrackCueGetCueAsHtml ::
(B.CallStack.HasCallStack, MonadIO m, IsDOMTextTrackCue a) =>
a
-> m WebKit.DOMDocumentFragment.DOMDocumentFragment
dOMTextTrackCueGetCueAsHtml self = liftIO $ do
self' <- unsafeManagedPtrCastPtr self
result <- webkit_dom_text_track_cue_get_cue_as_html self'
checkUnexpectedReturnNULL "dOMTextTrackCueGetCueAsHtml" result
result' <- (newObject WebKit.DOMDocumentFragment.DOMDocumentFragment) result
touchManagedPtr self
return result'
data DOMTextTrackCueGetCueAsHtmlMethodInfo
instance (signature ~ (m WebKit.DOMDocumentFragment.DOMDocumentFragment), MonadIO m, IsDOMTextTrackCue a) => O.MethodInfo DOMTextTrackCueGetCueAsHtmlMethodInfo a signature where
overloadedMethod _ = dOMTextTrackCueGetCueAsHtml
foreign import ccall "webkit_dom_text_track_cue_get_end_time" webkit_dom_text_track_cue_get_end_time ::
Ptr DOMTextTrackCue ->
IO CDouble
dOMTextTrackCueGetEndTime ::
(B.CallStack.HasCallStack, MonadIO m, IsDOMTextTrackCue a) =>
a
-> m Double
dOMTextTrackCueGetEndTime self = liftIO $ do
self' <- unsafeManagedPtrCastPtr self
result <- webkit_dom_text_track_cue_get_end_time self'
let result' = realToFrac result
touchManagedPtr self
return result'
data DOMTextTrackCueGetEndTimeMethodInfo
instance (signature ~ (m Double), MonadIO m, IsDOMTextTrackCue a) => O.MethodInfo DOMTextTrackCueGetEndTimeMethodInfo a signature where
overloadedMethod _ = dOMTextTrackCueGetEndTime
foreign import ccall "webkit_dom_text_track_cue_get_id" webkit_dom_text_track_cue_get_id ::
Ptr DOMTextTrackCue ->
IO CString
dOMTextTrackCueGetId ::
(B.CallStack.HasCallStack, MonadIO m, IsDOMTextTrackCue a) =>
a
-> m T.Text
dOMTextTrackCueGetId self = liftIO $ do
self' <- unsafeManagedPtrCastPtr self
result <- webkit_dom_text_track_cue_get_id self'
checkUnexpectedReturnNULL "dOMTextTrackCueGetId" result
result' <- cstringToText result
freeMem result
touchManagedPtr self
return result'
data DOMTextTrackCueGetIdMethodInfo
instance (signature ~ (m T.Text), MonadIO m, IsDOMTextTrackCue a) => O.MethodInfo DOMTextTrackCueGetIdMethodInfo a signature where
overloadedMethod _ = dOMTextTrackCueGetId
foreign import ccall "webkit_dom_text_track_cue_get_line" webkit_dom_text_track_cue_get_line ::
Ptr DOMTextTrackCue ->
IO CLong
dOMTextTrackCueGetLine ::
(B.CallStack.HasCallStack, MonadIO m, IsDOMTextTrackCue a) =>
a
-> m CLong
dOMTextTrackCueGetLine self = liftIO $ do
self' <- unsafeManagedPtrCastPtr self
result <- webkit_dom_text_track_cue_get_line self'
touchManagedPtr self
return result
data DOMTextTrackCueGetLineMethodInfo
instance (signature ~ (m CLong), MonadIO m, IsDOMTextTrackCue a) => O.MethodInfo DOMTextTrackCueGetLineMethodInfo a signature where
overloadedMethod _ = dOMTextTrackCueGetLine
foreign import ccall "webkit_dom_text_track_cue_get_pause_on_exit" webkit_dom_text_track_cue_get_pause_on_exit ::
Ptr DOMTextTrackCue ->
IO CInt
dOMTextTrackCueGetPauseOnExit ::
(B.CallStack.HasCallStack, MonadIO m, IsDOMTextTrackCue a) =>
a
-> m Bool
dOMTextTrackCueGetPauseOnExit self = liftIO $ do
self' <- unsafeManagedPtrCastPtr self
result <- webkit_dom_text_track_cue_get_pause_on_exit self'
let result' = (/= 0) result
touchManagedPtr self
return result'
data DOMTextTrackCueGetPauseOnExitMethodInfo
instance (signature ~ (m Bool), MonadIO m, IsDOMTextTrackCue a) => O.MethodInfo DOMTextTrackCueGetPauseOnExitMethodInfo a signature where
overloadedMethod _ = dOMTextTrackCueGetPauseOnExit
foreign import ccall "webkit_dom_text_track_cue_get_position" webkit_dom_text_track_cue_get_position ::
Ptr DOMTextTrackCue ->
IO CLong
dOMTextTrackCueGetPosition ::
(B.CallStack.HasCallStack, MonadIO m, IsDOMTextTrackCue a) =>
a
-> m CLong
dOMTextTrackCueGetPosition self = liftIO $ do
self' <- unsafeManagedPtrCastPtr self
result <- webkit_dom_text_track_cue_get_position self'
touchManagedPtr self
return result
data DOMTextTrackCueGetPositionMethodInfo
instance (signature ~ (m CLong), MonadIO m, IsDOMTextTrackCue a) => O.MethodInfo DOMTextTrackCueGetPositionMethodInfo a signature where
overloadedMethod _ = dOMTextTrackCueGetPosition
foreign import ccall "webkit_dom_text_track_cue_get_size" webkit_dom_text_track_cue_get_size ::
Ptr DOMTextTrackCue ->
IO CLong
dOMTextTrackCueGetSize ::
(B.CallStack.HasCallStack, MonadIO m, IsDOMTextTrackCue a) =>
a
-> m CLong
dOMTextTrackCueGetSize self = liftIO $ do
self' <- unsafeManagedPtrCastPtr self
result <- webkit_dom_text_track_cue_get_size self'
touchManagedPtr self
return result
data DOMTextTrackCueGetSizeMethodInfo
instance (signature ~ (m CLong), MonadIO m, IsDOMTextTrackCue a) => O.MethodInfo DOMTextTrackCueGetSizeMethodInfo a signature where
overloadedMethod _ = dOMTextTrackCueGetSize
foreign import ccall "webkit_dom_text_track_cue_get_snap_to_lines" webkit_dom_text_track_cue_get_snap_to_lines ::
Ptr DOMTextTrackCue ->
IO CInt
dOMTextTrackCueGetSnapToLines ::
(B.CallStack.HasCallStack, MonadIO m, IsDOMTextTrackCue a) =>
a
-> m Bool
dOMTextTrackCueGetSnapToLines self = liftIO $ do
self' <- unsafeManagedPtrCastPtr self
result <- webkit_dom_text_track_cue_get_snap_to_lines self'
let result' = (/= 0) result
touchManagedPtr self
return result'
data DOMTextTrackCueGetSnapToLinesMethodInfo
instance (signature ~ (m Bool), MonadIO m, IsDOMTextTrackCue a) => O.MethodInfo DOMTextTrackCueGetSnapToLinesMethodInfo a signature where
overloadedMethod _ = dOMTextTrackCueGetSnapToLines
foreign import ccall "webkit_dom_text_track_cue_get_start_time" webkit_dom_text_track_cue_get_start_time ::
Ptr DOMTextTrackCue ->
IO CDouble
dOMTextTrackCueGetStartTime ::
(B.CallStack.HasCallStack, MonadIO m, IsDOMTextTrackCue a) =>
a
-> m Double
dOMTextTrackCueGetStartTime self = liftIO $ do
self' <- unsafeManagedPtrCastPtr self
result <- webkit_dom_text_track_cue_get_start_time self'
let result' = realToFrac result
touchManagedPtr self
return result'
data DOMTextTrackCueGetStartTimeMethodInfo
instance (signature ~ (m Double), MonadIO m, IsDOMTextTrackCue a) => O.MethodInfo DOMTextTrackCueGetStartTimeMethodInfo a signature where
overloadedMethod _ = dOMTextTrackCueGetStartTime
foreign import ccall "webkit_dom_text_track_cue_get_text" webkit_dom_text_track_cue_get_text ::
Ptr DOMTextTrackCue ->
IO CString
dOMTextTrackCueGetText ::
(B.CallStack.HasCallStack, MonadIO m, IsDOMTextTrackCue a) =>
a
-> m T.Text
dOMTextTrackCueGetText self = liftIO $ do
self' <- unsafeManagedPtrCastPtr self
result <- webkit_dom_text_track_cue_get_text self'
checkUnexpectedReturnNULL "dOMTextTrackCueGetText" result
result' <- cstringToText result
freeMem result
touchManagedPtr self
return result'
data DOMTextTrackCueGetTextMethodInfo
instance (signature ~ (m T.Text), MonadIO m, IsDOMTextTrackCue a) => O.MethodInfo DOMTextTrackCueGetTextMethodInfo a signature where
overloadedMethod _ = dOMTextTrackCueGetText
foreign import ccall "webkit_dom_text_track_cue_get_track" webkit_dom_text_track_cue_get_track ::
Ptr DOMTextTrackCue ->
IO (Ptr WebKit.DOMTextTrack.DOMTextTrack)
dOMTextTrackCueGetTrack ::
(B.CallStack.HasCallStack, MonadIO m, IsDOMTextTrackCue a) =>
a
-> m WebKit.DOMTextTrack.DOMTextTrack
dOMTextTrackCueGetTrack self = liftIO $ do
self' <- unsafeManagedPtrCastPtr self
result <- webkit_dom_text_track_cue_get_track self'
checkUnexpectedReturnNULL "dOMTextTrackCueGetTrack" result
result' <- (wrapObject WebKit.DOMTextTrack.DOMTextTrack) result
touchManagedPtr self
return result'
data DOMTextTrackCueGetTrackMethodInfo
instance (signature ~ (m WebKit.DOMTextTrack.DOMTextTrack), MonadIO m, IsDOMTextTrackCue a) => O.MethodInfo DOMTextTrackCueGetTrackMethodInfo a signature where
overloadedMethod _ = dOMTextTrackCueGetTrack
foreign import ccall "webkit_dom_text_track_cue_get_vertical" webkit_dom_text_track_cue_get_vertical ::
Ptr DOMTextTrackCue ->
IO CString
dOMTextTrackCueGetVertical ::
(B.CallStack.HasCallStack, MonadIO m, IsDOMTextTrackCue a) =>
a
-> m T.Text
dOMTextTrackCueGetVertical self = liftIO $ do
self' <- unsafeManagedPtrCastPtr self
result <- webkit_dom_text_track_cue_get_vertical self'
checkUnexpectedReturnNULL "dOMTextTrackCueGetVertical" result
result' <- cstringToText result
freeMem result
touchManagedPtr self
return result'
data DOMTextTrackCueGetVerticalMethodInfo
instance (signature ~ (m T.Text), MonadIO m, IsDOMTextTrackCue a) => O.MethodInfo DOMTextTrackCueGetVerticalMethodInfo a signature where
overloadedMethod _ = dOMTextTrackCueGetVertical
foreign import ccall "webkit_dom_text_track_cue_set_align" webkit_dom_text_track_cue_set_align ::
Ptr DOMTextTrackCue ->
CString ->
Ptr (Ptr GError) ->
IO ()
dOMTextTrackCueSetAlign ::
(B.CallStack.HasCallStack, MonadIO m, IsDOMTextTrackCue a) =>
a
-> T.Text
-> m ()
dOMTextTrackCueSetAlign self value = liftIO $ do
self' <- unsafeManagedPtrCastPtr self
value' <- textToCString value
onException (do
propagateGError $ webkit_dom_text_track_cue_set_align self' value'
touchManagedPtr self
freeMem value'
return ()
) (do
freeMem value'
)
data DOMTextTrackCueSetAlignMethodInfo
instance (signature ~ (T.Text -> m ()), MonadIO m, IsDOMTextTrackCue a) => O.MethodInfo DOMTextTrackCueSetAlignMethodInfo a signature where
overloadedMethod _ = dOMTextTrackCueSetAlign
foreign import ccall "webkit_dom_text_track_cue_set_end_time" webkit_dom_text_track_cue_set_end_time ::
Ptr DOMTextTrackCue ->
CDouble ->
Ptr (Ptr GError) ->
IO ()
dOMTextTrackCueSetEndTime ::
(B.CallStack.HasCallStack, MonadIO m, IsDOMTextTrackCue a) =>
a
-> Double
-> m ()
dOMTextTrackCueSetEndTime self value = liftIO $ do
self' <- unsafeManagedPtrCastPtr self
let value' = realToFrac value
onException (do
propagateGError $ webkit_dom_text_track_cue_set_end_time self' value'
touchManagedPtr self
return ()
) (do
return ()
)
data DOMTextTrackCueSetEndTimeMethodInfo
instance (signature ~ (Double -> m ()), MonadIO m, IsDOMTextTrackCue a) => O.MethodInfo DOMTextTrackCueSetEndTimeMethodInfo a signature where
overloadedMethod _ = dOMTextTrackCueSetEndTime
foreign import ccall "webkit_dom_text_track_cue_set_id" webkit_dom_text_track_cue_set_id ::
Ptr DOMTextTrackCue ->
CString ->
IO ()
dOMTextTrackCueSetId ::
(B.CallStack.HasCallStack, MonadIO m, IsDOMTextTrackCue a) =>
a
-> T.Text
-> m ()
dOMTextTrackCueSetId self value = liftIO $ do
self' <- unsafeManagedPtrCastPtr self
value' <- textToCString value
webkit_dom_text_track_cue_set_id self' value'
touchManagedPtr self
freeMem value'
return ()
data DOMTextTrackCueSetIdMethodInfo
instance (signature ~ (T.Text -> m ()), MonadIO m, IsDOMTextTrackCue a) => O.MethodInfo DOMTextTrackCueSetIdMethodInfo a signature where
overloadedMethod _ = dOMTextTrackCueSetId
foreign import ccall "webkit_dom_text_track_cue_set_line" webkit_dom_text_track_cue_set_line ::
Ptr DOMTextTrackCue ->
CLong ->
Ptr (Ptr GError) ->
IO ()
dOMTextTrackCueSetLine ::
(B.CallStack.HasCallStack, MonadIO m, IsDOMTextTrackCue a) =>
a
-> CLong
-> m ()
dOMTextTrackCueSetLine self value = liftIO $ do
self' <- unsafeManagedPtrCastPtr self
onException (do
propagateGError $ webkit_dom_text_track_cue_set_line self' value
touchManagedPtr self
return ()
) (do
return ()
)
data DOMTextTrackCueSetLineMethodInfo
instance (signature ~ (CLong -> m ()), MonadIO m, IsDOMTextTrackCue a) => O.MethodInfo DOMTextTrackCueSetLineMethodInfo a signature where
overloadedMethod _ = dOMTextTrackCueSetLine
foreign import ccall "webkit_dom_text_track_cue_set_pause_on_exit" webkit_dom_text_track_cue_set_pause_on_exit ::
Ptr DOMTextTrackCue ->
CInt ->
IO ()
dOMTextTrackCueSetPauseOnExit ::
(B.CallStack.HasCallStack, MonadIO m, IsDOMTextTrackCue a) =>
a
-> Bool
-> m ()
dOMTextTrackCueSetPauseOnExit self value = liftIO $ do
self' <- unsafeManagedPtrCastPtr self
let value' = (fromIntegral . fromEnum) value
webkit_dom_text_track_cue_set_pause_on_exit self' value'
touchManagedPtr self
return ()
data DOMTextTrackCueSetPauseOnExitMethodInfo
instance (signature ~ (Bool -> m ()), MonadIO m, IsDOMTextTrackCue a) => O.MethodInfo DOMTextTrackCueSetPauseOnExitMethodInfo a signature where
overloadedMethod _ = dOMTextTrackCueSetPauseOnExit
foreign import ccall "webkit_dom_text_track_cue_set_position" webkit_dom_text_track_cue_set_position ::
Ptr DOMTextTrackCue ->
CLong ->
Ptr (Ptr GError) ->
IO ()
dOMTextTrackCueSetPosition ::
(B.CallStack.HasCallStack, MonadIO m, IsDOMTextTrackCue a) =>
a
-> CLong
-> m ()
dOMTextTrackCueSetPosition self value = liftIO $ do
self' <- unsafeManagedPtrCastPtr self
onException (do
propagateGError $ webkit_dom_text_track_cue_set_position self' value
touchManagedPtr self
return ()
) (do
return ()
)
data DOMTextTrackCueSetPositionMethodInfo
instance (signature ~ (CLong -> m ()), MonadIO m, IsDOMTextTrackCue a) => O.MethodInfo DOMTextTrackCueSetPositionMethodInfo a signature where
overloadedMethod _ = dOMTextTrackCueSetPosition
foreign import ccall "webkit_dom_text_track_cue_set_size" webkit_dom_text_track_cue_set_size ::
Ptr DOMTextTrackCue ->
CLong ->
Ptr (Ptr GError) ->
IO ()
dOMTextTrackCueSetSize ::
(B.CallStack.HasCallStack, MonadIO m, IsDOMTextTrackCue a) =>
a
-> CLong
-> m ()
dOMTextTrackCueSetSize self value = liftIO $ do
self' <- unsafeManagedPtrCastPtr self
onException (do
propagateGError $ webkit_dom_text_track_cue_set_size self' value
touchManagedPtr self
return ()
) (do
return ()
)
data DOMTextTrackCueSetSizeMethodInfo
instance (signature ~ (CLong -> m ()), MonadIO m, IsDOMTextTrackCue a) => O.MethodInfo DOMTextTrackCueSetSizeMethodInfo a signature where
overloadedMethod _ = dOMTextTrackCueSetSize
foreign import ccall "webkit_dom_text_track_cue_set_snap_to_lines" webkit_dom_text_track_cue_set_snap_to_lines ::
Ptr DOMTextTrackCue ->
CInt ->
IO ()
dOMTextTrackCueSetSnapToLines ::
(B.CallStack.HasCallStack, MonadIO m, IsDOMTextTrackCue a) =>
a
-> Bool
-> m ()
dOMTextTrackCueSetSnapToLines self value = liftIO $ do
self' <- unsafeManagedPtrCastPtr self
let value' = (fromIntegral . fromEnum) value
webkit_dom_text_track_cue_set_snap_to_lines self' value'
touchManagedPtr self
return ()
data DOMTextTrackCueSetSnapToLinesMethodInfo
instance (signature ~ (Bool -> m ()), MonadIO m, IsDOMTextTrackCue a) => O.MethodInfo DOMTextTrackCueSetSnapToLinesMethodInfo a signature where
overloadedMethod _ = dOMTextTrackCueSetSnapToLines
foreign import ccall "webkit_dom_text_track_cue_set_start_time" webkit_dom_text_track_cue_set_start_time ::
Ptr DOMTextTrackCue ->
CDouble ->
Ptr (Ptr GError) ->
IO ()
dOMTextTrackCueSetStartTime ::
(B.CallStack.HasCallStack, MonadIO m, IsDOMTextTrackCue a) =>
a
-> Double
-> m ()
dOMTextTrackCueSetStartTime self value = liftIO $ do
self' <- unsafeManagedPtrCastPtr self
let value' = realToFrac value
onException (do
propagateGError $ webkit_dom_text_track_cue_set_start_time self' value'
touchManagedPtr self
return ()
) (do
return ()
)
data DOMTextTrackCueSetStartTimeMethodInfo
instance (signature ~ (Double -> m ()), MonadIO m, IsDOMTextTrackCue a) => O.MethodInfo DOMTextTrackCueSetStartTimeMethodInfo a signature where
overloadedMethod _ = dOMTextTrackCueSetStartTime
foreign import ccall "webkit_dom_text_track_cue_set_text" webkit_dom_text_track_cue_set_text ::
Ptr DOMTextTrackCue ->
CString ->
IO ()
dOMTextTrackCueSetText ::
(B.CallStack.HasCallStack, MonadIO m, IsDOMTextTrackCue a) =>
a
-> T.Text
-> m ()
dOMTextTrackCueSetText self value = liftIO $ do
self' <- unsafeManagedPtrCastPtr self
value' <- textToCString value
webkit_dom_text_track_cue_set_text self' value'
touchManagedPtr self
freeMem value'
return ()
data DOMTextTrackCueSetTextMethodInfo
instance (signature ~ (T.Text -> m ()), MonadIO m, IsDOMTextTrackCue a) => O.MethodInfo DOMTextTrackCueSetTextMethodInfo a signature where
overloadedMethod _ = dOMTextTrackCueSetText
foreign import ccall "webkit_dom_text_track_cue_set_vertical" webkit_dom_text_track_cue_set_vertical ::
Ptr DOMTextTrackCue ->
CString ->
Ptr (Ptr GError) ->
IO ()
dOMTextTrackCueSetVertical ::
(B.CallStack.HasCallStack, MonadIO m, IsDOMTextTrackCue a) =>
a
-> T.Text
-> m ()
dOMTextTrackCueSetVertical self value = liftIO $ do
self' <- unsafeManagedPtrCastPtr self
value' <- textToCString value
onException (do
propagateGError $ webkit_dom_text_track_cue_set_vertical self' value'
touchManagedPtr self
freeMem value'
return ()
) (do
freeMem value'
)
data DOMTextTrackCueSetVerticalMethodInfo
instance (signature ~ (T.Text -> m ()), MonadIO m, IsDOMTextTrackCue a) => O.MethodInfo DOMTextTrackCueSetVerticalMethodInfo a signature where
overloadedMethod _ = dOMTextTrackCueSetVertical