{-# LANGUAGE CPP #-} #if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT) {-# LANGUAGE ForeignFunctionInterface, JavaScriptFFI #-} module GHCJS.DOM.HTMLObjectElement (ghcjs_dom_html_object_element_check_validity, htmlObjectElementCheckValidity, ghcjs_dom_html_object_element_set_custom_validity, htmlObjectElementSetCustomValidity, ghcjs_dom_html_object_element_get_form, htmlObjectElementGetForm, ghcjs_dom_html_object_element_set_code, htmlObjectElementSetCode, ghcjs_dom_html_object_element_get_code, htmlObjectElementGetCode, ghcjs_dom_html_object_element_set_align, htmlObjectElementSetAlign, ghcjs_dom_html_object_element_get_align, htmlObjectElementGetAlign, ghcjs_dom_html_object_element_set_archive, htmlObjectElementSetArchive, ghcjs_dom_html_object_element_get_archive, htmlObjectElementGetArchive, ghcjs_dom_html_object_element_set_border, htmlObjectElementSetBorder, ghcjs_dom_html_object_element_get_border, htmlObjectElementGetBorder, ghcjs_dom_html_object_element_set_code_base, htmlObjectElementSetCodeBase, ghcjs_dom_html_object_element_get_code_base, htmlObjectElementGetCodeBase, ghcjs_dom_html_object_element_set_code_type, htmlObjectElementSetCodeType, ghcjs_dom_html_object_element_get_code_type, htmlObjectElementGetCodeType, ghcjs_dom_html_object_element_set_data, htmlObjectElementSetData, ghcjs_dom_html_object_element_get_data, htmlObjectElementGetData, ghcjs_dom_html_object_element_set_declare, htmlObjectElementSetDeclare, ghcjs_dom_html_object_element_get_declare, htmlObjectElementGetDeclare, ghcjs_dom_html_object_element_set_height, htmlObjectElementSetHeight, ghcjs_dom_html_object_element_get_height, htmlObjectElementGetHeight, ghcjs_dom_html_object_element_set_hspace, htmlObjectElementSetHspace, ghcjs_dom_html_object_element_get_hspace, htmlObjectElementGetHspace, ghcjs_dom_html_object_element_set_name, htmlObjectElementSetName, ghcjs_dom_html_object_element_get_name, htmlObjectElementGetName, ghcjs_dom_html_object_element_set_standby, htmlObjectElementSetStandby, ghcjs_dom_html_object_element_get_standby, htmlObjectElementGetStandby, ghcjs_dom_html_object_element_set_use_map, htmlObjectElementSetUseMap, ghcjs_dom_html_object_element_get_use_map, htmlObjectElementGetUseMap, ghcjs_dom_html_object_element_set_vspace, htmlObjectElementSetVspace, ghcjs_dom_html_object_element_get_vspace, htmlObjectElementGetVspace, ghcjs_dom_html_object_element_set_width, htmlObjectElementSetWidth, ghcjs_dom_html_object_element_get_width, htmlObjectElementGetWidth, ghcjs_dom_html_object_element_get_will_validate, htmlObjectElementGetWillValidate, ghcjs_dom_html_object_element_get_validity, htmlObjectElementGetValidity, ghcjs_dom_html_object_element_get_validation_message, htmlObjectElementGetValidationMessage, ghcjs_dom_html_object_element_get_content_document, htmlObjectElementGetContentDocument, HTMLObjectElement, IsHTMLObjectElement, castToHTMLObjectElement, gTypeHTMLObjectElement, toHTMLObjectElement) where import GHCJS.Types import GHCJS.Foreign import Data.Word import GHCJS.DOM.Types import Control.Applicative ((<$>)) import GHCJS.DOM.EventM import GHCJS.Types import GHCJS.Foreign import Data.Word import GHCJS.DOM.Types import Control.Applicative ((<$>)) import GHCJS.DOM.EventM #ifdef ghcjs_HOST_OS foreign import javascript unsafe "($1[\"checkValidity\"]() ? 1 : 0)" ghcjs_dom_html_object_element_check_validity :: JSRef HTMLObjectElement -> IO Bool #else ghcjs_dom_html_object_element_check_validity :: JSRef HTMLObjectElement -> IO Bool ghcjs_dom_html_object_element_check_validity = undefined #endif htmlObjectElementCheckValidity :: (IsHTMLObjectElement self) => self -> IO Bool htmlObjectElementCheckValidity self = ghcjs_dom_html_object_element_check_validity (unHTMLObjectElement (toHTMLObjectElement self)) #ifdef ghcjs_HOST_OS foreign import javascript unsafe "$1[\"setCustomValidity\"]($2)" ghcjs_dom_html_object_element_set_custom_validity :: JSRef HTMLObjectElement -> JSString -> IO () #else ghcjs_dom_html_object_element_set_custom_validity :: JSRef HTMLObjectElement -> JSString -> IO () ghcjs_dom_html_object_element_set_custom_validity = undefined #endif htmlObjectElementSetCustomValidity :: (IsHTMLObjectElement self, ToJSString error) => self -> error -> IO () htmlObjectElementSetCustomValidity self error = ghcjs_dom_html_object_element_set_custom_validity (unHTMLObjectElement (toHTMLObjectElement self)) (toJSString error) #ifdef ghcjs_HOST_OS foreign import javascript unsafe "$1[\"form\"]" ghcjs_dom_html_object_element_get_form :: JSRef HTMLObjectElement -> IO (JSRef HTMLFormElement) #else ghcjs_dom_html_object_element_get_form :: JSRef HTMLObjectElement -> IO (JSRef HTMLFormElement) ghcjs_dom_html_object_element_get_form = undefined #endif htmlObjectElementGetForm :: (IsHTMLObjectElement self) => self -> IO (Maybe HTMLFormElement) htmlObjectElementGetForm self = fmap HTMLFormElement . maybeJSNull <$> (ghcjs_dom_html_object_element_get_form (unHTMLObjectElement (toHTMLObjectElement self))) #ifdef ghcjs_HOST_OS foreign import javascript unsafe "$1[\"code\"] = $2;" ghcjs_dom_html_object_element_set_code :: JSRef HTMLObjectElement -> JSString -> IO () #else ghcjs_dom_html_object_element_set_code :: JSRef HTMLObjectElement -> JSString -> IO () ghcjs_dom_html_object_element_set_code = undefined #endif htmlObjectElementSetCode :: (IsHTMLObjectElement self, ToJSString val) => self -> val -> IO () htmlObjectElementSetCode self val = ghcjs_dom_html_object_element_set_code (unHTMLObjectElement (toHTMLObjectElement self)) (toJSString val) #ifdef ghcjs_HOST_OS foreign import javascript unsafe "$1[\"code\"]" ghcjs_dom_html_object_element_get_code :: JSRef HTMLObjectElement -> IO JSString #else ghcjs_dom_html_object_element_get_code :: JSRef HTMLObjectElement -> IO JSString ghcjs_dom_html_object_element_get_code = undefined #endif htmlObjectElementGetCode :: (IsHTMLObjectElement self, FromJSString result) => self -> IO result htmlObjectElementGetCode self = fromJSString <$> (ghcjs_dom_html_object_element_get_code (unHTMLObjectElement (toHTMLObjectElement self))) #ifdef ghcjs_HOST_OS foreign import javascript unsafe "$1[\"align\"] = $2;" ghcjs_dom_html_object_element_set_align :: JSRef HTMLObjectElement -> JSString -> IO () #else ghcjs_dom_html_object_element_set_align :: JSRef HTMLObjectElement -> JSString -> IO () ghcjs_dom_html_object_element_set_align = undefined #endif htmlObjectElementSetAlign :: (IsHTMLObjectElement self, ToJSString val) => self -> val -> IO () htmlObjectElementSetAlign self val = ghcjs_dom_html_object_element_set_align (unHTMLObjectElement (toHTMLObjectElement self)) (toJSString val) #ifdef ghcjs_HOST_OS foreign import javascript unsafe "$1[\"align\"]" ghcjs_dom_html_object_element_get_align :: JSRef HTMLObjectElement -> IO JSString #else ghcjs_dom_html_object_element_get_align :: JSRef HTMLObjectElement -> IO JSString ghcjs_dom_html_object_element_get_align = undefined #endif htmlObjectElementGetAlign :: (IsHTMLObjectElement self, FromJSString result) => self -> IO result htmlObjectElementGetAlign self = fromJSString <$> (ghcjs_dom_html_object_element_get_align (unHTMLObjectElement (toHTMLObjectElement self))) #ifdef ghcjs_HOST_OS foreign import javascript unsafe "$1[\"archive\"] = $2;" ghcjs_dom_html_object_element_set_archive :: JSRef HTMLObjectElement -> JSString -> IO () #else ghcjs_dom_html_object_element_set_archive :: JSRef HTMLObjectElement -> JSString -> IO () ghcjs_dom_html_object_element_set_archive = undefined #endif htmlObjectElementSetArchive :: (IsHTMLObjectElement self, ToJSString val) => self -> val -> IO () htmlObjectElementSetArchive self val = ghcjs_dom_html_object_element_set_archive (unHTMLObjectElement (toHTMLObjectElement self)) (toJSString val) #ifdef ghcjs_HOST_OS foreign import javascript unsafe "$1[\"archive\"]" ghcjs_dom_html_object_element_get_archive :: JSRef HTMLObjectElement -> IO JSString #else ghcjs_dom_html_object_element_get_archive :: JSRef HTMLObjectElement -> IO JSString ghcjs_dom_html_object_element_get_archive = undefined #endif htmlObjectElementGetArchive :: (IsHTMLObjectElement self, FromJSString result) => self -> IO result htmlObjectElementGetArchive self = fromJSString <$> (ghcjs_dom_html_object_element_get_archive (unHTMLObjectElement (toHTMLObjectElement self))) #ifdef ghcjs_HOST_OS foreign import javascript unsafe "$1[\"border\"] = $2;" ghcjs_dom_html_object_element_set_border :: JSRef HTMLObjectElement -> JSString -> IO () #else ghcjs_dom_html_object_element_set_border :: JSRef HTMLObjectElement -> JSString -> IO () ghcjs_dom_html_object_element_set_border = undefined #endif htmlObjectElementSetBorder :: (IsHTMLObjectElement self, ToJSString val) => self -> val -> IO () htmlObjectElementSetBorder self val = ghcjs_dom_html_object_element_set_border (unHTMLObjectElement (toHTMLObjectElement self)) (toJSString val) #ifdef ghcjs_HOST_OS foreign import javascript unsafe "$1[\"border\"]" ghcjs_dom_html_object_element_get_border :: JSRef HTMLObjectElement -> IO JSString #else ghcjs_dom_html_object_element_get_border :: JSRef HTMLObjectElement -> IO JSString ghcjs_dom_html_object_element_get_border = undefined #endif htmlObjectElementGetBorder :: (IsHTMLObjectElement self, FromJSString result) => self -> IO result htmlObjectElementGetBorder self = fromJSString <$> (ghcjs_dom_html_object_element_get_border (unHTMLObjectElement (toHTMLObjectElement self))) #ifdef ghcjs_HOST_OS foreign import javascript unsafe "$1[\"codeBase\"] = $2;" ghcjs_dom_html_object_element_set_code_base :: JSRef HTMLObjectElement -> JSString -> IO () #else ghcjs_dom_html_object_element_set_code_base :: JSRef HTMLObjectElement -> JSString -> IO () ghcjs_dom_html_object_element_set_code_base = undefined #endif htmlObjectElementSetCodeBase :: (IsHTMLObjectElement self, ToJSString val) => self -> val -> IO () htmlObjectElementSetCodeBase self val = ghcjs_dom_html_object_element_set_code_base (unHTMLObjectElement (toHTMLObjectElement self)) (toJSString val) #ifdef ghcjs_HOST_OS foreign import javascript unsafe "$1[\"codeBase\"]" ghcjs_dom_html_object_element_get_code_base :: JSRef HTMLObjectElement -> IO JSString #else ghcjs_dom_html_object_element_get_code_base :: JSRef HTMLObjectElement -> IO JSString ghcjs_dom_html_object_element_get_code_base = undefined #endif htmlObjectElementGetCodeBase :: (IsHTMLObjectElement self, FromJSString result) => self -> IO result htmlObjectElementGetCodeBase self = fromJSString <$> (ghcjs_dom_html_object_element_get_code_base (unHTMLObjectElement (toHTMLObjectElement self))) #ifdef ghcjs_HOST_OS foreign import javascript unsafe "$1[\"codeType\"] = $2;" ghcjs_dom_html_object_element_set_code_type :: JSRef HTMLObjectElement -> JSString -> IO () #else ghcjs_dom_html_object_element_set_code_type :: JSRef HTMLObjectElement -> JSString -> IO () ghcjs_dom_html_object_element_set_code_type = undefined #endif htmlObjectElementSetCodeType :: (IsHTMLObjectElement self, ToJSString val) => self -> val -> IO () htmlObjectElementSetCodeType self val = ghcjs_dom_html_object_element_set_code_type (unHTMLObjectElement (toHTMLObjectElement self)) (toJSString val) #ifdef ghcjs_HOST_OS foreign import javascript unsafe "$1[\"codeType\"]" ghcjs_dom_html_object_element_get_code_type :: JSRef HTMLObjectElement -> IO JSString #else ghcjs_dom_html_object_element_get_code_type :: JSRef HTMLObjectElement -> IO JSString ghcjs_dom_html_object_element_get_code_type = undefined #endif htmlObjectElementGetCodeType :: (IsHTMLObjectElement self, FromJSString result) => self -> IO result htmlObjectElementGetCodeType self = fromJSString <$> (ghcjs_dom_html_object_element_get_code_type (unHTMLObjectElement (toHTMLObjectElement self))) #ifdef ghcjs_HOST_OS foreign import javascript unsafe "$1[\"data\"] = $2;" ghcjs_dom_html_object_element_set_data :: JSRef HTMLObjectElement -> JSString -> IO () #else ghcjs_dom_html_object_element_set_data :: JSRef HTMLObjectElement -> JSString -> IO () ghcjs_dom_html_object_element_set_data = undefined #endif htmlObjectElementSetData :: (IsHTMLObjectElement self, ToJSString val) => self -> val -> IO () htmlObjectElementSetData self val = ghcjs_dom_html_object_element_set_data (unHTMLObjectElement (toHTMLObjectElement self)) (toJSString val) #ifdef ghcjs_HOST_OS foreign import javascript unsafe "$1[\"data\"]" ghcjs_dom_html_object_element_get_data :: JSRef HTMLObjectElement -> IO JSString #else ghcjs_dom_html_object_element_get_data :: JSRef HTMLObjectElement -> IO JSString ghcjs_dom_html_object_element_get_data = undefined #endif htmlObjectElementGetData :: (IsHTMLObjectElement self, FromJSString result) => self -> IO result htmlObjectElementGetData self = fromJSString <$> (ghcjs_dom_html_object_element_get_data (unHTMLObjectElement (toHTMLObjectElement self))) #ifdef ghcjs_HOST_OS foreign import javascript unsafe "$1[\"declare\"] = $2;" ghcjs_dom_html_object_element_set_declare :: JSRef HTMLObjectElement -> Bool -> IO () #else ghcjs_dom_html_object_element_set_declare :: JSRef HTMLObjectElement -> Bool -> IO () ghcjs_dom_html_object_element_set_declare = undefined #endif htmlObjectElementSetDeclare :: (IsHTMLObjectElement self) => self -> Bool -> IO () htmlObjectElementSetDeclare self val = ghcjs_dom_html_object_element_set_declare (unHTMLObjectElement (toHTMLObjectElement self)) val #ifdef ghcjs_HOST_OS foreign import javascript unsafe "($1[\"declare\"] ? 1 : 0)" ghcjs_dom_html_object_element_get_declare :: JSRef HTMLObjectElement -> IO Bool #else ghcjs_dom_html_object_element_get_declare :: JSRef HTMLObjectElement -> IO Bool ghcjs_dom_html_object_element_get_declare = undefined #endif htmlObjectElementGetDeclare :: (IsHTMLObjectElement self) => self -> IO Bool htmlObjectElementGetDeclare self = ghcjs_dom_html_object_element_get_declare (unHTMLObjectElement (toHTMLObjectElement self)) #ifdef ghcjs_HOST_OS foreign import javascript unsafe "$1[\"height\"] = $2;" ghcjs_dom_html_object_element_set_height :: JSRef HTMLObjectElement -> JSString -> IO () #else ghcjs_dom_html_object_element_set_height :: JSRef HTMLObjectElement -> JSString -> IO () ghcjs_dom_html_object_element_set_height = undefined #endif htmlObjectElementSetHeight :: (IsHTMLObjectElement self, ToJSString val) => self -> val -> IO () htmlObjectElementSetHeight self val = ghcjs_dom_html_object_element_set_height (unHTMLObjectElement (toHTMLObjectElement self)) (toJSString val) #ifdef ghcjs_HOST_OS foreign import javascript unsafe "$1[\"height\"]" ghcjs_dom_html_object_element_get_height :: JSRef HTMLObjectElement -> IO JSString #else ghcjs_dom_html_object_element_get_height :: JSRef HTMLObjectElement -> IO JSString ghcjs_dom_html_object_element_get_height = undefined #endif htmlObjectElementGetHeight :: (IsHTMLObjectElement self, FromJSString result) => self -> IO result htmlObjectElementGetHeight self = fromJSString <$> (ghcjs_dom_html_object_element_get_height (unHTMLObjectElement (toHTMLObjectElement self))) #ifdef ghcjs_HOST_OS foreign import javascript unsafe "$1[\"hspace\"] = $2;" ghcjs_dom_html_object_element_set_hspace :: JSRef HTMLObjectElement -> Int -> IO () #else ghcjs_dom_html_object_element_set_hspace :: JSRef HTMLObjectElement -> Int -> IO () ghcjs_dom_html_object_element_set_hspace = undefined #endif htmlObjectElementSetHspace :: (IsHTMLObjectElement self) => self -> Int -> IO () htmlObjectElementSetHspace self val = ghcjs_dom_html_object_element_set_hspace (unHTMLObjectElement (toHTMLObjectElement self)) val #ifdef ghcjs_HOST_OS foreign import javascript unsafe "$1[\"hspace\"]" ghcjs_dom_html_object_element_get_hspace :: JSRef HTMLObjectElement -> IO Int #else ghcjs_dom_html_object_element_get_hspace :: JSRef HTMLObjectElement -> IO Int ghcjs_dom_html_object_element_get_hspace = undefined #endif htmlObjectElementGetHspace :: (IsHTMLObjectElement self) => self -> IO Int htmlObjectElementGetHspace self = ghcjs_dom_html_object_element_get_hspace (unHTMLObjectElement (toHTMLObjectElement self)) #ifdef ghcjs_HOST_OS foreign import javascript unsafe "$1[\"name\"] = $2;" ghcjs_dom_html_object_element_set_name :: JSRef HTMLObjectElement -> JSString -> IO () #else ghcjs_dom_html_object_element_set_name :: JSRef HTMLObjectElement -> JSString -> IO () ghcjs_dom_html_object_element_set_name = undefined #endif htmlObjectElementSetName :: (IsHTMLObjectElement self, ToJSString val) => self -> val -> IO () htmlObjectElementSetName self val = ghcjs_dom_html_object_element_set_name (unHTMLObjectElement (toHTMLObjectElement self)) (toJSString val) #ifdef ghcjs_HOST_OS foreign import javascript unsafe "$1[\"name\"]" ghcjs_dom_html_object_element_get_name :: JSRef HTMLObjectElement -> IO JSString #else ghcjs_dom_html_object_element_get_name :: JSRef HTMLObjectElement -> IO JSString ghcjs_dom_html_object_element_get_name = undefined #endif htmlObjectElementGetName :: (IsHTMLObjectElement self, FromJSString result) => self -> IO result htmlObjectElementGetName self = fromJSString <$> (ghcjs_dom_html_object_element_get_name (unHTMLObjectElement (toHTMLObjectElement self))) #ifdef ghcjs_HOST_OS foreign import javascript unsafe "$1[\"standby\"] = $2;" ghcjs_dom_html_object_element_set_standby :: JSRef HTMLObjectElement -> JSString -> IO () #else ghcjs_dom_html_object_element_set_standby :: JSRef HTMLObjectElement -> JSString -> IO () ghcjs_dom_html_object_element_set_standby = undefined #endif htmlObjectElementSetStandby :: (IsHTMLObjectElement self, ToJSString val) => self -> val -> IO () htmlObjectElementSetStandby self val = ghcjs_dom_html_object_element_set_standby (unHTMLObjectElement (toHTMLObjectElement self)) (toJSString val) #ifdef ghcjs_HOST_OS foreign import javascript unsafe "$1[\"standby\"]" ghcjs_dom_html_object_element_get_standby :: JSRef HTMLObjectElement -> IO JSString #else ghcjs_dom_html_object_element_get_standby :: JSRef HTMLObjectElement -> IO JSString ghcjs_dom_html_object_element_get_standby = undefined #endif htmlObjectElementGetStandby :: (IsHTMLObjectElement self, FromJSString result) => self -> IO result htmlObjectElementGetStandby self = fromJSString <$> (ghcjs_dom_html_object_element_get_standby (unHTMLObjectElement (toHTMLObjectElement self))) #ifdef ghcjs_HOST_OS foreign import javascript unsafe "$1[\"useMap\"] = $2;" ghcjs_dom_html_object_element_set_use_map :: JSRef HTMLObjectElement -> JSString -> IO () #else ghcjs_dom_html_object_element_set_use_map :: JSRef HTMLObjectElement -> JSString -> IO () ghcjs_dom_html_object_element_set_use_map = undefined #endif htmlObjectElementSetUseMap :: (IsHTMLObjectElement self, ToJSString val) => self -> val -> IO () htmlObjectElementSetUseMap self val = ghcjs_dom_html_object_element_set_use_map (unHTMLObjectElement (toHTMLObjectElement self)) (toJSString val) #ifdef ghcjs_HOST_OS foreign import javascript unsafe "$1[\"useMap\"]" ghcjs_dom_html_object_element_get_use_map :: JSRef HTMLObjectElement -> IO JSString #else ghcjs_dom_html_object_element_get_use_map :: JSRef HTMLObjectElement -> IO JSString ghcjs_dom_html_object_element_get_use_map = undefined #endif htmlObjectElementGetUseMap :: (IsHTMLObjectElement self, FromJSString result) => self -> IO result htmlObjectElementGetUseMap self = fromJSString <$> (ghcjs_dom_html_object_element_get_use_map (unHTMLObjectElement (toHTMLObjectElement self))) #ifdef ghcjs_HOST_OS foreign import javascript unsafe "$1[\"vspace\"] = $2;" ghcjs_dom_html_object_element_set_vspace :: JSRef HTMLObjectElement -> Int -> IO () #else ghcjs_dom_html_object_element_set_vspace :: JSRef HTMLObjectElement -> Int -> IO () ghcjs_dom_html_object_element_set_vspace = undefined #endif htmlObjectElementSetVspace :: (IsHTMLObjectElement self) => self -> Int -> IO () htmlObjectElementSetVspace self val = ghcjs_dom_html_object_element_set_vspace (unHTMLObjectElement (toHTMLObjectElement self)) val #ifdef ghcjs_HOST_OS foreign import javascript unsafe "$1[\"vspace\"]" ghcjs_dom_html_object_element_get_vspace :: JSRef HTMLObjectElement -> IO Int #else ghcjs_dom_html_object_element_get_vspace :: JSRef HTMLObjectElement -> IO Int ghcjs_dom_html_object_element_get_vspace = undefined #endif htmlObjectElementGetVspace :: (IsHTMLObjectElement self) => self -> IO Int htmlObjectElementGetVspace self = ghcjs_dom_html_object_element_get_vspace (unHTMLObjectElement (toHTMLObjectElement self)) #ifdef ghcjs_HOST_OS foreign import javascript unsafe "$1[\"width\"] = $2;" ghcjs_dom_html_object_element_set_width :: JSRef HTMLObjectElement -> JSString -> IO () #else ghcjs_dom_html_object_element_set_width :: JSRef HTMLObjectElement -> JSString -> IO () ghcjs_dom_html_object_element_set_width = undefined #endif htmlObjectElementSetWidth :: (IsHTMLObjectElement self, ToJSString val) => self -> val -> IO () htmlObjectElementSetWidth self val = ghcjs_dom_html_object_element_set_width (unHTMLObjectElement (toHTMLObjectElement self)) (toJSString val) #ifdef ghcjs_HOST_OS foreign import javascript unsafe "$1[\"width\"]" ghcjs_dom_html_object_element_get_width :: JSRef HTMLObjectElement -> IO JSString #else ghcjs_dom_html_object_element_get_width :: JSRef HTMLObjectElement -> IO JSString ghcjs_dom_html_object_element_get_width = undefined #endif htmlObjectElementGetWidth :: (IsHTMLObjectElement self, FromJSString result) => self -> IO result htmlObjectElementGetWidth self = fromJSString <$> (ghcjs_dom_html_object_element_get_width (unHTMLObjectElement (toHTMLObjectElement self))) #ifdef ghcjs_HOST_OS foreign import javascript unsafe "($1[\"willValidate\"] ? 1 : 0)" ghcjs_dom_html_object_element_get_will_validate :: JSRef HTMLObjectElement -> IO Bool #else ghcjs_dom_html_object_element_get_will_validate :: JSRef HTMLObjectElement -> IO Bool ghcjs_dom_html_object_element_get_will_validate = undefined #endif htmlObjectElementGetWillValidate :: (IsHTMLObjectElement self) => self -> IO Bool htmlObjectElementGetWillValidate self = ghcjs_dom_html_object_element_get_will_validate (unHTMLObjectElement (toHTMLObjectElement self)) #ifdef ghcjs_HOST_OS foreign import javascript unsafe "$1[\"validity\"]" ghcjs_dom_html_object_element_get_validity :: JSRef HTMLObjectElement -> IO (JSRef ValidityState) #else ghcjs_dom_html_object_element_get_validity :: JSRef HTMLObjectElement -> IO (JSRef ValidityState) ghcjs_dom_html_object_element_get_validity = undefined #endif htmlObjectElementGetValidity :: (IsHTMLObjectElement self) => self -> IO (Maybe ValidityState) htmlObjectElementGetValidity self = fmap ValidityState . maybeJSNull <$> (ghcjs_dom_html_object_element_get_validity (unHTMLObjectElement (toHTMLObjectElement self))) #ifdef ghcjs_HOST_OS foreign import javascript unsafe "$1[\"validationMessage\"]" ghcjs_dom_html_object_element_get_validation_message :: JSRef HTMLObjectElement -> IO JSString #else ghcjs_dom_html_object_element_get_validation_message :: JSRef HTMLObjectElement -> IO JSString ghcjs_dom_html_object_element_get_validation_message = undefined #endif htmlObjectElementGetValidationMessage :: (IsHTMLObjectElement self, FromJSString result) => self -> IO result htmlObjectElementGetValidationMessage self = fromJSString <$> (ghcjs_dom_html_object_element_get_validation_message (unHTMLObjectElement (toHTMLObjectElement self))) #ifdef ghcjs_HOST_OS foreign import javascript unsafe "$1[\"contentDocument\"]" ghcjs_dom_html_object_element_get_content_document :: JSRef HTMLObjectElement -> IO (JSRef Document) #else ghcjs_dom_html_object_element_get_content_document :: JSRef HTMLObjectElement -> IO (JSRef Document) ghcjs_dom_html_object_element_get_content_document = undefined #endif htmlObjectElementGetContentDocument :: (IsHTMLObjectElement self) => self -> IO (Maybe Document) htmlObjectElementGetContentDocument self = fmap Document . maybeJSNull <$> (ghcjs_dom_html_object_element_get_content_document (unHTMLObjectElement (toHTMLObjectElement self))) #else module GHCJS.DOM.HTMLObjectElement ( module Graphics.UI.Gtk.WebKit.DOM.HTMLObjectElement ) where import Graphics.UI.Gtk.WebKit.DOM.HTMLObjectElement #endif