packages feed

ghcjs-dom-javascript-0.10.0.0: src/GHCJS/DOM/JSFFI/Generated/ExtendableMessageEventInit.hs

{-# LANGUAGE PatternSynonyms #-}
{-# LANGUAGE ForeignFunctionInterface, JavaScriptFFI #-}
{-# LANGUAGE ImplicitParams, ConstraintKinds, KindSignatures #-}
{-# OPTIONS_GHC -fno-warn-unused-imports #-}
-- | Generated by dom-gen from service-workers (webref). Do not edit.
module GHCJS.DOM.JSFFI.Generated.ExtendableMessageEventInit
       (js_newExtendableMessageEventInit, js_setData, js_getData, js_setOrigin, js_getOrigin, js_setLastEventId, js_getLastEventId, js_setSource, js_getSource, js_setPorts, js_getPorts, newExtendableMessageEventInit, setData, getData, setOrigin, getOrigin, getOriginUnsafe, getOriginUnchecked, setLastEventId, getLastEventId, getLastEventIdUnsafe, getLastEventIdUnchecked, setSource, getSource, getSourceUnsafe, getSourceUnchecked, setPorts, getPorts, getPortsUnsafe, getPortsUnchecked, ExtendableMessageEventInit(..), gTypeExtendableMessageEventInit)
       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_newExtendableMessageEventInit :: IO ExtendableMessageEventInit
-- | <https://w3c.github.io/ServiceWorker/#dictdef-extendablemessageeventinit ExtendableMessageEventInit specification>
newExtendableMessageEventInit :: (MonadDOM m) => m ExtendableMessageEventInit
newExtendableMessageEventInit = liftDOM ((js_newExtendableMessageEventInit))

foreign import javascript safe "(($1, $2) => { $1[\"data\"] = $2; })"
        js_setData :: ExtendableMessageEventInit -> JSVal -> IO ()
-- | <https://w3c.github.io/ServiceWorker/#dom-extendablemessageeventinit-data ExtendableMessageEventInit.data specification>
setData :: (MonadDOM m) => ExtendableMessageEventInit -> JSVal -> m ()
setData self val = liftDOM (void ((js_setData (self) (val))))

foreign import javascript unsafe "(($1) => { return $1[\"data\"]; })"
        js_getData :: ExtendableMessageEventInit -> IO JSVal
-- | <https://w3c.github.io/ServiceWorker/#dom-extendablemessageeventinit-data ExtendableMessageEventInit.data specification>
getData :: (MonadDOM m) => ExtendableMessageEventInit -> m JSVal
getData self = liftDOM ((js_getData (self)))

foreign import javascript safe "(($1, $2) => { $1[\"origin\"] = $2; })"
        js_setOrigin :: ExtendableMessageEventInit -> JSString -> IO ()
-- | <https://w3c.github.io/ServiceWorker/#dom-extendablemessageeventinit-origin ExtendableMessageEventInit.origin specification>
setOrigin :: (MonadDOM m, ToJSString val) => ExtendableMessageEventInit -> val -> m ()
setOrigin self val = liftDOM (void ((js_setOrigin (self) (toJSString val))))

foreign import javascript unsafe "(($1) => { return $1[\"origin\"]; })"
        js_getOrigin :: ExtendableMessageEventInit -> IO JSVal
-- | <https://w3c.github.io/ServiceWorker/#dom-extendablemessageeventinit-origin ExtendableMessageEventInit.origin specification>
getOrigin :: (MonadDOM m, FromJSString result) => ExtendableMessageEventInit -> m (Maybe result)
getOrigin self = liftDOM (((fromMaybeJSString . Nullable) <$> (js_getOrigin (self))))

-- | <https://w3c.github.io/ServiceWorker/#dom-extendablemessageeventinit-origin ExtendableMessageEventInit.origin specification>
getOriginUnsafe :: (MonadDOM m, HasCallStack, FromJSString result) => ExtendableMessageEventInit -> m result
getOriginUnsafe self = liftDOM ((((fromMaybeJSString . Nullable) <$> (js_getOrigin (self))) >>= P.maybe (P.error "Nothing to return") P.return))

-- | <https://w3c.github.io/ServiceWorker/#dom-extendablemessageeventinit-origin ExtendableMessageEventInit.origin specification>
getOriginUnchecked :: (MonadDOM m, FromJSString result) => ExtendableMessageEventInit -> m result
getOriginUnchecked self = liftDOM ((pFromJSVal <$> (js_getOrigin (self))))

foreign import javascript safe "(($1, $2) => { $1[\"lastEventId\"] = $2; })"
        js_setLastEventId :: ExtendableMessageEventInit -> JSString -> IO ()
-- | <https://w3c.github.io/ServiceWorker/#dom-extendablemessageeventinit-lasteventid ExtendableMessageEventInit.lastEventId specification>
setLastEventId :: (MonadDOM m, ToJSString val) => ExtendableMessageEventInit -> val -> m ()
setLastEventId self val = liftDOM (void ((js_setLastEventId (self) (toJSString val))))

foreign import javascript unsafe "(($1) => { return $1[\"lastEventId\"]; })"
        js_getLastEventId :: ExtendableMessageEventInit -> IO JSVal
-- | <https://w3c.github.io/ServiceWorker/#dom-extendablemessageeventinit-lasteventid ExtendableMessageEventInit.lastEventId specification>
getLastEventId :: (MonadDOM m, FromJSString result) => ExtendableMessageEventInit -> m (Maybe result)
getLastEventId self = liftDOM (((fromMaybeJSString . Nullable) <$> (js_getLastEventId (self))))

-- | <https://w3c.github.io/ServiceWorker/#dom-extendablemessageeventinit-lasteventid ExtendableMessageEventInit.lastEventId specification>
getLastEventIdUnsafe :: (MonadDOM m, HasCallStack, FromJSString result) => ExtendableMessageEventInit -> m result
getLastEventIdUnsafe self = liftDOM ((((fromMaybeJSString . Nullable) <$> (js_getLastEventId (self))) >>= P.maybe (P.error "Nothing to return") P.return))

-- | <https://w3c.github.io/ServiceWorker/#dom-extendablemessageeventinit-lasteventid ExtendableMessageEventInit.lastEventId specification>
getLastEventIdUnchecked :: (MonadDOM m, FromJSString result) => ExtendableMessageEventInit -> m result
getLastEventIdUnchecked self = liftDOM ((pFromJSVal <$> (js_getLastEventId (self))))

foreign import javascript safe "(($1, $2) => { $1[\"source\"] = $2; })"
        js_setSource :: ExtendableMessageEventInit -> JSVal -> IO ()
-- | <https://w3c.github.io/ServiceWorker/#dom-extendablemessageeventinit-source ExtendableMessageEventInit.source specification>
setSource :: (MonadDOM m, IsClientOrServiceWorkerOrMessagePort val) => ExtendableMessageEventInit -> Maybe val -> m ()
setSource self val = liftDOM (void (((toJSVal val) >>= \a2' -> js_setSource (self) a2')))

foreign import javascript unsafe "(($1) => { return $1[\"source\"]; })"
        js_getSource :: ExtendableMessageEventInit -> IO JSVal
-- | <https://w3c.github.io/ServiceWorker/#dom-extendablemessageeventinit-source ExtendableMessageEventInit.source specification>
getSource :: (MonadDOM m) => ExtendableMessageEventInit -> m (Maybe ClientOrServiceWorkerOrMessagePort)
getSource self = liftDOM (((js_getSource (self)) >>= fromJSValUnchecked))

-- | <https://w3c.github.io/ServiceWorker/#dom-extendablemessageeventinit-source ExtendableMessageEventInit.source specification>
getSourceUnsafe :: (MonadDOM m, HasCallStack) => ExtendableMessageEventInit -> m ClientOrServiceWorkerOrMessagePort
getSourceUnsafe self = liftDOM ((((js_getSource (self)) >>= fromJSValUnchecked) >>= P.maybe (P.error "Nothing to return") P.return))

-- | <https://w3c.github.io/ServiceWorker/#dom-extendablemessageeventinit-source ExtendableMessageEventInit.source specification>
getSourceUnchecked :: (MonadDOM m) => ExtendableMessageEventInit -> m ClientOrServiceWorkerOrMessagePort
getSourceUnchecked self = liftDOM ((pFromJSVal <$> (js_getSource (self))))

foreign import javascript safe "(($1, $2) => { $1[\"ports\"] = $2; })"
        js_setPorts :: ExtendableMessageEventInit -> JSVal -> IO ()
-- | <https://w3c.github.io/ServiceWorker/#dom-extendablemessageeventinit-ports ExtendableMessageEventInit.ports specification>
setPorts :: (MonadDOM m) => ExtendableMessageEventInit -> [MessagePort] -> m ()
setPorts self val = liftDOM (void (((toJSVal val) >>= \a2' -> js_setPorts (self) a2')))

foreign import javascript unsafe "(($1) => { return $1[\"ports\"]; })"
        js_getPorts :: ExtendableMessageEventInit -> IO JSVal
-- | <https://w3c.github.io/ServiceWorker/#dom-extendablemessageeventinit-ports ExtendableMessageEventInit.ports specification>
getPorts :: (MonadDOM m) => ExtendableMessageEventInit -> m (Maybe [MessagePort])
getPorts self = liftDOM (((js_getPorts (self)) >>= fromJSValUnchecked))

-- | <https://w3c.github.io/ServiceWorker/#dom-extendablemessageeventinit-ports ExtendableMessageEventInit.ports specification>
getPortsUnsafe :: (MonadDOM m, HasCallStack) => ExtendableMessageEventInit -> m [MessagePort]
getPortsUnsafe self = liftDOM ((((js_getPorts (self)) >>= fromJSValUnchecked) >>= P.maybe (P.error "Nothing to return") P.return))

-- | <https://w3c.github.io/ServiceWorker/#dom-extendablemessageeventinit-ports ExtendableMessageEventInit.ports specification>
getPortsUnchecked :: (MonadDOM m) => ExtendableMessageEventInit -> m [MessagePort]
getPortsUnchecked self = liftDOM (((js_getPorts (self)) >>= fromJSValUnchecked))