DocumentPictureInPictureOptions.hs

{-# LANGUAGE PatternSynonyms #-}
{-# LANGUAGE ForeignFunctionInterface, JavaScriptFFI #-}
{-# LANGUAGE ImplicitParams, ConstraintKinds, KindSignatures #-}
{-# OPTIONS_GHC -fno-warn-unused-imports #-}
-- | Generated by dom-gen from document-picture-in-picture (webref). Do not edit.
module GHCJS.DOM.JSFFI.Generated.DocumentPictureInPictureOptions
       (js_newDocumentPictureInPictureOptions, js_setWidth, js_getWidth, js_setHeight, js_getHeight, js_setDisallowReturnToOpener, js_getDisallowReturnToOpener, js_setPreferInitialWindowPlacement, js_getPreferInitialWindowPlacement, newDocumentPictureInPictureOptions, setWidth, getWidth, getWidthUnsafe, getWidthUnchecked, setHeight, getHeight, getHeightUnsafe, getHeightUnchecked, setDisallowReturnToOpener, getDisallowReturnToOpener, getDisallowReturnToOpenerUnsafe, getDisallowReturnToOpenerUnchecked, setPreferInitialWindowPlacement, getPreferInitialWindowPlacement, getPreferInitialWindowPlacementUnsafe, getPreferInitialWindowPlacementUnchecked, DocumentPictureInPictureOptions(..), gTypeDocumentPictureInPictureOptions)
       where
import Prelude ((.), (==), (>>=), (<$>), (++), Bool(..), Maybe(..), IO, Int, Word, Double, Float)
import qualified Prelude as P
import Control.Monad (void)
import GHCJS.Types (JSVal, JSString)
import GHCJS.Foreign (jsUndefined, jsNull)
import GHCJS.DOM.Types
import qualified GHCJS.DOM.Types as Types
import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName, unsafeEventNameAsync)
import GHCJS.DOM.JSFFI.Generated.Enums

foreign import javascript safe "(() => { return ({}); })"
        js_newDocumentPictureInPictureOptions :: IO DocumentPictureInPictureOptions
-- | <https://wicg.github.io/document-picture-in-picture/#dictdef-documentpictureinpictureoptions DocumentPictureInPictureOptions specification>
newDocumentPictureInPictureOptions :: (MonadDOM m) => m DocumentPictureInPictureOptions
newDocumentPictureInPictureOptions = liftDOM ((js_newDocumentPictureInPictureOptions))

foreign import javascript safe "(($1, $2) => { $1[\"width\"] = $2; })"
        js_setWidth :: DocumentPictureInPictureOptions -> JSVal -> IO ()
-- | <https://wicg.github.io/document-picture-in-picture/#dom-documentpictureinpictureoptions-width DocumentPictureInPictureOptions.width specification>
setWidth :: (MonadDOM m) => DocumentPictureInPictureOptions -> Word53 -> m ()
setWidth self val = liftDOM (void (((toJSVal val) >>= \a2' -> js_setWidth (self) a2')))

foreign import javascript unsafe "(($1) => { return $1[\"width\"]; })"
        js_getWidth :: DocumentPictureInPictureOptions -> IO JSVal
-- | <https://wicg.github.io/document-picture-in-picture/#dom-documentpictureinpictureoptions-width DocumentPictureInPictureOptions.width specification>
getWidth :: (MonadDOM m) => DocumentPictureInPictureOptions -> m (Maybe Word53)
getWidth self = liftDOM (((js_getWidth (self)) >>= fromJSValUnchecked))

-- | <https://wicg.github.io/document-picture-in-picture/#dom-documentpictureinpictureoptions-width DocumentPictureInPictureOptions.width specification>
getWidthUnsafe :: (MonadDOM m, HasCallStack) => DocumentPictureInPictureOptions -> m Word53
getWidthUnsafe self = liftDOM ((((js_getWidth (self)) >>= fromJSValUnchecked) >>= P.maybe (P.error "Nothing to return") P.return))

-- | <https://wicg.github.io/document-picture-in-picture/#dom-documentpictureinpictureoptions-width DocumentPictureInPictureOptions.width specification>
getWidthUnchecked :: (MonadDOM m) => DocumentPictureInPictureOptions -> m Word53
getWidthUnchecked self = liftDOM ((pFromJSVal <$> (js_getWidth (self))))

foreign import javascript safe "(($1, $2) => { $1[\"height\"] = $2; })"
        js_setHeight :: DocumentPictureInPictureOptions -> JSVal -> IO ()
-- | <https://wicg.github.io/document-picture-in-picture/#dom-documentpictureinpictureoptions-height DocumentPictureInPictureOptions.height specification>
setHeight :: (MonadDOM m) => DocumentPictureInPictureOptions -> Word53 -> m ()
setHeight self val = liftDOM (void (((toJSVal val) >>= \a2' -> js_setHeight (self) a2')))

foreign import javascript unsafe "(($1) => { return $1[\"height\"]; })"
        js_getHeight :: DocumentPictureInPictureOptions -> IO JSVal
-- | <https://wicg.github.io/document-picture-in-picture/#dom-documentpictureinpictureoptions-height DocumentPictureInPictureOptions.height specification>
getHeight :: (MonadDOM m) => DocumentPictureInPictureOptions -> m (Maybe Word53)
getHeight self = liftDOM (((js_getHeight (self)) >>= fromJSValUnchecked))

-- | <https://wicg.github.io/document-picture-in-picture/#dom-documentpictureinpictureoptions-height DocumentPictureInPictureOptions.height specification>
getHeightUnsafe :: (MonadDOM m, HasCallStack) => DocumentPictureInPictureOptions -> m Word53
getHeightUnsafe self = liftDOM ((((js_getHeight (self)) >>= fromJSValUnchecked) >>= P.maybe (P.error "Nothing to return") P.return))

-- | <https://wicg.github.io/document-picture-in-picture/#dom-documentpictureinpictureoptions-height DocumentPictureInPictureOptions.height specification>
getHeightUnchecked :: (MonadDOM m) => DocumentPictureInPictureOptions -> m Word53
getHeightUnchecked self = liftDOM ((pFromJSVal <$> (js_getHeight (self))))

foreign import javascript safe "(($1, $2) => { $1[\"disallowReturnToOpener\"] = $2; })"
        js_setDisallowReturnToOpener :: DocumentPictureInPictureOptions -> Bool -> IO ()
-- | <https://wicg.github.io/document-picture-in-picture/#dom-documentpictureinpictureoptions-disallowreturntoopener DocumentPictureInPictureOptions.disallowReturnToOpener specification>
setDisallowReturnToOpener :: (MonadDOM m) => DocumentPictureInPictureOptions -> Bool -> m ()
setDisallowReturnToOpener self val = liftDOM (void ((js_setDisallowReturnToOpener (self) (val))))

foreign import javascript unsafe "(($1) => { return $1[\"disallowReturnToOpener\"]; })"
        js_getDisallowReturnToOpener :: DocumentPictureInPictureOptions -> IO JSVal
-- | <https://wicg.github.io/document-picture-in-picture/#dom-documentpictureinpictureoptions-disallowreturntoopener DocumentPictureInPictureOptions.disallowReturnToOpener specification>
getDisallowReturnToOpener :: (MonadDOM m) => DocumentPictureInPictureOptions -> m (Maybe Bool)
getDisallowReturnToOpener self = liftDOM (((js_getDisallowReturnToOpener (self)) >>= fromJSValUnchecked))

-- | <https://wicg.github.io/document-picture-in-picture/#dom-documentpictureinpictureoptions-disallowreturntoopener DocumentPictureInPictureOptions.disallowReturnToOpener specification>
getDisallowReturnToOpenerUnsafe :: (MonadDOM m, HasCallStack) => DocumentPictureInPictureOptions -> m Bool
getDisallowReturnToOpenerUnsafe self = liftDOM ((((js_getDisallowReturnToOpener (self)) >>= fromJSValUnchecked) >>= P.maybe (P.error "Nothing to return") P.return))

-- | <https://wicg.github.io/document-picture-in-picture/#dom-documentpictureinpictureoptions-disallowreturntoopener DocumentPictureInPictureOptions.disallowReturnToOpener specification>
getDisallowReturnToOpenerUnchecked :: (MonadDOM m) => DocumentPictureInPictureOptions -> m Bool
getDisallowReturnToOpenerUnchecked self = liftDOM ((pFromJSVal <$> (js_getDisallowReturnToOpener (self))))

foreign import javascript safe "(($1, $2) => { $1[\"preferInitialWindowPlacement\"] = $2; })"
        js_setPreferInitialWindowPlacement :: DocumentPictureInPictureOptions -> Bool -> IO ()
-- | <https://wicg.github.io/document-picture-in-picture/#dom-documentpictureinpictureoptions-preferinitialwindowplacement DocumentPictureInPictureOptions.preferInitialWindowPlacement specification>
setPreferInitialWindowPlacement :: (MonadDOM m) => DocumentPictureInPictureOptions -> Bool -> m ()
setPreferInitialWindowPlacement self val = liftDOM (void ((js_setPreferInitialWindowPlacement (self) (val))))

foreign import javascript unsafe "(($1) => { return $1[\"preferInitialWindowPlacement\"]; })"
        js_getPreferInitialWindowPlacement :: DocumentPictureInPictureOptions -> IO JSVal
-- | <https://wicg.github.io/document-picture-in-picture/#dom-documentpictureinpictureoptions-preferinitialwindowplacement DocumentPictureInPictureOptions.preferInitialWindowPlacement specification>
getPreferInitialWindowPlacement :: (MonadDOM m) => DocumentPictureInPictureOptions -> m (Maybe Bool)
getPreferInitialWindowPlacement self = liftDOM (((js_getPreferInitialWindowPlacement (self)) >>= fromJSValUnchecked))

-- | <https://wicg.github.io/document-picture-in-picture/#dom-documentpictureinpictureoptions-preferinitialwindowplacement DocumentPictureInPictureOptions.preferInitialWindowPlacement specification>
getPreferInitialWindowPlacementUnsafe :: (MonadDOM m, HasCallStack) => DocumentPictureInPictureOptions -> m Bool
getPreferInitialWindowPlacementUnsafe self = liftDOM ((((js_getPreferInitialWindowPlacement (self)) >>= fromJSValUnchecked) >>= P.maybe (P.error "Nothing to return") P.return))

-- | <https://wicg.github.io/document-picture-in-picture/#dom-documentpictureinpictureoptions-preferinitialwindowplacement DocumentPictureInPictureOptions.preferInitialWindowPlacement specification>
getPreferInitialWindowPlacementUnchecked :: (MonadDOM m) => DocumentPictureInPictureOptions -> m Bool
getPreferInitialWindowPlacementUnchecked self = liftDOM ((pFromJSVal <$> (js_getPreferInitialWindowPlacement (self))))