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

{-# LANGUAGE PatternSynonyms #-}
{-# LANGUAGE ForeignFunctionInterface, JavaScriptFFI #-}
{-# LANGUAGE ImplicitParams, ConstraintKinds, KindSignatures #-}
{-# OPTIONS_GHC -fno-warn-unused-imports #-}
-- | Generated by dom-gen from html (webref). Do not edit.
module GHCJS.DOM.JSFFI.Generated.HTMLObjectElement
       (js_checkValidity, js_getSVGDocument, js_reportValidity, js_setCustomValidity, js_setData, js_getData, js_setType, js_getType, js_setName, js_getName, js_getForm, js_setWidth, js_getWidth, js_setHeight, js_getHeight, js_getContentDocument, js_getContentWindow, js_getWillValidate, js_getValidity, js_getValidationMessage, js_setAlign, js_getAlign, js_setArchive, js_getArchive, js_setCode, js_getCode, js_setDeclare, js_getDeclare, js_setHspace, js_getHspace, js_setStandby, js_getStandby, js_setVspace, js_getVspace, js_setCodeBase, js_getCodeBase, js_setCodeType, js_getCodeType, js_setUseMap, js_getUseMap, js_setBorder, js_getBorder, checkValidity, checkValidity_, getSVGDocument, getSVGDocument_, getSVGDocumentUnsafe, getSVGDocumentUnchecked, reportValidity, reportValidity_, setCustomValidity, setData, getData, setType, getType, setName, getName, getForm, getFormUnsafe, getFormUnchecked, setWidth, getWidth, setHeight, getHeight, getContentDocument, getContentDocumentUnsafe, getContentDocumentUnchecked, getContentWindow, getContentWindowUnsafe, getContentWindowUnchecked, getWillValidate, getValidity, getValidationMessage, setAlign, getAlign, setArchive, getArchive, setCode, getCode, setDeclare, getDeclare, setHspace, getHspace, setStandby, getStandby, setVspace, getVspace, setCodeBase, getCodeBase, setCodeType, getCodeType, setUseMap, getUseMap, setBorder, getBorder, HTMLObjectElement(..), gTypeHTMLObjectElement)
       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 "(($1) => { return $1[\"checkValidity\"](); })"
        js_checkValidity :: HTMLObjectElement -> IO Bool
-- | <https://developer.mozilla.org/docs/Web/API/HTMLObjectElement/checkValidity MDN HTMLObjectElement.checkValidity documentation>
checkValidity :: (MonadDOM m) => HTMLObjectElement -> m Bool
checkValidity self = liftDOM ((js_checkValidity (self)))

-- | <https://developer.mozilla.org/docs/Web/API/HTMLObjectElement/checkValidity MDN HTMLObjectElement.checkValidity documentation>
checkValidity_ :: (MonadDOM m) => HTMLObjectElement -> m ()
checkValidity_ self = liftDOM (void ((js_checkValidity (self))))

foreign import javascript safe "(($1) => { return $1[\"getSVGDocument\"](); })"
        js_getSVGDocument :: HTMLObjectElement -> IO JSVal
-- | <https://developer.mozilla.org/docs/Web/API/HTMLObjectElement/getSVGDocument MDN HTMLObjectElement.getSVGDocument documentation>
getSVGDocument :: (MonadDOM m) => HTMLObjectElement -> m (Maybe Document)
getSVGDocument self = liftDOM (((js_getSVGDocument (self)) >>= fromJSValUnchecked))

-- | <https://developer.mozilla.org/docs/Web/API/HTMLObjectElement/getSVGDocument MDN HTMLObjectElement.getSVGDocument documentation>
getSVGDocument_ :: (MonadDOM m) => HTMLObjectElement -> m ()
getSVGDocument_ self = liftDOM (void ((js_getSVGDocument (self))))

-- | <https://developer.mozilla.org/docs/Web/API/HTMLObjectElement/getSVGDocument MDN HTMLObjectElement.getSVGDocument documentation>
getSVGDocumentUnsafe :: (MonadDOM m, HasCallStack) => HTMLObjectElement -> m Document
getSVGDocumentUnsafe self = liftDOM ((((js_getSVGDocument (self)) >>= fromJSValUnchecked) >>= P.maybe (P.error "Nothing to return") P.return))

-- | <https://developer.mozilla.org/docs/Web/API/HTMLObjectElement/getSVGDocument MDN HTMLObjectElement.getSVGDocument documentation>
getSVGDocumentUnchecked :: (MonadDOM m) => HTMLObjectElement -> m Document
getSVGDocumentUnchecked self = liftDOM ((pFromJSVal <$> (js_getSVGDocument (self))))

foreign import javascript safe "(($1) => { return $1[\"reportValidity\"](); })"
        js_reportValidity :: HTMLObjectElement -> IO Bool
-- | <https://developer.mozilla.org/docs/Web/API/HTMLObjectElement/reportValidity MDN HTMLObjectElement.reportValidity documentation>
reportValidity :: (MonadDOM m) => HTMLObjectElement -> m Bool
reportValidity self = liftDOM ((js_reportValidity (self)))

-- | <https://developer.mozilla.org/docs/Web/API/HTMLObjectElement/reportValidity MDN HTMLObjectElement.reportValidity documentation>
reportValidity_ :: (MonadDOM m) => HTMLObjectElement -> m ()
reportValidity_ self = liftDOM (void ((js_reportValidity (self))))

foreign import javascript safe "(($1, $2) => { return $1[\"setCustomValidity\"]($2); })"
        js_setCustomValidity :: HTMLObjectElement -> JSString -> IO ()
-- | <https://developer.mozilla.org/docs/Web/API/HTMLObjectElement/setCustomValidity MDN HTMLObjectElement.setCustomValidity documentation>
setCustomValidity :: (MonadDOM m, ToJSString error) => HTMLObjectElement -> error -> m ()
setCustomValidity self error = liftDOM (void ((js_setCustomValidity (self) (toJSString error))))

foreign import javascript safe "(($1, $2) => { $1[\"data\"] = $2; })"
        js_setData :: HTMLObjectElement -> JSString -> IO ()
-- | <https://developer.mozilla.org/docs/Web/API/HTMLObjectElement/data MDN HTMLObjectElement.data documentation>
setData :: (MonadDOM m, ToJSString val) => HTMLObjectElement -> val -> m ()
setData self val = liftDOM (void ((js_setData (self) (toJSString val))))

foreign import javascript unsafe "(($1) => { return $1[\"data\"]; })"
        js_getData :: HTMLObjectElement -> IO JSString
-- | <https://developer.mozilla.org/docs/Web/API/HTMLObjectElement/data MDN HTMLObjectElement.data documentation>
getData :: (MonadDOM m, FromJSString result) => HTMLObjectElement -> m result
getData self = liftDOM ((fromJSString <$> (js_getData (self))))

foreign import javascript safe "(($1, $2) => { $1[\"type\"] = $2; })"
        js_setType :: HTMLObjectElement -> JSString -> IO ()
-- | <https://developer.mozilla.org/docs/Web/API/HTMLObjectElement/type MDN HTMLObjectElement.type documentation>
setType :: (MonadDOM m, ToJSString val) => HTMLObjectElement -> val -> m ()
setType self val = liftDOM (void ((js_setType (self) (toJSString val))))

foreign import javascript unsafe "(($1) => { return $1[\"type\"]; })"
        js_getType :: HTMLObjectElement -> IO JSString
-- | <https://developer.mozilla.org/docs/Web/API/HTMLObjectElement/type MDN HTMLObjectElement.type documentation>
getType :: (MonadDOM m, FromJSString result) => HTMLObjectElement -> m result
getType self = liftDOM ((fromJSString <$> (js_getType (self))))

foreign import javascript safe "(($1, $2) => { $1[\"name\"] = $2; })"
        js_setName :: HTMLObjectElement -> JSString -> IO ()
-- | <https://developer.mozilla.org/docs/Web/API/HTMLObjectElement/name MDN HTMLObjectElement.name documentation>
setName :: (MonadDOM m, ToJSString val) => HTMLObjectElement -> val -> m ()
setName self val = liftDOM (void ((js_setName (self) (toJSString val))))

foreign import javascript unsafe "(($1) => { return $1[\"name\"]; })"
        js_getName :: HTMLObjectElement -> IO JSString
-- | <https://developer.mozilla.org/docs/Web/API/HTMLObjectElement/name MDN HTMLObjectElement.name documentation>
getName :: (MonadDOM m, FromJSString result) => HTMLObjectElement -> m result
getName self = liftDOM ((fromJSString <$> (js_getName (self))))

foreign import javascript unsafe "(($1) => { return $1[\"form\"]; })"
        js_getForm :: HTMLObjectElement -> IO JSVal
-- | <https://developer.mozilla.org/docs/Web/API/HTMLObjectElement/form MDN HTMLObjectElement.form documentation>
getForm :: (MonadDOM m) => HTMLObjectElement -> m (Maybe HTMLFormElement)
getForm self = liftDOM (((js_getForm (self)) >>= fromJSValUnchecked))

-- | <https://developer.mozilla.org/docs/Web/API/HTMLObjectElement/form MDN HTMLObjectElement.form documentation>
getFormUnsafe :: (MonadDOM m, HasCallStack) => HTMLObjectElement -> m HTMLFormElement
getFormUnsafe self = liftDOM ((((js_getForm (self)) >>= fromJSValUnchecked) >>= P.maybe (P.error "Nothing to return") P.return))

-- | <https://developer.mozilla.org/docs/Web/API/HTMLObjectElement/form MDN HTMLObjectElement.form documentation>
getFormUnchecked :: (MonadDOM m) => HTMLObjectElement -> m HTMLFormElement
getFormUnchecked self = liftDOM ((pFromJSVal <$> (js_getForm (self))))

foreign import javascript safe "(($1, $2) => { $1[\"width\"] = $2; })"
        js_setWidth :: HTMLObjectElement -> JSString -> IO ()
-- | <https://developer.mozilla.org/docs/Web/API/HTMLObjectElement/width MDN HTMLObjectElement.width documentation>
setWidth :: (MonadDOM m, ToJSString val) => HTMLObjectElement -> val -> m ()
setWidth self val = liftDOM (void ((js_setWidth (self) (toJSString val))))

foreign import javascript unsafe "(($1) => { return $1[\"width\"]; })"
        js_getWidth :: HTMLObjectElement -> IO JSString
-- | <https://developer.mozilla.org/docs/Web/API/HTMLObjectElement/width MDN HTMLObjectElement.width documentation>
getWidth :: (MonadDOM m, FromJSString result) => HTMLObjectElement -> m result
getWidth self = liftDOM ((fromJSString <$> (js_getWidth (self))))

foreign import javascript safe "(($1, $2) => { $1[\"height\"] = $2; })"
        js_setHeight :: HTMLObjectElement -> JSString -> IO ()
-- | <https://developer.mozilla.org/docs/Web/API/HTMLObjectElement/height MDN HTMLObjectElement.height documentation>
setHeight :: (MonadDOM m, ToJSString val) => HTMLObjectElement -> val -> m ()
setHeight self val = liftDOM (void ((js_setHeight (self) (toJSString val))))

foreign import javascript unsafe "(($1) => { return $1[\"height\"]; })"
        js_getHeight :: HTMLObjectElement -> IO JSString
-- | <https://developer.mozilla.org/docs/Web/API/HTMLObjectElement/height MDN HTMLObjectElement.height documentation>
getHeight :: (MonadDOM m, FromJSString result) => HTMLObjectElement -> m result
getHeight self = liftDOM ((fromJSString <$> (js_getHeight (self))))

foreign import javascript unsafe "(($1) => { return $1[\"contentDocument\"]; })"
        js_getContentDocument :: HTMLObjectElement -> IO JSVal
-- | <https://developer.mozilla.org/docs/Web/API/HTMLObjectElement/contentDocument MDN HTMLObjectElement.contentDocument documentation>
getContentDocument :: (MonadDOM m) => HTMLObjectElement -> m (Maybe Document)
getContentDocument self = liftDOM (((js_getContentDocument (self)) >>= fromJSValUnchecked))

-- | <https://developer.mozilla.org/docs/Web/API/HTMLObjectElement/contentDocument MDN HTMLObjectElement.contentDocument documentation>
getContentDocumentUnsafe :: (MonadDOM m, HasCallStack) => HTMLObjectElement -> m Document
getContentDocumentUnsafe self = liftDOM ((((js_getContentDocument (self)) >>= fromJSValUnchecked) >>= P.maybe (P.error "Nothing to return") P.return))

-- | <https://developer.mozilla.org/docs/Web/API/HTMLObjectElement/contentDocument MDN HTMLObjectElement.contentDocument documentation>
getContentDocumentUnchecked :: (MonadDOM m) => HTMLObjectElement -> m Document
getContentDocumentUnchecked self = liftDOM ((pFromJSVal <$> (js_getContentDocument (self))))

foreign import javascript unsafe "(($1) => { return $1[\"contentWindow\"]; })"
        js_getContentWindow :: HTMLObjectElement -> IO JSVal
-- | <https://developer.mozilla.org/docs/Web/API/HTMLObjectElement/contentWindow MDN HTMLObjectElement.contentWindow documentation>
getContentWindow :: (MonadDOM m) => HTMLObjectElement -> m (Maybe Window)
getContentWindow self = liftDOM (((js_getContentWindow (self)) >>= fromJSValUnchecked))

-- | <https://developer.mozilla.org/docs/Web/API/HTMLObjectElement/contentWindow MDN HTMLObjectElement.contentWindow documentation>
getContentWindowUnsafe :: (MonadDOM m, HasCallStack) => HTMLObjectElement -> m Window
getContentWindowUnsafe self = liftDOM ((((js_getContentWindow (self)) >>= fromJSValUnchecked) >>= P.maybe (P.error "Nothing to return") P.return))

-- | <https://developer.mozilla.org/docs/Web/API/HTMLObjectElement/contentWindow MDN HTMLObjectElement.contentWindow documentation>
getContentWindowUnchecked :: (MonadDOM m) => HTMLObjectElement -> m Window
getContentWindowUnchecked self = liftDOM ((pFromJSVal <$> (js_getContentWindow (self))))

foreign import javascript unsafe "(($1) => { return $1[\"willValidate\"]; })"
        js_getWillValidate :: HTMLObjectElement -> IO Bool
-- | <https://developer.mozilla.org/docs/Web/API/HTMLObjectElement/willValidate MDN HTMLObjectElement.willValidate documentation>
getWillValidate :: (MonadDOM m) => HTMLObjectElement -> m Bool
getWillValidate self = liftDOM ((js_getWillValidate (self)))

foreign import javascript unsafe "(($1) => { return $1[\"validity\"]; })"
        js_getValidity :: HTMLObjectElement -> IO ValidityState
-- | <https://developer.mozilla.org/docs/Web/API/HTMLObjectElement/validity MDN HTMLObjectElement.validity documentation>
getValidity :: (MonadDOM m) => HTMLObjectElement -> m ValidityState
getValidity self = liftDOM ((js_getValidity (self)))

foreign import javascript unsafe "(($1) => { return $1[\"validationMessage\"]; })"
        js_getValidationMessage :: HTMLObjectElement -> IO JSString
-- | <https://developer.mozilla.org/docs/Web/API/HTMLObjectElement/validationMessage MDN HTMLObjectElement.validationMessage documentation>
getValidationMessage :: (MonadDOM m, FromJSString result) => HTMLObjectElement -> m result
getValidationMessage self = liftDOM ((fromJSString <$> (js_getValidationMessage (self))))

foreign import javascript safe "(($1, $2) => { $1[\"align\"] = $2; })"
        js_setAlign :: HTMLObjectElement -> JSString -> IO ()
-- | <https://html.spec.whatwg.org/multipage/obsolete.html#dom-object-align HTMLObjectElement.align specification>
setAlign :: (MonadDOM m, ToJSString val) => HTMLObjectElement -> val -> m ()
setAlign self val = liftDOM (void ((js_setAlign (self) (toJSString val))))

foreign import javascript unsafe "(($1) => { return $1[\"align\"]; })"
        js_getAlign :: HTMLObjectElement -> IO JSString
-- | <https://html.spec.whatwg.org/multipage/obsolete.html#dom-object-align HTMLObjectElement.align specification>
getAlign :: (MonadDOM m, FromJSString result) => HTMLObjectElement -> m result
getAlign self = liftDOM ((fromJSString <$> (js_getAlign (self))))

foreign import javascript safe "(($1, $2) => { $1[\"archive\"] = $2; })"
        js_setArchive :: HTMLObjectElement -> JSString -> IO ()
-- | <https://html.spec.whatwg.org/multipage/obsolete.html#dom-object-archive HTMLObjectElement.archive specification>
setArchive :: (MonadDOM m, ToJSString val) => HTMLObjectElement -> val -> m ()
setArchive self val = liftDOM (void ((js_setArchive (self) (toJSString val))))

foreign import javascript unsafe "(($1) => { return $1[\"archive\"]; })"
        js_getArchive :: HTMLObjectElement -> IO JSString
-- | <https://html.spec.whatwg.org/multipage/obsolete.html#dom-object-archive HTMLObjectElement.archive specification>
getArchive :: (MonadDOM m, FromJSString result) => HTMLObjectElement -> m result
getArchive self = liftDOM ((fromJSString <$> (js_getArchive (self))))

foreign import javascript safe "(($1, $2) => { $1[\"code\"] = $2; })"
        js_setCode :: HTMLObjectElement -> JSString -> IO ()
-- | <https://html.spec.whatwg.org/multipage/obsolete.html#dom-object-code HTMLObjectElement.code specification>
setCode :: (MonadDOM m, ToJSString val) => HTMLObjectElement -> val -> m ()
setCode self val = liftDOM (void ((js_setCode (self) (toJSString val))))

foreign import javascript unsafe "(($1) => { return $1[\"code\"]; })"
        js_getCode :: HTMLObjectElement -> IO JSString
-- | <https://html.spec.whatwg.org/multipage/obsolete.html#dom-object-code HTMLObjectElement.code specification>
getCode :: (MonadDOM m, FromJSString result) => HTMLObjectElement -> m result
getCode self = liftDOM ((fromJSString <$> (js_getCode (self))))

foreign import javascript safe "(($1, $2) => { $1[\"declare\"] = $2; })"
        js_setDeclare :: HTMLObjectElement -> Bool -> IO ()
-- | <https://html.spec.whatwg.org/multipage/obsolete.html#dom-object-declare HTMLObjectElement.declare specification>
setDeclare :: (MonadDOM m) => HTMLObjectElement -> Bool -> m ()
setDeclare self val = liftDOM (void ((js_setDeclare (self) (val))))

foreign import javascript unsafe "(($1) => { return $1[\"declare\"]; })"
        js_getDeclare :: HTMLObjectElement -> IO Bool
-- | <https://html.spec.whatwg.org/multipage/obsolete.html#dom-object-declare HTMLObjectElement.declare specification>
getDeclare :: (MonadDOM m) => HTMLObjectElement -> m Bool
getDeclare self = liftDOM ((js_getDeclare (self)))

foreign import javascript safe "(($1, $2) => { $1[\"hspace\"] = $2; })"
        js_setHspace :: HTMLObjectElement -> Word -> IO ()
-- | <https://html.spec.whatwg.org/multipage/obsolete.html#dom-object-hspace HTMLObjectElement.hspace specification>
setHspace :: (MonadDOM m) => HTMLObjectElement -> Word -> m ()
setHspace self val = liftDOM (void ((js_setHspace (self) (val))))

foreign import javascript unsafe "(($1) => { return $1[\"hspace\"]; })"
        js_getHspace :: HTMLObjectElement -> IO Word
-- | <https://html.spec.whatwg.org/multipage/obsolete.html#dom-object-hspace HTMLObjectElement.hspace specification>
getHspace :: (MonadDOM m) => HTMLObjectElement -> m Word
getHspace self = liftDOM ((js_getHspace (self)))

foreign import javascript safe "(($1, $2) => { $1[\"standby\"] = $2; })"
        js_setStandby :: HTMLObjectElement -> JSString -> IO ()
-- | <https://html.spec.whatwg.org/multipage/obsolete.html#dom-object-standby HTMLObjectElement.standby specification>
setStandby :: (MonadDOM m, ToJSString val) => HTMLObjectElement -> val -> m ()
setStandby self val = liftDOM (void ((js_setStandby (self) (toJSString val))))

foreign import javascript unsafe "(($1) => { return $1[\"standby\"]; })"
        js_getStandby :: HTMLObjectElement -> IO JSString
-- | <https://html.spec.whatwg.org/multipage/obsolete.html#dom-object-standby HTMLObjectElement.standby specification>
getStandby :: (MonadDOM m, FromJSString result) => HTMLObjectElement -> m result
getStandby self = liftDOM ((fromJSString <$> (js_getStandby (self))))

foreign import javascript safe "(($1, $2) => { $1[\"vspace\"] = $2; })"
        js_setVspace :: HTMLObjectElement -> Word -> IO ()
-- | <https://html.spec.whatwg.org/multipage/obsolete.html#dom-object-vspace HTMLObjectElement.vspace specification>
setVspace :: (MonadDOM m) => HTMLObjectElement -> Word -> m ()
setVspace self val = liftDOM (void ((js_setVspace (self) (val))))

foreign import javascript unsafe "(($1) => { return $1[\"vspace\"]; })"
        js_getVspace :: HTMLObjectElement -> IO Word
-- | <https://html.spec.whatwg.org/multipage/obsolete.html#dom-object-vspace HTMLObjectElement.vspace specification>
getVspace :: (MonadDOM m) => HTMLObjectElement -> m Word
getVspace self = liftDOM ((js_getVspace (self)))

foreign import javascript safe "(($1, $2) => { $1[\"codeBase\"] = $2; })"
        js_setCodeBase :: HTMLObjectElement -> JSString -> IO ()
-- | <https://html.spec.whatwg.org/multipage/obsolete.html#dom-object-codebase HTMLObjectElement.codeBase specification>
setCodeBase :: (MonadDOM m, ToJSString val) => HTMLObjectElement -> val -> m ()
setCodeBase self val = liftDOM (void ((js_setCodeBase (self) (toJSString val))))

foreign import javascript unsafe "(($1) => { return $1[\"codeBase\"]; })"
        js_getCodeBase :: HTMLObjectElement -> IO JSString
-- | <https://html.spec.whatwg.org/multipage/obsolete.html#dom-object-codebase HTMLObjectElement.codeBase specification>
getCodeBase :: (MonadDOM m, FromJSString result) => HTMLObjectElement -> m result
getCodeBase self = liftDOM ((fromJSString <$> (js_getCodeBase (self))))

foreign import javascript safe "(($1, $2) => { $1[\"codeType\"] = $2; })"
        js_setCodeType :: HTMLObjectElement -> JSString -> IO ()
-- | <https://html.spec.whatwg.org/multipage/obsolete.html#dom-object-codetype HTMLObjectElement.codeType specification>
setCodeType :: (MonadDOM m, ToJSString val) => HTMLObjectElement -> val -> m ()
setCodeType self val = liftDOM (void ((js_setCodeType (self) (toJSString val))))

foreign import javascript unsafe "(($1) => { return $1[\"codeType\"]; })"
        js_getCodeType :: HTMLObjectElement -> IO JSString
-- | <https://html.spec.whatwg.org/multipage/obsolete.html#dom-object-codetype HTMLObjectElement.codeType specification>
getCodeType :: (MonadDOM m, FromJSString result) => HTMLObjectElement -> m result
getCodeType self = liftDOM ((fromJSString <$> (js_getCodeType (self))))

foreign import javascript safe "(($1, $2) => { $1[\"useMap\"] = $2; })"
        js_setUseMap :: HTMLObjectElement -> JSString -> IO ()
-- | <https://developer.mozilla.org/docs/Web/API/HTMLObjectElement/useMap MDN HTMLObjectElement.useMap documentation>
setUseMap :: (MonadDOM m, ToJSString val) => HTMLObjectElement -> val -> m ()
setUseMap self val = liftDOM (void ((js_setUseMap (self) (toJSString val))))

foreign import javascript unsafe "(($1) => { return $1[\"useMap\"]; })"
        js_getUseMap :: HTMLObjectElement -> IO JSString
-- | <https://developer.mozilla.org/docs/Web/API/HTMLObjectElement/useMap MDN HTMLObjectElement.useMap documentation>
getUseMap :: (MonadDOM m, FromJSString result) => HTMLObjectElement -> m result
getUseMap self = liftDOM ((fromJSString <$> (js_getUseMap (self))))

foreign import javascript safe "(($1, $2) => { $1[\"border\"] = $2; })"
        js_setBorder :: HTMLObjectElement -> JSString -> IO ()
-- | <https://html.spec.whatwg.org/multipage/obsolete.html#dom-object-border HTMLObjectElement.border specification>
setBorder :: (MonadDOM m, ToJSString val) => HTMLObjectElement -> val -> m ()
setBorder self val = liftDOM (void ((js_setBorder (self) (toJSString val))))

foreign import javascript unsafe "(($1) => { return $1[\"border\"]; })"
        js_getBorder :: HTMLObjectElement -> IO JSString
-- | <https://html.spec.whatwg.org/multipage/obsolete.html#dom-object-border HTMLObjectElement.border specification>
getBorder :: (MonadDOM m, FromJSString result) => HTMLObjectElement -> m result
getBorder self = liftDOM ((fromJSString <$> (js_getBorder (self))))