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

{-# LANGUAGE PatternSynonyms #-}
{-# LANGUAGE ForeignFunctionInterface, JavaScriptFFI #-}
{-# LANGUAGE ImplicitParams, ConstraintKinds, KindSignatures #-}
{-# OPTIONS_GHC -fno-warn-unused-imports #-}
-- | Generated by dom-gen from urlpattern (webref). Do not edit.
module GHCJS.DOM.JSFFI.Generated.URLPatternResult
       (js_newURLPatternResult, js_setInputs, js_getInputs, js_setProtocol, js_getProtocol, js_setUsername, js_getUsername, js_setPassword, js_getPassword, js_setHostname, js_getHostname, js_setPort, js_getPort, js_setPathname, js_getPathname, js_setSearch, js_getSearch, js_setHash, js_getHash, newURLPatternResult, setInputs, getInputs, getInputsUnsafe, getInputsUnchecked, setProtocol, getProtocol, getProtocolUnsafe, getProtocolUnchecked, setUsername, getUsername, getUsernameUnsafe, getUsernameUnchecked, setPassword, getPassword, getPasswordUnsafe, getPasswordUnchecked, setHostname, getHostname, getHostnameUnsafe, getHostnameUnchecked, setPort, getPort, getPortUnsafe, getPortUnchecked, setPathname, getPathname, getPathnameUnsafe, getPathnameUnchecked, setSearch, getSearch, getSearchUnsafe, getSearchUnchecked, setHash, getHash, getHashUnsafe, getHashUnchecked, URLPatternResult(..), gTypeURLPatternResult)
       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_newURLPatternResult :: IO URLPatternResult
-- | <https://urlpattern.spec.whatwg.org/#dictdef-urlpatternresult URLPatternResult specification>
newURLPatternResult :: (MonadDOM m) => m URLPatternResult
newURLPatternResult = liftDOM ((js_newURLPatternResult))

foreign import javascript safe "(($1, $2) => { $1[\"inputs\"] = $2; })"
        js_setInputs :: URLPatternResult -> JSVal -> IO ()
-- | <https://urlpattern.spec.whatwg.org/#dom-urlpatternresult-inputs URLPatternResult.inputs specification>
setInputs :: (MonadDOM m, IsURLPatternInput val) => URLPatternResult -> [val] -> m ()
setInputs self val = liftDOM (void (((toJSVal val) >>= \a2' -> js_setInputs (self) a2')))

foreign import javascript unsafe "(($1) => { return $1[\"inputs\"]; })"
        js_getInputs :: URLPatternResult -> IO JSVal
-- | <https://urlpattern.spec.whatwg.org/#dom-urlpatternresult-inputs URLPatternResult.inputs specification>
getInputs :: (MonadDOM m) => URLPatternResult -> m (Maybe [URLPatternInput])
getInputs self = liftDOM (((js_getInputs (self)) >>= fromJSValUnchecked))

-- | <https://urlpattern.spec.whatwg.org/#dom-urlpatternresult-inputs URLPatternResult.inputs specification>
getInputsUnsafe :: (MonadDOM m, HasCallStack) => URLPatternResult -> m [URLPatternInput]
getInputsUnsafe self = liftDOM ((((js_getInputs (self)) >>= fromJSValUnchecked) >>= P.maybe (P.error "Nothing to return") P.return))

-- | <https://urlpattern.spec.whatwg.org/#dom-urlpatternresult-inputs URLPatternResult.inputs specification>
getInputsUnchecked :: (MonadDOM m) => URLPatternResult -> m [URLPatternInput]
getInputsUnchecked self = liftDOM (((js_getInputs (self)) >>= fromJSValUnchecked))

foreign import javascript safe "(($1, $2) => { $1[\"protocol\"] = $2; })"
        js_setProtocol :: URLPatternResult -> URLPatternComponentResult -> IO ()
-- | <https://urlpattern.spec.whatwg.org/#dom-urlpatternresult-protocol URLPatternResult.protocol specification>
setProtocol :: (MonadDOM m) => URLPatternResult -> URLPatternComponentResult -> m ()
setProtocol self val = liftDOM (void ((js_setProtocol (self) (val))))

foreign import javascript unsafe "(($1) => { return $1[\"protocol\"]; })"
        js_getProtocol :: URLPatternResult -> IO JSVal
-- | <https://urlpattern.spec.whatwg.org/#dom-urlpatternresult-protocol URLPatternResult.protocol specification>
getProtocol :: (MonadDOM m) => URLPatternResult -> m (Maybe URLPatternComponentResult)
getProtocol self = liftDOM (((js_getProtocol (self)) >>= fromJSValUnchecked))

-- | <https://urlpattern.spec.whatwg.org/#dom-urlpatternresult-protocol URLPatternResult.protocol specification>
getProtocolUnsafe :: (MonadDOM m, HasCallStack) => URLPatternResult -> m URLPatternComponentResult
getProtocolUnsafe self = liftDOM ((((js_getProtocol (self)) >>= fromJSValUnchecked) >>= P.maybe (P.error "Nothing to return") P.return))

-- | <https://urlpattern.spec.whatwg.org/#dom-urlpatternresult-protocol URLPatternResult.protocol specification>
getProtocolUnchecked :: (MonadDOM m) => URLPatternResult -> m URLPatternComponentResult
getProtocolUnchecked self = liftDOM ((pFromJSVal <$> (js_getProtocol (self))))

foreign import javascript safe "(($1, $2) => { $1[\"username\"] = $2; })"
        js_setUsername :: URLPatternResult -> URLPatternComponentResult -> IO ()
-- | <https://urlpattern.spec.whatwg.org/#dom-urlpatternresult-username URLPatternResult.username specification>
setUsername :: (MonadDOM m) => URLPatternResult -> URLPatternComponentResult -> m ()
setUsername self val = liftDOM (void ((js_setUsername (self) (val))))

foreign import javascript unsafe "(($1) => { return $1[\"username\"]; })"
        js_getUsername :: URLPatternResult -> IO JSVal
-- | <https://urlpattern.spec.whatwg.org/#dom-urlpatternresult-username URLPatternResult.username specification>
getUsername :: (MonadDOM m) => URLPatternResult -> m (Maybe URLPatternComponentResult)
getUsername self = liftDOM (((js_getUsername (self)) >>= fromJSValUnchecked))

-- | <https://urlpattern.spec.whatwg.org/#dom-urlpatternresult-username URLPatternResult.username specification>
getUsernameUnsafe :: (MonadDOM m, HasCallStack) => URLPatternResult -> m URLPatternComponentResult
getUsernameUnsafe self = liftDOM ((((js_getUsername (self)) >>= fromJSValUnchecked) >>= P.maybe (P.error "Nothing to return") P.return))

-- | <https://urlpattern.spec.whatwg.org/#dom-urlpatternresult-username URLPatternResult.username specification>
getUsernameUnchecked :: (MonadDOM m) => URLPatternResult -> m URLPatternComponentResult
getUsernameUnchecked self = liftDOM ((pFromJSVal <$> (js_getUsername (self))))

foreign import javascript safe "(($1, $2) => { $1[\"password\"] = $2; })"
        js_setPassword :: URLPatternResult -> URLPatternComponentResult -> IO ()
-- | <https://urlpattern.spec.whatwg.org/#dom-urlpatternresult-password URLPatternResult.password specification>
setPassword :: (MonadDOM m) => URLPatternResult -> URLPatternComponentResult -> m ()
setPassword self val = liftDOM (void ((js_setPassword (self) (val))))

foreign import javascript unsafe "(($1) => { return $1[\"password\"]; })"
        js_getPassword :: URLPatternResult -> IO JSVal
-- | <https://urlpattern.spec.whatwg.org/#dom-urlpatternresult-password URLPatternResult.password specification>
getPassword :: (MonadDOM m) => URLPatternResult -> m (Maybe URLPatternComponentResult)
getPassword self = liftDOM (((js_getPassword (self)) >>= fromJSValUnchecked))

-- | <https://urlpattern.spec.whatwg.org/#dom-urlpatternresult-password URLPatternResult.password specification>
getPasswordUnsafe :: (MonadDOM m, HasCallStack) => URLPatternResult -> m URLPatternComponentResult
getPasswordUnsafe self = liftDOM ((((js_getPassword (self)) >>= fromJSValUnchecked) >>= P.maybe (P.error "Nothing to return") P.return))

-- | <https://urlpattern.spec.whatwg.org/#dom-urlpatternresult-password URLPatternResult.password specification>
getPasswordUnchecked :: (MonadDOM m) => URLPatternResult -> m URLPatternComponentResult
getPasswordUnchecked self = liftDOM ((pFromJSVal <$> (js_getPassword (self))))

foreign import javascript safe "(($1, $2) => { $1[\"hostname\"] = $2; })"
        js_setHostname :: URLPatternResult -> URLPatternComponentResult -> IO ()
-- | <https://urlpattern.spec.whatwg.org/#dom-urlpatternresult-hostname URLPatternResult.hostname specification>
setHostname :: (MonadDOM m) => URLPatternResult -> URLPatternComponentResult -> m ()
setHostname self val = liftDOM (void ((js_setHostname (self) (val))))

foreign import javascript unsafe "(($1) => { return $1[\"hostname\"]; })"
        js_getHostname :: URLPatternResult -> IO JSVal
-- | <https://urlpattern.spec.whatwg.org/#dom-urlpatternresult-hostname URLPatternResult.hostname specification>
getHostname :: (MonadDOM m) => URLPatternResult -> m (Maybe URLPatternComponentResult)
getHostname self = liftDOM (((js_getHostname (self)) >>= fromJSValUnchecked))

-- | <https://urlpattern.spec.whatwg.org/#dom-urlpatternresult-hostname URLPatternResult.hostname specification>
getHostnameUnsafe :: (MonadDOM m, HasCallStack) => URLPatternResult -> m URLPatternComponentResult
getHostnameUnsafe self = liftDOM ((((js_getHostname (self)) >>= fromJSValUnchecked) >>= P.maybe (P.error "Nothing to return") P.return))

-- | <https://urlpattern.spec.whatwg.org/#dom-urlpatternresult-hostname URLPatternResult.hostname specification>
getHostnameUnchecked :: (MonadDOM m) => URLPatternResult -> m URLPatternComponentResult
getHostnameUnchecked self = liftDOM ((pFromJSVal <$> (js_getHostname (self))))

foreign import javascript safe "(($1, $2) => { $1[\"port\"] = $2; })"
        js_setPort :: URLPatternResult -> URLPatternComponentResult -> IO ()
-- | <https://urlpattern.spec.whatwg.org/#dom-urlpatternresult-port URLPatternResult.port specification>
setPort :: (MonadDOM m) => URLPatternResult -> URLPatternComponentResult -> m ()
setPort self val = liftDOM (void ((js_setPort (self) (val))))

foreign import javascript unsafe "(($1) => { return $1[\"port\"]; })"
        js_getPort :: URLPatternResult -> IO JSVal
-- | <https://urlpattern.spec.whatwg.org/#dom-urlpatternresult-port URLPatternResult.port specification>
getPort :: (MonadDOM m) => URLPatternResult -> m (Maybe URLPatternComponentResult)
getPort self = liftDOM (((js_getPort (self)) >>= fromJSValUnchecked))

-- | <https://urlpattern.spec.whatwg.org/#dom-urlpatternresult-port URLPatternResult.port specification>
getPortUnsafe :: (MonadDOM m, HasCallStack) => URLPatternResult -> m URLPatternComponentResult
getPortUnsafe self = liftDOM ((((js_getPort (self)) >>= fromJSValUnchecked) >>= P.maybe (P.error "Nothing to return") P.return))

-- | <https://urlpattern.spec.whatwg.org/#dom-urlpatternresult-port URLPatternResult.port specification>
getPortUnchecked :: (MonadDOM m) => URLPatternResult -> m URLPatternComponentResult
getPortUnchecked self = liftDOM ((pFromJSVal <$> (js_getPort (self))))

foreign import javascript safe "(($1, $2) => { $1[\"pathname\"] = $2; })"
        js_setPathname :: URLPatternResult -> URLPatternComponentResult -> IO ()
-- | <https://urlpattern.spec.whatwg.org/#dom-urlpatternresult-pathname URLPatternResult.pathname specification>
setPathname :: (MonadDOM m) => URLPatternResult -> URLPatternComponentResult -> m ()
setPathname self val = liftDOM (void ((js_setPathname (self) (val))))

foreign import javascript unsafe "(($1) => { return $1[\"pathname\"]; })"
        js_getPathname :: URLPatternResult -> IO JSVal
-- | <https://urlpattern.spec.whatwg.org/#dom-urlpatternresult-pathname URLPatternResult.pathname specification>
getPathname :: (MonadDOM m) => URLPatternResult -> m (Maybe URLPatternComponentResult)
getPathname self = liftDOM (((js_getPathname (self)) >>= fromJSValUnchecked))

-- | <https://urlpattern.spec.whatwg.org/#dom-urlpatternresult-pathname URLPatternResult.pathname specification>
getPathnameUnsafe :: (MonadDOM m, HasCallStack) => URLPatternResult -> m URLPatternComponentResult
getPathnameUnsafe self = liftDOM ((((js_getPathname (self)) >>= fromJSValUnchecked) >>= P.maybe (P.error "Nothing to return") P.return))

-- | <https://urlpattern.spec.whatwg.org/#dom-urlpatternresult-pathname URLPatternResult.pathname specification>
getPathnameUnchecked :: (MonadDOM m) => URLPatternResult -> m URLPatternComponentResult
getPathnameUnchecked self = liftDOM ((pFromJSVal <$> (js_getPathname (self))))

foreign import javascript safe "(($1, $2) => { $1[\"search\"] = $2; })"
        js_setSearch :: URLPatternResult -> URLPatternComponentResult -> IO ()
-- | <https://urlpattern.spec.whatwg.org/#dom-urlpatternresult-search URLPatternResult.search specification>
setSearch :: (MonadDOM m) => URLPatternResult -> URLPatternComponentResult -> m ()
setSearch self val = liftDOM (void ((js_setSearch (self) (val))))

foreign import javascript unsafe "(($1) => { return $1[\"search\"]; })"
        js_getSearch :: URLPatternResult -> IO JSVal
-- | <https://urlpattern.spec.whatwg.org/#dom-urlpatternresult-search URLPatternResult.search specification>
getSearch :: (MonadDOM m) => URLPatternResult -> m (Maybe URLPatternComponentResult)
getSearch self = liftDOM (((js_getSearch (self)) >>= fromJSValUnchecked))

-- | <https://urlpattern.spec.whatwg.org/#dom-urlpatternresult-search URLPatternResult.search specification>
getSearchUnsafe :: (MonadDOM m, HasCallStack) => URLPatternResult -> m URLPatternComponentResult
getSearchUnsafe self = liftDOM ((((js_getSearch (self)) >>= fromJSValUnchecked) >>= P.maybe (P.error "Nothing to return") P.return))

-- | <https://urlpattern.spec.whatwg.org/#dom-urlpatternresult-search URLPatternResult.search specification>
getSearchUnchecked :: (MonadDOM m) => URLPatternResult -> m URLPatternComponentResult
getSearchUnchecked self = liftDOM ((pFromJSVal <$> (js_getSearch (self))))

foreign import javascript safe "(($1, $2) => { $1[\"hash\"] = $2; })"
        js_setHash :: URLPatternResult -> URLPatternComponentResult -> IO ()
-- | <https://urlpattern.spec.whatwg.org/#dom-urlpatternresult-hash URLPatternResult.hash specification>
setHash :: (MonadDOM m) => URLPatternResult -> URLPatternComponentResult -> m ()
setHash self val = liftDOM (void ((js_setHash (self) (val))))

foreign import javascript unsafe "(($1) => { return $1[\"hash\"]; })"
        js_getHash :: URLPatternResult -> IO JSVal
-- | <https://urlpattern.spec.whatwg.org/#dom-urlpatternresult-hash URLPatternResult.hash specification>
getHash :: (MonadDOM m) => URLPatternResult -> m (Maybe URLPatternComponentResult)
getHash self = liftDOM (((js_getHash (self)) >>= fromJSValUnchecked))

-- | <https://urlpattern.spec.whatwg.org/#dom-urlpatternresult-hash URLPatternResult.hash specification>
getHashUnsafe :: (MonadDOM m, HasCallStack) => URLPatternResult -> m URLPatternComponentResult
getHashUnsafe self = liftDOM ((((js_getHash (self)) >>= fromJSValUnchecked) >>= P.maybe (P.error "Nothing to return") P.return))

-- | <https://urlpattern.spec.whatwg.org/#dom-urlpatternresult-hash URLPatternResult.hash specification>
getHashUnchecked :: (MonadDOM m) => URLPatternResult -> m URLPatternComponentResult
getHashUnchecked self = liftDOM ((pFromJSVal <$> (js_getHash (self))))