HTMLScriptElement.hs

{-# LANGUAGE PatternSynonyms #-}
{-# LANGUAGE ImplicitParams, ConstraintKinds, KindSignatures #-}
{-# OPTIONS_GHC -fno-warn-unused-imports #-}
-- | Generated by dom-gen from html (webref). Do not edit.
module JSDOM.Generated.HTMLScriptElement
       (supports, supports_, setType, getType, setSrc, getSrc, setNoModule, getNoModule, setAsync, getAsync, setDefer, getDefer, getBlocking, setCrossOrigin, getCrossOrigin, getCrossOriginUnsafe, getCrossOriginUnchecked, setReferrerPolicy, getReferrerPolicy, setIntegrity, getIntegrity, setFetchPriority, getFetchPriority, setInnerText, getInnerText, setTextContent, getTextContent, getTextContentUnsafe, getTextContentUnchecked, setText, getText, setCharset, getCharset, setEvent, getEvent, setHtmlFor, getHtmlFor, HTMLScriptElement(..), gTypeHTMLScriptElement)
       where
import Prelude ((.), (==), (>>=), (<$>), (++), Bool(..), Maybe(..), IO, Int, Word, Double, Float)
import qualified Prelude as P
import Control.Monad (void)
import Control.Lens.Operators ((^.))
import Language.Javascript.JSaddle (JSM, JSVal, JSString, toJSVal, valToBool, valToNumber, js, jss, jsf, jsg, new, function, asyncFunction, jsUndefined, jsNull)
import JSDOM.Types
import qualified JSDOM.Types as Types
import JSDOM.EventTargetClosures (EventName, unsafeEventName, unsafeEventNameAsync)
import JSDOM.Generated.Enums

-- | <https://developer.mozilla.org/docs/Web/API/HTMLScriptElement/supports_static MDN HTMLScriptElement.supports documentation>
supports :: (MonadDOM m, ToJSString type') => type' -> m Bool
supports type' = liftDOM ((((jsg "HTMLScriptElement") ^. jsf "supports" [toJSVal type']) >>= valToBool))

-- | <https://developer.mozilla.org/docs/Web/API/HTMLScriptElement/supports_static MDN HTMLScriptElement.supports documentation>
supports_ :: (MonadDOM m, ToJSString type') => type' -> m ()
supports_ type' = liftDOM (void ((jsg "HTMLScriptElement") ^. jsf "supports" [toJSVal type']))

-- | <https://developer.mozilla.org/docs/Web/API/HTMLScriptElement/type MDN HTMLScriptElement.type documentation>
setType :: (MonadDOM m, ToJSString val) => HTMLScriptElement -> val -> m ()
setType self val = liftDOM (void (self ^. jss "type" (toJSVal val)))

-- | <https://developer.mozilla.org/docs/Web/API/HTMLScriptElement/type MDN HTMLScriptElement.type documentation>
getType :: (MonadDOM m, FromJSString result) => HTMLScriptElement -> m result
getType self = liftDOM (((self ^. js "type") >>= fromJSValUnchecked))

-- | <https://developer.mozilla.org/docs/Web/API/HTMLScriptElement/src MDN HTMLScriptElement.src documentation>
setSrc :: (MonadDOM m, IsTrustedScriptURLOrString val) => HTMLScriptElement -> val -> m ()
setSrc self val = liftDOM (void (self ^. jss "src" (toJSVal val)))

-- | <https://developer.mozilla.org/docs/Web/API/HTMLScriptElement/src MDN HTMLScriptElement.src documentation>
getSrc :: (MonadDOM m) => HTMLScriptElement -> m TrustedScriptURLOrString
getSrc self = liftDOM (((self ^. js "src") >>= fromJSValUnchecked))

-- | <https://developer.mozilla.org/docs/Web/API/HTMLScriptElement/noModule MDN HTMLScriptElement.noModule documentation>
setNoModule :: (MonadDOM m) => HTMLScriptElement -> Bool -> m ()
setNoModule self val = liftDOM (void (self ^. jss "noModule" (toJSVal val)))

-- | <https://developer.mozilla.org/docs/Web/API/HTMLScriptElement/noModule MDN HTMLScriptElement.noModule documentation>
getNoModule :: (MonadDOM m) => HTMLScriptElement -> m Bool
getNoModule self = liftDOM (((self ^. js "noModule") >>= valToBool))

-- | <https://developer.mozilla.org/docs/Web/API/HTMLScriptElement/async MDN HTMLScriptElement.async documentation>
setAsync :: (MonadDOM m) => HTMLScriptElement -> Bool -> m ()
setAsync self val = liftDOM (void (self ^. jss "async" (toJSVal val)))

-- | <https://developer.mozilla.org/docs/Web/API/HTMLScriptElement/async MDN HTMLScriptElement.async documentation>
getAsync :: (MonadDOM m) => HTMLScriptElement -> m Bool
getAsync self = liftDOM (((self ^. js "async") >>= valToBool))

-- | <https://developer.mozilla.org/docs/Web/API/HTMLScriptElement/defer MDN HTMLScriptElement.defer documentation>
setDefer :: (MonadDOM m) => HTMLScriptElement -> Bool -> m ()
setDefer self val = liftDOM (void (self ^. jss "defer" (toJSVal val)))

-- | <https://developer.mozilla.org/docs/Web/API/HTMLScriptElement/defer MDN HTMLScriptElement.defer documentation>
getDefer :: (MonadDOM m) => HTMLScriptElement -> m Bool
getDefer self = liftDOM (((self ^. js "defer") >>= valToBool))

-- | <https://developer.mozilla.org/docs/Web/API/HTMLScriptElement/blocking MDN HTMLScriptElement.blocking documentation>
getBlocking :: (MonadDOM m) => HTMLScriptElement -> m DOMTokenList
getBlocking self = liftDOM (((self ^. js "blocking") >>= fromJSValUnchecked))

-- | <https://developer.mozilla.org/docs/Web/API/HTMLScriptElement/crossOrigin MDN HTMLScriptElement.crossOrigin documentation>
setCrossOrigin :: (MonadDOM m, ToJSString val) => HTMLScriptElement -> Maybe val -> m ()
setCrossOrigin self val = liftDOM (void (self ^. jss "crossOrigin" (toJSVal val)))

-- | <https://developer.mozilla.org/docs/Web/API/HTMLScriptElement/crossOrigin MDN HTMLScriptElement.crossOrigin documentation>
getCrossOrigin :: (MonadDOM m, FromJSString result) => HTMLScriptElement -> m (Maybe result)
getCrossOrigin self = liftDOM (((self ^. js "crossOrigin") >>= fromMaybeJSString))

-- | <https://developer.mozilla.org/docs/Web/API/HTMLScriptElement/crossOrigin MDN HTMLScriptElement.crossOrigin documentation>
getCrossOriginUnsafe :: (MonadDOM m, HasCallStack, FromJSString result) => HTMLScriptElement -> m result
getCrossOriginUnsafe self = liftDOM ((((self ^. js "crossOrigin") >>= fromMaybeJSString) >>= P.maybe (P.error "Nothing to return") P.return))

-- | <https://developer.mozilla.org/docs/Web/API/HTMLScriptElement/crossOrigin MDN HTMLScriptElement.crossOrigin documentation>
getCrossOriginUnchecked :: (MonadDOM m, FromJSString result) => HTMLScriptElement -> m result
getCrossOriginUnchecked self = liftDOM (((self ^. js "crossOrigin") >>= fromJSValUnchecked))

-- | <https://developer.mozilla.org/docs/Web/API/HTMLScriptElement/referrerPolicy MDN HTMLScriptElement.referrerPolicy documentation>
setReferrerPolicy :: (MonadDOM m, ToJSString val) => HTMLScriptElement -> val -> m ()
setReferrerPolicy self val = liftDOM (void (self ^. jss "referrerPolicy" (toJSVal val)))

-- | <https://developer.mozilla.org/docs/Web/API/HTMLScriptElement/referrerPolicy MDN HTMLScriptElement.referrerPolicy documentation>
getReferrerPolicy :: (MonadDOM m, FromJSString result) => HTMLScriptElement -> m result
getReferrerPolicy self = liftDOM (((self ^. js "referrerPolicy") >>= fromJSValUnchecked))

-- | <https://developer.mozilla.org/docs/Web/API/HTMLScriptElement/integrity MDN HTMLScriptElement.integrity documentation>
setIntegrity :: (MonadDOM m, ToJSString val) => HTMLScriptElement -> val -> m ()
setIntegrity self val = liftDOM (void (self ^. jss "integrity" (toJSVal val)))

-- | <https://developer.mozilla.org/docs/Web/API/HTMLScriptElement/integrity MDN HTMLScriptElement.integrity documentation>
getIntegrity :: (MonadDOM m, FromJSString result) => HTMLScriptElement -> m result
getIntegrity self = liftDOM (((self ^. js "integrity") >>= fromJSValUnchecked))

-- | <https://developer.mozilla.org/docs/Web/API/HTMLScriptElement/fetchPriority MDN HTMLScriptElement.fetchPriority documentation>
setFetchPriority :: (MonadDOM m, ToJSString val) => HTMLScriptElement -> val -> m ()
setFetchPriority self val = liftDOM (void (self ^. jss "fetchPriority" (toJSVal val)))

-- | <https://developer.mozilla.org/docs/Web/API/HTMLScriptElement/fetchPriority MDN HTMLScriptElement.fetchPriority documentation>
getFetchPriority :: (MonadDOM m, FromJSString result) => HTMLScriptElement -> m result
getFetchPriority self = liftDOM (((self ^. js "fetchPriority") >>= fromJSValUnchecked))

-- | <https://developer.mozilla.org/docs/Web/API/HTMLScriptElement/innerText MDN HTMLScriptElement.innerText documentation>
setInnerText :: (MonadDOM m, IsTrustedScriptOrString val) => HTMLScriptElement -> val -> m ()
setInnerText self val = liftDOM (void (self ^. jss "innerText" (toJSVal val)))

-- | <https://developer.mozilla.org/docs/Web/API/HTMLScriptElement/innerText MDN HTMLScriptElement.innerText documentation>
getInnerText :: (MonadDOM m) => HTMLScriptElement -> m TrustedScriptOrString
getInnerText self = liftDOM (((self ^. js "innerText") >>= fromJSValUnchecked))

-- | <https://developer.mozilla.org/docs/Web/API/HTMLScriptElement/textContent MDN HTMLScriptElement.textContent documentation>
setTextContent :: (MonadDOM m, IsTrustedScriptOrString val) => HTMLScriptElement -> Maybe val -> m ()
setTextContent self val = liftDOM (void (self ^. jss "textContent" (toJSVal val)))

-- | <https://developer.mozilla.org/docs/Web/API/HTMLScriptElement/textContent MDN HTMLScriptElement.textContent documentation>
getTextContent :: (MonadDOM m) => HTMLScriptElement -> m (Maybe TrustedScriptOrString)
getTextContent self = liftDOM (((self ^. js "textContent") >>= fromJSValUnchecked))

-- | <https://developer.mozilla.org/docs/Web/API/HTMLScriptElement/textContent MDN HTMLScriptElement.textContent documentation>
getTextContentUnsafe :: (MonadDOM m, HasCallStack) => HTMLScriptElement -> m TrustedScriptOrString
getTextContentUnsafe self = liftDOM ((((self ^. js "textContent") >>= fromJSValUnchecked) >>= P.maybe (P.error "Nothing to return") P.return))

-- | <https://developer.mozilla.org/docs/Web/API/HTMLScriptElement/textContent MDN HTMLScriptElement.textContent documentation>
getTextContentUnchecked :: (MonadDOM m) => HTMLScriptElement -> m TrustedScriptOrString
getTextContentUnchecked self = liftDOM (((self ^. js "textContent") >>= fromJSValUnchecked))

-- | <https://developer.mozilla.org/docs/Web/API/HTMLScriptElement/text MDN HTMLScriptElement.text documentation>
setText :: (MonadDOM m, IsTrustedScriptOrString val) => HTMLScriptElement -> val -> m ()
setText self val = liftDOM (void (self ^. jss "text" (toJSVal val)))

-- | <https://developer.mozilla.org/docs/Web/API/HTMLScriptElement/text MDN HTMLScriptElement.text documentation>
getText :: (MonadDOM m) => HTMLScriptElement -> m TrustedScriptOrString
getText self = liftDOM (((self ^. js "text") >>= fromJSValUnchecked))

-- | <https://html.spec.whatwg.org/multipage/obsolete.html#dom-script-charset HTMLScriptElement.charset specification>
setCharset :: (MonadDOM m, ToJSString val) => HTMLScriptElement -> val -> m ()
setCharset self val = liftDOM (void (self ^. jss "charset" (toJSVal val)))

-- | <https://html.spec.whatwg.org/multipage/obsolete.html#dom-script-charset HTMLScriptElement.charset specification>
getCharset :: (MonadDOM m, FromJSString result) => HTMLScriptElement -> m result
getCharset self = liftDOM (((self ^. js "charset") >>= fromJSValUnchecked))

-- | <https://html.spec.whatwg.org/multipage/obsolete.html#dom-script-event HTMLScriptElement.event specification>
setEvent :: (MonadDOM m, ToJSString val) => HTMLScriptElement -> val -> m ()
setEvent self val = liftDOM (void (self ^. jss "event" (toJSVal val)))

-- | <https://html.spec.whatwg.org/multipage/obsolete.html#dom-script-event HTMLScriptElement.event specification>
getEvent :: (MonadDOM m, FromJSString result) => HTMLScriptElement -> m result
getEvent self = liftDOM (((self ^. js "event") >>= fromJSValUnchecked))

-- | <https://html.spec.whatwg.org/multipage/obsolete.html#dom-script-htmlfor HTMLScriptElement.htmlFor specification>
setHtmlFor :: (MonadDOM m, ToJSString val) => HTMLScriptElement -> val -> m ()
setHtmlFor self val = liftDOM (void (self ^. jss "htmlFor" (toJSVal val)))

-- | <https://html.spec.whatwg.org/multipage/obsolete.html#dom-script-htmlfor HTMLScriptElement.htmlFor specification>
getHtmlFor :: (MonadDOM m, FromJSString result) => HTMLScriptElement -> m result
getHtmlFor self = liftDOM (((self ^. js "htmlFor") >>= fromJSValUnchecked))