{-# LANGUAGE TypeApplications #-}
#if (MIN_VERSION_haskell_gi_overloading(1,0,0) && !defined(__HADDOCK_VERSION__))
#define ENABLE_OVERLOADING
#endif
module GI.WebKit2WebExtension.Objects.DOMHTMLInputElement
(
DOMHTMLInputElement(..) ,
IsDOMHTMLInputElement ,
toDOMHTMLInputElement ,
#if defined(ENABLE_OVERLOADING)
ResolveDOMHTMLInputElementMethod ,
#endif
#if defined(ENABLE_OVERLOADING)
DOMHTMLInputElementGetAcceptMethodInfo ,
#endif
dOMHTMLInputElementGetAccept ,
#if defined(ENABLE_OVERLOADING)
DOMHTMLInputElementGetAlignMethodInfo ,
#endif
dOMHTMLInputElementGetAlign ,
#if defined(ENABLE_OVERLOADING)
DOMHTMLInputElementGetAltMethodInfo ,
#endif
dOMHTMLInputElementGetAlt ,
#if defined(ENABLE_OVERLOADING)
DOMHTMLInputElementGetAutoFilledMethodInfo,
#endif
dOMHTMLInputElementGetAutoFilled ,
#if defined(ENABLE_OVERLOADING)
DOMHTMLInputElementGetAutofocusMethodInfo,
#endif
dOMHTMLInputElementGetAutofocus ,
#if defined(ENABLE_OVERLOADING)
DOMHTMLInputElementGetCaptureMethodInfo ,
#endif
dOMHTMLInputElementGetCapture ,
#if defined(ENABLE_OVERLOADING)
DOMHTMLInputElementGetCaptureTypeMethodInfo,
#endif
dOMHTMLInputElementGetCaptureType ,
#if defined(ENABLE_OVERLOADING)
DOMHTMLInputElementGetCheckedMethodInfo ,
#endif
dOMHTMLInputElementGetChecked ,
#if defined(ENABLE_OVERLOADING)
DOMHTMLInputElementGetDefaultCheckedMethodInfo,
#endif
dOMHTMLInputElementGetDefaultChecked ,
#if defined(ENABLE_OVERLOADING)
DOMHTMLInputElementGetDefaultValueMethodInfo,
#endif
dOMHTMLInputElementGetDefaultValue ,
#if defined(ENABLE_OVERLOADING)
DOMHTMLInputElementGetDisabledMethodInfo,
#endif
dOMHTMLInputElementGetDisabled ,
#if defined(ENABLE_OVERLOADING)
DOMHTMLInputElementGetFilesMethodInfo ,
#endif
dOMHTMLInputElementGetFiles ,
#if defined(ENABLE_OVERLOADING)
DOMHTMLInputElementGetFormMethodInfo ,
#endif
dOMHTMLInputElementGetForm ,
#if defined(ENABLE_OVERLOADING)
DOMHTMLInputElementGetHeightMethodInfo ,
#endif
dOMHTMLInputElementGetHeight ,
#if defined(ENABLE_OVERLOADING)
DOMHTMLInputElementGetIndeterminateMethodInfo,
#endif
dOMHTMLInputElementGetIndeterminate ,
#if defined(ENABLE_OVERLOADING)
DOMHTMLInputElementGetInputTypeMethodInfo,
#endif
dOMHTMLInputElementGetInputType ,
#if defined(ENABLE_OVERLOADING)
DOMHTMLInputElementGetMaxLengthMethodInfo,
#endif
dOMHTMLInputElementGetMaxLength ,
#if defined(ENABLE_OVERLOADING)
DOMHTMLInputElementGetMultipleMethodInfo,
#endif
dOMHTMLInputElementGetMultiple ,
#if defined(ENABLE_OVERLOADING)
DOMHTMLInputElementGetNameMethodInfo ,
#endif
dOMHTMLInputElementGetName ,
#if defined(ENABLE_OVERLOADING)
DOMHTMLInputElementGetReadOnlyMethodInfo,
#endif
dOMHTMLInputElementGetReadOnly ,
#if defined(ENABLE_OVERLOADING)
DOMHTMLInputElementGetSizeMethodInfo ,
#endif
dOMHTMLInputElementGetSize ,
#if defined(ENABLE_OVERLOADING)
DOMHTMLInputElementGetSrcMethodInfo ,
#endif
dOMHTMLInputElementGetSrc ,
#if defined(ENABLE_OVERLOADING)
DOMHTMLInputElementGetUseMapMethodInfo ,
#endif
dOMHTMLInputElementGetUseMap ,
#if defined(ENABLE_OVERLOADING)
DOMHTMLInputElementGetValueMethodInfo ,
#endif
dOMHTMLInputElementGetValue ,
#if defined(ENABLE_OVERLOADING)
DOMHTMLInputElementGetWidthMethodInfo ,
#endif
dOMHTMLInputElementGetWidth ,
#if defined(ENABLE_OVERLOADING)
DOMHTMLInputElementGetWillValidateMethodInfo,
#endif
dOMHTMLInputElementGetWillValidate ,
#if defined(ENABLE_OVERLOADING)
DOMHTMLInputElementIsEditedMethodInfo ,
#endif
dOMHTMLInputElementIsEdited ,
#if defined(ENABLE_OVERLOADING)
DOMHTMLInputElementSelectMethodInfo ,
#endif
dOMHTMLInputElementSelect ,
#if defined(ENABLE_OVERLOADING)
DOMHTMLInputElementSetAcceptMethodInfo ,
#endif
dOMHTMLInputElementSetAccept ,
#if defined(ENABLE_OVERLOADING)
DOMHTMLInputElementSetAlignMethodInfo ,
#endif
dOMHTMLInputElementSetAlign ,
#if defined(ENABLE_OVERLOADING)
DOMHTMLInputElementSetAltMethodInfo ,
#endif
dOMHTMLInputElementSetAlt ,
#if defined(ENABLE_OVERLOADING)
DOMHTMLInputElementSetAutoFilledMethodInfo,
#endif
dOMHTMLInputElementSetAutoFilled ,
#if defined(ENABLE_OVERLOADING)
DOMHTMLInputElementSetAutofocusMethodInfo,
#endif
dOMHTMLInputElementSetAutofocus ,
#if defined(ENABLE_OVERLOADING)
DOMHTMLInputElementSetCaptureTypeMethodInfo,
#endif
dOMHTMLInputElementSetCaptureType ,
#if defined(ENABLE_OVERLOADING)
DOMHTMLInputElementSetCheckedMethodInfo ,
#endif
dOMHTMLInputElementSetChecked ,
#if defined(ENABLE_OVERLOADING)
DOMHTMLInputElementSetDefaultCheckedMethodInfo,
#endif
dOMHTMLInputElementSetDefaultChecked ,
#if defined(ENABLE_OVERLOADING)
DOMHTMLInputElementSetDefaultValueMethodInfo,
#endif
dOMHTMLInputElementSetDefaultValue ,
#if defined(ENABLE_OVERLOADING)
DOMHTMLInputElementSetDisabledMethodInfo,
#endif
dOMHTMLInputElementSetDisabled ,
#if defined(ENABLE_OVERLOADING)
DOMHTMLInputElementSetEditingValueMethodInfo,
#endif
dOMHTMLInputElementSetEditingValue ,
#if defined(ENABLE_OVERLOADING)
DOMHTMLInputElementSetFilesMethodInfo ,
#endif
dOMHTMLInputElementSetFiles ,
#if defined(ENABLE_OVERLOADING)
DOMHTMLInputElementSetHeightMethodInfo ,
#endif
dOMHTMLInputElementSetHeight ,
#if defined(ENABLE_OVERLOADING)
DOMHTMLInputElementSetIndeterminateMethodInfo,
#endif
dOMHTMLInputElementSetIndeterminate ,
#if defined(ENABLE_OVERLOADING)
DOMHTMLInputElementSetInputTypeMethodInfo,
#endif
dOMHTMLInputElementSetInputType ,
#if defined(ENABLE_OVERLOADING)
DOMHTMLInputElementSetMaxLengthMethodInfo,
#endif
dOMHTMLInputElementSetMaxLength ,
#if defined(ENABLE_OVERLOADING)
DOMHTMLInputElementSetMultipleMethodInfo,
#endif
dOMHTMLInputElementSetMultiple ,
#if defined(ENABLE_OVERLOADING)
DOMHTMLInputElementSetNameMethodInfo ,
#endif
dOMHTMLInputElementSetName ,
#if defined(ENABLE_OVERLOADING)
DOMHTMLInputElementSetReadOnlyMethodInfo,
#endif
dOMHTMLInputElementSetReadOnly ,
#if defined(ENABLE_OVERLOADING)
DOMHTMLInputElementSetSizeMethodInfo ,
#endif
dOMHTMLInputElementSetSize ,
#if defined(ENABLE_OVERLOADING)
DOMHTMLInputElementSetSrcMethodInfo ,
#endif
dOMHTMLInputElementSetSrc ,
#if defined(ENABLE_OVERLOADING)
DOMHTMLInputElementSetUseMapMethodInfo ,
#endif
dOMHTMLInputElementSetUseMap ,
#if defined(ENABLE_OVERLOADING)
DOMHTMLInputElementSetValueMethodInfo ,
#endif
dOMHTMLInputElementSetValue ,
#if defined(ENABLE_OVERLOADING)
DOMHTMLInputElementSetWidthMethodInfo ,
#endif
dOMHTMLInputElementSetWidth ,
#if defined(ENABLE_OVERLOADING)
DOMHTMLInputElementAcceptPropertyInfo ,
#endif
constructDOMHTMLInputElementAccept ,
#if defined(ENABLE_OVERLOADING)
dOMHTMLInputElementAccept ,
#endif
getDOMHTMLInputElementAccept ,
setDOMHTMLInputElementAccept ,
#if defined(ENABLE_OVERLOADING)
DOMHTMLInputElementAlignPropertyInfo ,
#endif
constructDOMHTMLInputElementAlign ,
#if defined(ENABLE_OVERLOADING)
dOMHTMLInputElementAlign ,
#endif
getDOMHTMLInputElementAlign ,
setDOMHTMLInputElementAlign ,
#if defined(ENABLE_OVERLOADING)
DOMHTMLInputElementAltPropertyInfo ,
#endif
constructDOMHTMLInputElementAlt ,
#if defined(ENABLE_OVERLOADING)
dOMHTMLInputElementAlt ,
#endif
getDOMHTMLInputElementAlt ,
setDOMHTMLInputElementAlt ,
#if defined(ENABLE_OVERLOADING)
DOMHTMLInputElementAutofocusPropertyInfo,
#endif
constructDOMHTMLInputElementAutofocus ,
#if defined(ENABLE_OVERLOADING)
dOMHTMLInputElementAutofocus ,
#endif
getDOMHTMLInputElementAutofocus ,
setDOMHTMLInputElementAutofocus ,
#if defined(ENABLE_OVERLOADING)
DOMHTMLInputElementCapturePropertyInfo ,
#endif
clearDOMHTMLInputElementCapture ,
constructDOMHTMLInputElementCapture ,
#if defined(ENABLE_OVERLOADING)
dOMHTMLInputElementCapture ,
#endif
getDOMHTMLInputElementCapture ,
setDOMHTMLInputElementCapture ,
#if defined(ENABLE_OVERLOADING)
DOMHTMLInputElementCheckedPropertyInfo ,
#endif
constructDOMHTMLInputElementChecked ,
#if defined(ENABLE_OVERLOADING)
dOMHTMLInputElementChecked ,
#endif
getDOMHTMLInputElementChecked ,
setDOMHTMLInputElementChecked ,
#if defined(ENABLE_OVERLOADING)
DOMHTMLInputElementDefaultCheckedPropertyInfo,
#endif
constructDOMHTMLInputElementDefaultChecked,
#if defined(ENABLE_OVERLOADING)
dOMHTMLInputElementDefaultChecked ,
#endif
getDOMHTMLInputElementDefaultChecked ,
setDOMHTMLInputElementDefaultChecked ,
#if defined(ENABLE_OVERLOADING)
DOMHTMLInputElementDefaultValuePropertyInfo,
#endif
constructDOMHTMLInputElementDefaultValue,
#if defined(ENABLE_OVERLOADING)
dOMHTMLInputElementDefaultValue ,
#endif
getDOMHTMLInputElementDefaultValue ,
setDOMHTMLInputElementDefaultValue ,
#if defined(ENABLE_OVERLOADING)
DOMHTMLInputElementDisabledPropertyInfo ,
#endif
constructDOMHTMLInputElementDisabled ,
#if defined(ENABLE_OVERLOADING)
dOMHTMLInputElementDisabled ,
#endif
getDOMHTMLInputElementDisabled ,
setDOMHTMLInputElementDisabled ,
#if defined(ENABLE_OVERLOADING)
DOMHTMLInputElementFilesPropertyInfo ,
#endif
#if defined(ENABLE_OVERLOADING)
dOMHTMLInputElementFiles ,
#endif
getDOMHTMLInputElementFiles ,
#if defined(ENABLE_OVERLOADING)
DOMHTMLInputElementFormPropertyInfo ,
#endif
#if defined(ENABLE_OVERLOADING)
dOMHTMLInputElementForm ,
#endif
getDOMHTMLInputElementForm ,
#if defined(ENABLE_OVERLOADING)
DOMHTMLInputElementHeightPropertyInfo ,
#endif
constructDOMHTMLInputElementHeight ,
#if defined(ENABLE_OVERLOADING)
dOMHTMLInputElementHeight ,
#endif
getDOMHTMLInputElementHeight ,
setDOMHTMLInputElementHeight ,
#if defined(ENABLE_OVERLOADING)
DOMHTMLInputElementIndeterminatePropertyInfo,
#endif
constructDOMHTMLInputElementIndeterminate,
#if defined(ENABLE_OVERLOADING)
dOMHTMLInputElementIndeterminate ,
#endif
getDOMHTMLInputElementIndeterminate ,
setDOMHTMLInputElementIndeterminate ,
#if defined(ENABLE_OVERLOADING)
DOMHTMLInputElementMaxLengthPropertyInfo,
#endif
constructDOMHTMLInputElementMaxLength ,
#if defined(ENABLE_OVERLOADING)
dOMHTMLInputElementMaxLength ,
#endif
getDOMHTMLInputElementMaxLength ,
setDOMHTMLInputElementMaxLength ,
#if defined(ENABLE_OVERLOADING)
DOMHTMLInputElementMultiplePropertyInfo ,
#endif
constructDOMHTMLInputElementMultiple ,
#if defined(ENABLE_OVERLOADING)
dOMHTMLInputElementMultiple ,
#endif
getDOMHTMLInputElementMultiple ,
setDOMHTMLInputElementMultiple ,
#if defined(ENABLE_OVERLOADING)
DOMHTMLInputElementNamePropertyInfo ,
#endif
constructDOMHTMLInputElementName ,
#if defined(ENABLE_OVERLOADING)
dOMHTMLInputElementName ,
#endif
getDOMHTMLInputElementName ,
setDOMHTMLInputElementName ,
#if defined(ENABLE_OVERLOADING)
DOMHTMLInputElementReadOnlyPropertyInfo ,
#endif
constructDOMHTMLInputElementReadOnly ,
#if defined(ENABLE_OVERLOADING)
dOMHTMLInputElementReadOnly ,
#endif
getDOMHTMLInputElementReadOnly ,
setDOMHTMLInputElementReadOnly ,
#if defined(ENABLE_OVERLOADING)
DOMHTMLInputElementSizePropertyInfo ,
#endif
constructDOMHTMLInputElementSize ,
#if defined(ENABLE_OVERLOADING)
dOMHTMLInputElementSize ,
#endif
getDOMHTMLInputElementSize ,
setDOMHTMLInputElementSize ,
#if defined(ENABLE_OVERLOADING)
DOMHTMLInputElementSrcPropertyInfo ,
#endif
constructDOMHTMLInputElementSrc ,
#if defined(ENABLE_OVERLOADING)
dOMHTMLInputElementSrc ,
#endif
getDOMHTMLInputElementSrc ,
setDOMHTMLInputElementSrc ,
#if defined(ENABLE_OVERLOADING)
DOMHTMLInputElementTypePropertyInfo ,
#endif
clearDOMHTMLInputElementType ,
constructDOMHTMLInputElementType ,
#if defined(ENABLE_OVERLOADING)
dOMHTMLInputElementType ,
#endif
getDOMHTMLInputElementType ,
setDOMHTMLInputElementType ,
#if defined(ENABLE_OVERLOADING)
DOMHTMLInputElementUseMapPropertyInfo ,
#endif
constructDOMHTMLInputElementUseMap ,
#if defined(ENABLE_OVERLOADING)
dOMHTMLInputElementUseMap ,
#endif
getDOMHTMLInputElementUseMap ,
setDOMHTMLInputElementUseMap ,
#if defined(ENABLE_OVERLOADING)
DOMHTMLInputElementValuePropertyInfo ,
#endif
constructDOMHTMLInputElementValue ,
#if defined(ENABLE_OVERLOADING)
dOMHTMLInputElementValue ,
#endif
getDOMHTMLInputElementValue ,
setDOMHTMLInputElementValue ,
#if defined(ENABLE_OVERLOADING)
DOMHTMLInputElementWidthPropertyInfo ,
#endif
constructDOMHTMLInputElementWidth ,
#if defined(ENABLE_OVERLOADING)
dOMHTMLInputElementWidth ,
#endif
getDOMHTMLInputElementWidth ,
setDOMHTMLInputElementWidth ,
#if defined(ENABLE_OVERLOADING)
DOMHTMLInputElementWillValidatePropertyInfo,
#endif
#if defined(ENABLE_OVERLOADING)
dOMHTMLInputElementWillValidate ,
#endif
getDOMHTMLInputElementWillValidate ,
) where
import Data.GI.Base.ShortPrelude
import qualified Data.GI.Base.ShortPrelude as SP
import qualified Data.GI.Base.Overloading as O
import qualified Prelude as P
import qualified Data.GI.Base.Attributes as GI.Attributes
import qualified Data.GI.Base.BasicTypes as B.Types
import qualified Data.GI.Base.ManagedPtr as B.ManagedPtr
import qualified Data.GI.Base.GArray as B.GArray
import qualified Data.GI.Base.GClosure as B.GClosure
import qualified Data.GI.Base.GError as B.GError
import qualified Data.GI.Base.GHashTable as B.GHT
import qualified Data.GI.Base.GVariant as B.GVariant
import qualified Data.GI.Base.GValue as B.GValue
import qualified Data.GI.Base.GParamSpec as B.GParamSpec
import qualified Data.GI.Base.CallStack as B.CallStack
import qualified Data.GI.Base.Properties as B.Properties
import qualified Data.GI.Base.Signals as B.Signals
import qualified Control.Monad.IO.Class as MIO
import qualified Data.Coerce as Coerce
import qualified Data.Text as T
import qualified Data.ByteString.Char8 as B
import qualified Data.Map as Map
import qualified Foreign.Ptr as FP
import qualified GHC.OverloadedLabels as OL
import qualified GHC.Records as R
import qualified GI.GObject.Objects.Object as GObject.Object
import {-# SOURCE #-} qualified GI.WebKit2WebExtension.Interfaces.DOMEventTarget as WebKit2WebExtension.DOMEventTarget
import {-# SOURCE #-} qualified GI.WebKit2WebExtension.Objects.DOMElement as WebKit2WebExtension.DOMElement
import {-# SOURCE #-} qualified GI.WebKit2WebExtension.Objects.DOMFileList as WebKit2WebExtension.DOMFileList
import {-# SOURCE #-} qualified GI.WebKit2WebExtension.Objects.DOMHTMLElement as WebKit2WebExtension.DOMHTMLElement
import {-# SOURCE #-} qualified GI.WebKit2WebExtension.Objects.DOMHTMLFormElement as WebKit2WebExtension.DOMHTMLFormElement
import {-# SOURCE #-} qualified GI.WebKit2WebExtension.Objects.DOMNode as WebKit2WebExtension.DOMNode
import {-# SOURCE #-} qualified GI.WebKit2WebExtension.Objects.DOMObject as WebKit2WebExtension.DOMObject
newtype DOMHTMLInputElement = DOMHTMLInputElement (SP.ManagedPtr DOMHTMLInputElement)
deriving (DOMHTMLInputElement -> DOMHTMLInputElement -> Bool
(DOMHTMLInputElement -> DOMHTMLInputElement -> Bool)
-> (DOMHTMLInputElement -> DOMHTMLInputElement -> Bool)
-> Eq DOMHTMLInputElement
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
$c== :: DOMHTMLInputElement -> DOMHTMLInputElement -> Bool
== :: DOMHTMLInputElement -> DOMHTMLInputElement -> Bool
$c/= :: DOMHTMLInputElement -> DOMHTMLInputElement -> Bool
/= :: DOMHTMLInputElement -> DOMHTMLInputElement -> Bool
Eq)
instance SP.ManagedPtrNewtype DOMHTMLInputElement where
toManagedPtr :: DOMHTMLInputElement -> ManagedPtr DOMHTMLInputElement
toManagedPtr (DOMHTMLInputElement ManagedPtr DOMHTMLInputElement
p) = ManagedPtr DOMHTMLInputElement
p
foreign import ccall "webkit_dom_html_input_element_get_type"
c_webkit_dom_html_input_element_get_type :: IO B.Types.GType
instance B.Types.TypedObject DOMHTMLInputElement where
glibType :: IO GType
glibType = IO GType
c_webkit_dom_html_input_element_get_type
instance B.Types.GObject DOMHTMLInputElement
class (SP.GObject o, O.IsDescendantOf DOMHTMLInputElement o) => IsDOMHTMLInputElement o
instance (SP.GObject o, O.IsDescendantOf DOMHTMLInputElement o) => IsDOMHTMLInputElement o
instance O.HasParentTypes DOMHTMLInputElement
type instance O.ParentTypes DOMHTMLInputElement = '[WebKit2WebExtension.DOMHTMLElement.DOMHTMLElement, WebKit2WebExtension.DOMElement.DOMElement, WebKit2WebExtension.DOMNode.DOMNode, WebKit2WebExtension.DOMObject.DOMObject, GObject.Object.Object, WebKit2WebExtension.DOMEventTarget.DOMEventTarget]
toDOMHTMLInputElement :: (MIO.MonadIO m, IsDOMHTMLInputElement o) => o -> m DOMHTMLInputElement
toDOMHTMLInputElement :: forall (m :: * -> *) o.
(MonadIO m, IsDOMHTMLInputElement o) =>
o -> m DOMHTMLInputElement
toDOMHTMLInputElement = IO DOMHTMLInputElement -> m DOMHTMLInputElement
forall a. IO a -> m a
forall (m :: * -> *) a. MonadIO m => IO a -> m a
MIO.liftIO (IO DOMHTMLInputElement -> m DOMHTMLInputElement)
-> (o -> IO DOMHTMLInputElement) -> o -> m DOMHTMLInputElement
forall b c a. (b -> c) -> (a -> b) -> a -> c
. (ManagedPtr DOMHTMLInputElement -> DOMHTMLInputElement)
-> o -> IO DOMHTMLInputElement
forall o o'.
(HasCallStack, ManagedPtrNewtype o, TypedObject o,
ManagedPtrNewtype o', TypedObject o') =>
(ManagedPtr o' -> o') -> o -> IO o'
B.ManagedPtr.unsafeCastTo ManagedPtr DOMHTMLInputElement -> DOMHTMLInputElement
DOMHTMLInputElement
instance B.GValue.IsGValue (Maybe DOMHTMLInputElement) where
gvalueGType_ :: IO GType
gvalueGType_ = IO GType
c_webkit_dom_html_input_element_get_type
gvalueSet_ :: Ptr GValue -> Maybe DOMHTMLInputElement -> IO ()
gvalueSet_ Ptr GValue
gv Maybe DOMHTMLInputElement
P.Nothing = Ptr GValue -> Ptr DOMHTMLInputElement -> IO ()
forall a. GObject a => Ptr GValue -> Ptr a -> IO ()
B.GValue.set_object Ptr GValue
gv (Ptr DOMHTMLInputElement
forall a. Ptr a
FP.nullPtr :: FP.Ptr DOMHTMLInputElement)
gvalueSet_ Ptr GValue
gv (P.Just DOMHTMLInputElement
obj) = DOMHTMLInputElement -> (Ptr DOMHTMLInputElement -> IO ()) -> IO ()
forall a c.
(HasCallStack, ManagedPtrNewtype a) =>
a -> (Ptr a -> IO c) -> IO c
B.ManagedPtr.withManagedPtr DOMHTMLInputElement
obj (Ptr GValue -> Ptr DOMHTMLInputElement -> IO ()
forall a. GObject a => Ptr GValue -> Ptr a -> IO ()
B.GValue.set_object Ptr GValue
gv)
gvalueGet_ :: Ptr GValue -> IO (Maybe DOMHTMLInputElement)
gvalueGet_ Ptr GValue
gv = do
Ptr DOMHTMLInputElement
ptr <- Ptr GValue -> IO (Ptr DOMHTMLInputElement)
forall a. GObject a => Ptr GValue -> IO (Ptr a)
B.GValue.get_object Ptr GValue
gv :: IO (FP.Ptr DOMHTMLInputElement)
if Ptr DOMHTMLInputElement
ptr Ptr DOMHTMLInputElement -> Ptr DOMHTMLInputElement -> Bool
forall a. Eq a => a -> a -> Bool
/= Ptr DOMHTMLInputElement
forall a. Ptr a
FP.nullPtr
then DOMHTMLInputElement -> Maybe DOMHTMLInputElement
forall a. a -> Maybe a
P.Just (DOMHTMLInputElement -> Maybe DOMHTMLInputElement)
-> IO DOMHTMLInputElement -> IO (Maybe DOMHTMLInputElement)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
<$> (ManagedPtr DOMHTMLInputElement -> DOMHTMLInputElement)
-> Ptr DOMHTMLInputElement -> IO DOMHTMLInputElement
forall a b.
(HasCallStack, GObject a, GObject b) =>
(ManagedPtr a -> a) -> Ptr b -> IO a
B.ManagedPtr.newObject ManagedPtr DOMHTMLInputElement -> DOMHTMLInputElement
DOMHTMLInputElement Ptr DOMHTMLInputElement
ptr
else Maybe DOMHTMLInputElement -> IO (Maybe DOMHTMLInputElement)
forall a. a -> IO a
forall (m :: * -> *) a. Monad m => a -> m a
return Maybe DOMHTMLInputElement
forall a. Maybe a
P.Nothing
#if defined(ENABLE_OVERLOADING)
type family ResolveDOMHTMLInputElementMethod (t :: Symbol) (o :: *) :: * where
ResolveDOMHTMLInputElementMethod "addEventListener" o = WebKit2WebExtension.DOMEventTarget.DOMEventTargetAddEventListenerMethodInfo
ResolveDOMHTMLInputElementMethod "appendChild" o = WebKit2WebExtension.DOMNode.DOMNodeAppendChildMethodInfo
ResolveDOMHTMLInputElementMethod "bindProperty" o = GObject.Object.ObjectBindPropertyMethodInfo
ResolveDOMHTMLInputElementMethod "bindPropertyFull" o = GObject.Object.ObjectBindPropertyFullMethodInfo
ResolveDOMHTMLInputElementMethod "blur" o = WebKit2WebExtension.DOMElement.DOMElementBlurMethodInfo
ResolveDOMHTMLInputElementMethod "click" o = WebKit2WebExtension.DOMHTMLElement.DOMHTMLElementClickMethodInfo
ResolveDOMHTMLInputElementMethod "cloneNodeWithError" o = WebKit2WebExtension.DOMNode.DOMNodeCloneNodeWithErrorMethodInfo
ResolveDOMHTMLInputElementMethod "closest" o = WebKit2WebExtension.DOMElement.DOMElementClosestMethodInfo
ResolveDOMHTMLInputElementMethod "compareDocumentPosition" o = WebKit2WebExtension.DOMNode.DOMNodeCompareDocumentPositionMethodInfo
ResolveDOMHTMLInputElementMethod "contains" o = WebKit2WebExtension.DOMNode.DOMNodeContainsMethodInfo
ResolveDOMHTMLInputElementMethod "dispatchEvent" o = WebKit2WebExtension.DOMEventTarget.DOMEventTargetDispatchEventMethodInfo
ResolveDOMHTMLInputElementMethod "focus" o = WebKit2WebExtension.DOMElement.DOMElementFocusMethodInfo
ResolveDOMHTMLInputElementMethod "forceFloating" o = GObject.Object.ObjectForceFloatingMethodInfo
ResolveDOMHTMLInputElementMethod "freezeNotify" o = GObject.Object.ObjectFreezeNotifyMethodInfo
ResolveDOMHTMLInputElementMethod "getv" o = GObject.Object.ObjectGetvMethodInfo
ResolveDOMHTMLInputElementMethod "hasAttribute" o = WebKit2WebExtension.DOMElement.DOMElementHasAttributeMethodInfo
ResolveDOMHTMLInputElementMethod "hasAttributeNs" o = WebKit2WebExtension.DOMElement.DOMElementHasAttributeNsMethodInfo
ResolveDOMHTMLInputElementMethod "hasAttributes" o = WebKit2WebExtension.DOMElement.DOMElementHasAttributesMethodInfo
ResolveDOMHTMLInputElementMethod "hasChildNodes" o = WebKit2WebExtension.DOMNode.DOMNodeHasChildNodesMethodInfo
ResolveDOMHTMLInputElementMethod "htmlInputElementGetAutoFilled" o = WebKit2WebExtension.DOMElement.DOMElementHtmlInputElementGetAutoFilledMethodInfo
ResolveDOMHTMLInputElementMethod "htmlInputElementIsUserEdited" o = WebKit2WebExtension.DOMElement.DOMElementHtmlInputElementIsUserEditedMethodInfo
ResolveDOMHTMLInputElementMethod "htmlInputElementSetAutoFilled" o = WebKit2WebExtension.DOMElement.DOMElementHtmlInputElementSetAutoFilledMethodInfo
ResolveDOMHTMLInputElementMethod "htmlInputElementSetEditingValue" o = WebKit2WebExtension.DOMElement.DOMElementHtmlInputElementSetEditingValueMethodInfo
ResolveDOMHTMLInputElementMethod "insertAdjacentElement" o = WebKit2WebExtension.DOMElement.DOMElementInsertAdjacentElementMethodInfo
ResolveDOMHTMLInputElementMethod "insertAdjacentHtml" o = WebKit2WebExtension.DOMElement.DOMElementInsertAdjacentHtmlMethodInfo
ResolveDOMHTMLInputElementMethod "insertAdjacentText" o = WebKit2WebExtension.DOMElement.DOMElementInsertAdjacentTextMethodInfo
ResolveDOMHTMLInputElementMethod "insertBefore" o = WebKit2WebExtension.DOMNode.DOMNodeInsertBeforeMethodInfo
ResolveDOMHTMLInputElementMethod "isDefaultNamespace" o = WebKit2WebExtension.DOMNode.DOMNodeIsDefaultNamespaceMethodInfo
ResolveDOMHTMLInputElementMethod "isEdited" o = DOMHTMLInputElementIsEditedMethodInfo
ResolveDOMHTMLInputElementMethod "isEqualNode" o = WebKit2WebExtension.DOMNode.DOMNodeIsEqualNodeMethodInfo
ResolveDOMHTMLInputElementMethod "isFloating" o = GObject.Object.ObjectIsFloatingMethodInfo
ResolveDOMHTMLInputElementMethod "isSameNode" o = WebKit2WebExtension.DOMNode.DOMNodeIsSameNodeMethodInfo
ResolveDOMHTMLInputElementMethod "isSupported" o = WebKit2WebExtension.DOMNode.DOMNodeIsSupportedMethodInfo
ResolveDOMHTMLInputElementMethod "lookupNamespaceUri" o = WebKit2WebExtension.DOMNode.DOMNodeLookupNamespaceUriMethodInfo
ResolveDOMHTMLInputElementMethod "lookupPrefix" o = WebKit2WebExtension.DOMNode.DOMNodeLookupPrefixMethodInfo
ResolveDOMHTMLInputElementMethod "matches" o = WebKit2WebExtension.DOMElement.DOMElementMatchesMethodInfo
ResolveDOMHTMLInputElementMethod "normalize" o = WebKit2WebExtension.DOMNode.DOMNodeNormalizeMethodInfo
ResolveDOMHTMLInputElementMethod "notify" o = GObject.Object.ObjectNotifyMethodInfo
ResolveDOMHTMLInputElementMethod "notifyByPspec" o = GObject.Object.ObjectNotifyByPspecMethodInfo
ResolveDOMHTMLInputElementMethod "querySelector" o = WebKit2WebExtension.DOMElement.DOMElementQuerySelectorMethodInfo
ResolveDOMHTMLInputElementMethod "querySelectorAll" o = WebKit2WebExtension.DOMElement.DOMElementQuerySelectorAllMethodInfo
ResolveDOMHTMLInputElementMethod "ref" o = GObject.Object.ObjectRefMethodInfo
ResolveDOMHTMLInputElementMethod "refSink" o = GObject.Object.ObjectRefSinkMethodInfo
ResolveDOMHTMLInputElementMethod "remove" o = WebKit2WebExtension.DOMElement.DOMElementRemoveMethodInfo
ResolveDOMHTMLInputElementMethod "removeAttribute" o = WebKit2WebExtension.DOMElement.DOMElementRemoveAttributeMethodInfo
ResolveDOMHTMLInputElementMethod "removeAttributeNode" o = WebKit2WebExtension.DOMElement.DOMElementRemoveAttributeNodeMethodInfo
ResolveDOMHTMLInputElementMethod "removeAttributeNs" o = WebKit2WebExtension.DOMElement.DOMElementRemoveAttributeNsMethodInfo
ResolveDOMHTMLInputElementMethod "removeChild" o = WebKit2WebExtension.DOMNode.DOMNodeRemoveChildMethodInfo
ResolveDOMHTMLInputElementMethod "removeEventListener" o = WebKit2WebExtension.DOMEventTarget.DOMEventTargetRemoveEventListenerMethodInfo
ResolveDOMHTMLInputElementMethod "replaceChild" o = WebKit2WebExtension.DOMNode.DOMNodeReplaceChildMethodInfo
ResolveDOMHTMLInputElementMethod "requestPointerLock" o = WebKit2WebExtension.DOMElement.DOMElementRequestPointerLockMethodInfo
ResolveDOMHTMLInputElementMethod "runDispose" o = GObject.Object.ObjectRunDisposeMethodInfo
ResolveDOMHTMLInputElementMethod "scrollByLines" o = WebKit2WebExtension.DOMElement.DOMElementScrollByLinesMethodInfo
ResolveDOMHTMLInputElementMethod "scrollByPages" o = WebKit2WebExtension.DOMElement.DOMElementScrollByPagesMethodInfo
ResolveDOMHTMLInputElementMethod "scrollIntoView" o = WebKit2WebExtension.DOMElement.DOMElementScrollIntoViewMethodInfo
ResolveDOMHTMLInputElementMethod "scrollIntoViewIfNeeded" o = WebKit2WebExtension.DOMElement.DOMElementScrollIntoViewIfNeededMethodInfo
ResolveDOMHTMLInputElementMethod "select" o = DOMHTMLInputElementSelectMethodInfo
ResolveDOMHTMLInputElementMethod "stealData" o = GObject.Object.ObjectStealDataMethodInfo
ResolveDOMHTMLInputElementMethod "stealQdata" o = GObject.Object.ObjectStealQdataMethodInfo
ResolveDOMHTMLInputElementMethod "thawNotify" o = GObject.Object.ObjectThawNotifyMethodInfo
ResolveDOMHTMLInputElementMethod "unref" o = GObject.Object.ObjectUnrefMethodInfo
ResolveDOMHTMLInputElementMethod "watchClosure" o = GObject.Object.ObjectWatchClosureMethodInfo
ResolveDOMHTMLInputElementMethod "webkitMatchesSelector" o = WebKit2WebExtension.DOMElement.DOMElementWebkitMatchesSelectorMethodInfo
ResolveDOMHTMLInputElementMethod "webkitRequestFullscreen" o = WebKit2WebExtension.DOMElement.DOMElementWebkitRequestFullscreenMethodInfo
ResolveDOMHTMLInputElementMethod "getAccept" o = DOMHTMLInputElementGetAcceptMethodInfo
ResolveDOMHTMLInputElementMethod "getAccessKey" o = WebKit2WebExtension.DOMHTMLElement.DOMHTMLElementGetAccessKeyMethodInfo
ResolveDOMHTMLInputElementMethod "getAlign" o = DOMHTMLInputElementGetAlignMethodInfo
ResolveDOMHTMLInputElementMethod "getAlt" o = DOMHTMLInputElementGetAltMethodInfo
ResolveDOMHTMLInputElementMethod "getAttribute" o = WebKit2WebExtension.DOMElement.DOMElementGetAttributeMethodInfo
ResolveDOMHTMLInputElementMethod "getAttributeNode" o = WebKit2WebExtension.DOMElement.DOMElementGetAttributeNodeMethodInfo
ResolveDOMHTMLInputElementMethod "getAttributeNodeNs" o = WebKit2WebExtension.DOMElement.DOMElementGetAttributeNodeNsMethodInfo
ResolveDOMHTMLInputElementMethod "getAttributeNs" o = WebKit2WebExtension.DOMElement.DOMElementGetAttributeNsMethodInfo
ResolveDOMHTMLInputElementMethod "getAttributes" o = WebKit2WebExtension.DOMElement.DOMElementGetAttributesMethodInfo
ResolveDOMHTMLInputElementMethod "getAutoFilled" o = DOMHTMLInputElementGetAutoFilledMethodInfo
ResolveDOMHTMLInputElementMethod "getAutofocus" o = DOMHTMLInputElementGetAutofocusMethodInfo
ResolveDOMHTMLInputElementMethod "getBaseUri" o = WebKit2WebExtension.DOMNode.DOMNodeGetBaseUriMethodInfo
ResolveDOMHTMLInputElementMethod "getBoundingClientRect" o = WebKit2WebExtension.DOMElement.DOMElementGetBoundingClientRectMethodInfo
ResolveDOMHTMLInputElementMethod "getCapture" o = DOMHTMLInputElementGetCaptureMethodInfo
ResolveDOMHTMLInputElementMethod "getCaptureType" o = DOMHTMLInputElementGetCaptureTypeMethodInfo
ResolveDOMHTMLInputElementMethod "getChecked" o = DOMHTMLInputElementGetCheckedMethodInfo
ResolveDOMHTMLInputElementMethod "getChildElementCount" o = WebKit2WebExtension.DOMElement.DOMElementGetChildElementCountMethodInfo
ResolveDOMHTMLInputElementMethod "getChildNodes" o = WebKit2WebExtension.DOMNode.DOMNodeGetChildNodesMethodInfo
ResolveDOMHTMLInputElementMethod "getChildren" o = WebKit2WebExtension.DOMHTMLElement.DOMHTMLElementGetChildrenMethodInfo
ResolveDOMHTMLInputElementMethod "getClassList" o = WebKit2WebExtension.DOMElement.DOMElementGetClassListMethodInfo
ResolveDOMHTMLInputElementMethod "getClassName" o = WebKit2WebExtension.DOMElement.DOMElementGetClassNameMethodInfo
ResolveDOMHTMLInputElementMethod "getClientHeight" o = WebKit2WebExtension.DOMElement.DOMElementGetClientHeightMethodInfo
ResolveDOMHTMLInputElementMethod "getClientLeft" o = WebKit2WebExtension.DOMElement.DOMElementGetClientLeftMethodInfo
ResolveDOMHTMLInputElementMethod "getClientRects" o = WebKit2WebExtension.DOMElement.DOMElementGetClientRectsMethodInfo
ResolveDOMHTMLInputElementMethod "getClientTop" o = WebKit2WebExtension.DOMElement.DOMElementGetClientTopMethodInfo
ResolveDOMHTMLInputElementMethod "getClientWidth" o = WebKit2WebExtension.DOMElement.DOMElementGetClientWidthMethodInfo
ResolveDOMHTMLInputElementMethod "getContentEditable" o = WebKit2WebExtension.DOMHTMLElement.DOMHTMLElementGetContentEditableMethodInfo
ResolveDOMHTMLInputElementMethod "getData" o = GObject.Object.ObjectGetDataMethodInfo
ResolveDOMHTMLInputElementMethod "getDefaultChecked" o = DOMHTMLInputElementGetDefaultCheckedMethodInfo
ResolveDOMHTMLInputElementMethod "getDefaultValue" o = DOMHTMLInputElementGetDefaultValueMethodInfo
ResolveDOMHTMLInputElementMethod "getDir" o = WebKit2WebExtension.DOMHTMLElement.DOMHTMLElementGetDirMethodInfo
ResolveDOMHTMLInputElementMethod "getDisabled" o = DOMHTMLInputElementGetDisabledMethodInfo
ResolveDOMHTMLInputElementMethod "getDraggable" o = WebKit2WebExtension.DOMHTMLElement.DOMHTMLElementGetDraggableMethodInfo
ResolveDOMHTMLInputElementMethod "getElementsByClassName" o = WebKit2WebExtension.DOMElement.DOMElementGetElementsByClassNameMethodInfo
ResolveDOMHTMLInputElementMethod "getElementsByClassNameAsHtmlCollection" o = WebKit2WebExtension.DOMElement.DOMElementGetElementsByClassNameAsHtmlCollectionMethodInfo
ResolveDOMHTMLInputElementMethod "getElementsByTagName" o = WebKit2WebExtension.DOMElement.DOMElementGetElementsByTagNameMethodInfo
ResolveDOMHTMLInputElementMethod "getElementsByTagNameAsHtmlCollection" o = WebKit2WebExtension.DOMElement.DOMElementGetElementsByTagNameAsHtmlCollectionMethodInfo
ResolveDOMHTMLInputElementMethod "getElementsByTagNameNs" o = WebKit2WebExtension.DOMElement.DOMElementGetElementsByTagNameNsMethodInfo
ResolveDOMHTMLInputElementMethod "getElementsByTagNameNsAsHtmlCollection" o = WebKit2WebExtension.DOMElement.DOMElementGetElementsByTagNameNsAsHtmlCollectionMethodInfo
ResolveDOMHTMLInputElementMethod "getFiles" o = DOMHTMLInputElementGetFilesMethodInfo
ResolveDOMHTMLInputElementMethod "getFirstChild" o = WebKit2WebExtension.DOMNode.DOMNodeGetFirstChildMethodInfo
ResolveDOMHTMLInputElementMethod "getFirstElementChild" o = WebKit2WebExtension.DOMElement.DOMElementGetFirstElementChildMethodInfo
ResolveDOMHTMLInputElementMethod "getForm" o = DOMHTMLInputElementGetFormMethodInfo
ResolveDOMHTMLInputElementMethod "getHeight" o = DOMHTMLInputElementGetHeightMethodInfo
ResolveDOMHTMLInputElementMethod "getHidden" o = WebKit2WebExtension.DOMHTMLElement.DOMHTMLElementGetHiddenMethodInfo
ResolveDOMHTMLInputElementMethod "getId" o = WebKit2WebExtension.DOMElement.DOMElementGetIdMethodInfo
ResolveDOMHTMLInputElementMethod "getIndeterminate" o = DOMHTMLInputElementGetIndeterminateMethodInfo
ResolveDOMHTMLInputElementMethod "getInnerHtml" o = WebKit2WebExtension.DOMHTMLElement.DOMHTMLElementGetInnerHtmlMethodInfo
ResolveDOMHTMLInputElementMethod "getInnerText" o = WebKit2WebExtension.DOMHTMLElement.DOMHTMLElementGetInnerTextMethodInfo
ResolveDOMHTMLInputElementMethod "getInputType" o = DOMHTMLInputElementGetInputTypeMethodInfo
ResolveDOMHTMLInputElementMethod "getIsContentEditable" o = WebKit2WebExtension.DOMHTMLElement.DOMHTMLElementGetIsContentEditableMethodInfo
ResolveDOMHTMLInputElementMethod "getLang" o = WebKit2WebExtension.DOMHTMLElement.DOMHTMLElementGetLangMethodInfo
ResolveDOMHTMLInputElementMethod "getLastChild" o = WebKit2WebExtension.DOMNode.DOMNodeGetLastChildMethodInfo
ResolveDOMHTMLInputElementMethod "getLastElementChild" o = WebKit2WebExtension.DOMElement.DOMElementGetLastElementChildMethodInfo
ResolveDOMHTMLInputElementMethod "getLocalName" o = WebKit2WebExtension.DOMElement.DOMElementGetLocalNameMethodInfo
ResolveDOMHTMLInputElementMethod "getMaxLength" o = DOMHTMLInputElementGetMaxLengthMethodInfo
ResolveDOMHTMLInputElementMethod "getMultiple" o = DOMHTMLInputElementGetMultipleMethodInfo
ResolveDOMHTMLInputElementMethod "getName" o = DOMHTMLInputElementGetNameMethodInfo
ResolveDOMHTMLInputElementMethod "getNamespaceUri" o = WebKit2WebExtension.DOMElement.DOMElementGetNamespaceUriMethodInfo
ResolveDOMHTMLInputElementMethod "getNextElementSibling" o = WebKit2WebExtension.DOMElement.DOMElementGetNextElementSiblingMethodInfo
ResolveDOMHTMLInputElementMethod "getNextSibling" o = WebKit2WebExtension.DOMNode.DOMNodeGetNextSiblingMethodInfo
ResolveDOMHTMLInputElementMethod "getNodeName" o = WebKit2WebExtension.DOMNode.DOMNodeGetNodeNameMethodInfo
ResolveDOMHTMLInputElementMethod "getNodeType" o = WebKit2WebExtension.DOMNode.DOMNodeGetNodeTypeMethodInfo
ResolveDOMHTMLInputElementMethod "getNodeValue" o = WebKit2WebExtension.DOMNode.DOMNodeGetNodeValueMethodInfo
ResolveDOMHTMLInputElementMethod "getOffsetHeight" o = WebKit2WebExtension.DOMElement.DOMElementGetOffsetHeightMethodInfo
ResolveDOMHTMLInputElementMethod "getOffsetLeft" o = WebKit2WebExtension.DOMElement.DOMElementGetOffsetLeftMethodInfo
ResolveDOMHTMLInputElementMethod "getOffsetParent" o = WebKit2WebExtension.DOMElement.DOMElementGetOffsetParentMethodInfo
ResolveDOMHTMLInputElementMethod "getOffsetTop" o = WebKit2WebExtension.DOMElement.DOMElementGetOffsetTopMethodInfo
ResolveDOMHTMLInputElementMethod "getOffsetWidth" o = WebKit2WebExtension.DOMElement.DOMElementGetOffsetWidthMethodInfo
ResolveDOMHTMLInputElementMethod "getOuterHtml" o = WebKit2WebExtension.DOMHTMLElement.DOMHTMLElementGetOuterHtmlMethodInfo
ResolveDOMHTMLInputElementMethod "getOuterText" o = WebKit2WebExtension.DOMHTMLElement.DOMHTMLElementGetOuterTextMethodInfo
ResolveDOMHTMLInputElementMethod "getOwnerDocument" o = WebKit2WebExtension.DOMNode.DOMNodeGetOwnerDocumentMethodInfo
ResolveDOMHTMLInputElementMethod "getParentElement" o = WebKit2WebExtension.DOMNode.DOMNodeGetParentElementMethodInfo
ResolveDOMHTMLInputElementMethod "getParentNode" o = WebKit2WebExtension.DOMNode.DOMNodeGetParentNodeMethodInfo
ResolveDOMHTMLInputElementMethod "getPrefix" o = WebKit2WebExtension.DOMElement.DOMElementGetPrefixMethodInfo
ResolveDOMHTMLInputElementMethod "getPreviousElementSibling" o = WebKit2WebExtension.DOMElement.DOMElementGetPreviousElementSiblingMethodInfo
ResolveDOMHTMLInputElementMethod "getPreviousSibling" o = WebKit2WebExtension.DOMNode.DOMNodeGetPreviousSiblingMethodInfo
ResolveDOMHTMLInputElementMethod "getProperty" o = GObject.Object.ObjectGetPropertyMethodInfo
ResolveDOMHTMLInputElementMethod "getQdata" o = GObject.Object.ObjectGetQdataMethodInfo
ResolveDOMHTMLInputElementMethod "getReadOnly" o = DOMHTMLInputElementGetReadOnlyMethodInfo
ResolveDOMHTMLInputElementMethod "getScrollHeight" o = WebKit2WebExtension.DOMElement.DOMElementGetScrollHeightMethodInfo
ResolveDOMHTMLInputElementMethod "getScrollLeft" o = WebKit2WebExtension.DOMElement.DOMElementGetScrollLeftMethodInfo
ResolveDOMHTMLInputElementMethod "getScrollTop" o = WebKit2WebExtension.DOMElement.DOMElementGetScrollTopMethodInfo
ResolveDOMHTMLInputElementMethod "getScrollWidth" o = WebKit2WebExtension.DOMElement.DOMElementGetScrollWidthMethodInfo
ResolveDOMHTMLInputElementMethod "getSize" o = DOMHTMLInputElementGetSizeMethodInfo
ResolveDOMHTMLInputElementMethod "getSpellcheck" o = WebKit2WebExtension.DOMHTMLElement.DOMHTMLElementGetSpellcheckMethodInfo
ResolveDOMHTMLInputElementMethod "getSrc" o = DOMHTMLInputElementGetSrcMethodInfo
ResolveDOMHTMLInputElementMethod "getStyle" o = WebKit2WebExtension.DOMElement.DOMElementGetStyleMethodInfo
ResolveDOMHTMLInputElementMethod "getTabIndex" o = WebKit2WebExtension.DOMHTMLElement.DOMHTMLElementGetTabIndexMethodInfo
ResolveDOMHTMLInputElementMethod "getTagName" o = WebKit2WebExtension.DOMElement.DOMElementGetTagNameMethodInfo
ResolveDOMHTMLInputElementMethod "getTextContent" o = WebKit2WebExtension.DOMNode.DOMNodeGetTextContentMethodInfo
ResolveDOMHTMLInputElementMethod "getTitle" o = WebKit2WebExtension.DOMHTMLElement.DOMHTMLElementGetTitleMethodInfo
ResolveDOMHTMLInputElementMethod "getTranslate" o = WebKit2WebExtension.DOMHTMLElement.DOMHTMLElementGetTranslateMethodInfo
ResolveDOMHTMLInputElementMethod "getUseMap" o = DOMHTMLInputElementGetUseMapMethodInfo
ResolveDOMHTMLInputElementMethod "getValue" o = DOMHTMLInputElementGetValueMethodInfo
ResolveDOMHTMLInputElementMethod "getWebkitRegionOverset" o = WebKit2WebExtension.DOMElement.DOMElementGetWebkitRegionOversetMethodInfo
ResolveDOMHTMLInputElementMethod "getWebkitdropzone" o = WebKit2WebExtension.DOMHTMLElement.DOMHTMLElementGetWebkitdropzoneMethodInfo
ResolveDOMHTMLInputElementMethod "getWidth" o = DOMHTMLInputElementGetWidthMethodInfo
ResolveDOMHTMLInputElementMethod "getWillValidate" o = DOMHTMLInputElementGetWillValidateMethodInfo
ResolveDOMHTMLInputElementMethod "setAccept" o = DOMHTMLInputElementSetAcceptMethodInfo
ResolveDOMHTMLInputElementMethod "setAccessKey" o = WebKit2WebExtension.DOMHTMLElement.DOMHTMLElementSetAccessKeyMethodInfo
ResolveDOMHTMLInputElementMethod "setAlign" o = DOMHTMLInputElementSetAlignMethodInfo
ResolveDOMHTMLInputElementMethod "setAlt" o = DOMHTMLInputElementSetAltMethodInfo
ResolveDOMHTMLInputElementMethod "setAttribute" o = WebKit2WebExtension.DOMElement.DOMElementSetAttributeMethodInfo
ResolveDOMHTMLInputElementMethod "setAttributeNode" o = WebKit2WebExtension.DOMElement.DOMElementSetAttributeNodeMethodInfo
ResolveDOMHTMLInputElementMethod "setAttributeNodeNs" o = WebKit2WebExtension.DOMElement.DOMElementSetAttributeNodeNsMethodInfo
ResolveDOMHTMLInputElementMethod "setAttributeNs" o = WebKit2WebExtension.DOMElement.DOMElementSetAttributeNsMethodInfo
ResolveDOMHTMLInputElementMethod "setAutoFilled" o = DOMHTMLInputElementSetAutoFilledMethodInfo
ResolveDOMHTMLInputElementMethod "setAutofocus" o = DOMHTMLInputElementSetAutofocusMethodInfo
ResolveDOMHTMLInputElementMethod "setCaptureType" o = DOMHTMLInputElementSetCaptureTypeMethodInfo
ResolveDOMHTMLInputElementMethod "setChecked" o = DOMHTMLInputElementSetCheckedMethodInfo
ResolveDOMHTMLInputElementMethod "setClassName" o = WebKit2WebExtension.DOMElement.DOMElementSetClassNameMethodInfo
ResolveDOMHTMLInputElementMethod "setContentEditable" o = WebKit2WebExtension.DOMHTMLElement.DOMHTMLElementSetContentEditableMethodInfo
ResolveDOMHTMLInputElementMethod "setData" o = GObject.Object.ObjectSetDataMethodInfo
ResolveDOMHTMLInputElementMethod "setDataFull" o = GObject.Object.ObjectSetDataFullMethodInfo
ResolveDOMHTMLInputElementMethod "setDefaultChecked" o = DOMHTMLInputElementSetDefaultCheckedMethodInfo
ResolveDOMHTMLInputElementMethod "setDefaultValue" o = DOMHTMLInputElementSetDefaultValueMethodInfo
ResolveDOMHTMLInputElementMethod "setDir" o = WebKit2WebExtension.DOMHTMLElement.DOMHTMLElementSetDirMethodInfo
ResolveDOMHTMLInputElementMethod "setDisabled" o = DOMHTMLInputElementSetDisabledMethodInfo
ResolveDOMHTMLInputElementMethod "setDraggable" o = WebKit2WebExtension.DOMHTMLElement.DOMHTMLElementSetDraggableMethodInfo
ResolveDOMHTMLInputElementMethod "setEditingValue" o = DOMHTMLInputElementSetEditingValueMethodInfo
ResolveDOMHTMLInputElementMethod "setFiles" o = DOMHTMLInputElementSetFilesMethodInfo
ResolveDOMHTMLInputElementMethod "setHeight" o = DOMHTMLInputElementSetHeightMethodInfo
ResolveDOMHTMLInputElementMethod "setHidden" o = WebKit2WebExtension.DOMHTMLElement.DOMHTMLElementSetHiddenMethodInfo
ResolveDOMHTMLInputElementMethod "setId" o = WebKit2WebExtension.DOMElement.DOMElementSetIdMethodInfo
ResolveDOMHTMLInputElementMethod "setIndeterminate" o = DOMHTMLInputElementSetIndeterminateMethodInfo
ResolveDOMHTMLInputElementMethod "setInnerHtml" o = WebKit2WebExtension.DOMHTMLElement.DOMHTMLElementSetInnerHtmlMethodInfo
ResolveDOMHTMLInputElementMethod "setInnerText" o = WebKit2WebExtension.DOMHTMLElement.DOMHTMLElementSetInnerTextMethodInfo
ResolveDOMHTMLInputElementMethod "setInputType" o = DOMHTMLInputElementSetInputTypeMethodInfo
ResolveDOMHTMLInputElementMethod "setLang" o = WebKit2WebExtension.DOMHTMLElement.DOMHTMLElementSetLangMethodInfo
ResolveDOMHTMLInputElementMethod "setMaxLength" o = DOMHTMLInputElementSetMaxLengthMethodInfo
ResolveDOMHTMLInputElementMethod "setMultiple" o = DOMHTMLInputElementSetMultipleMethodInfo
ResolveDOMHTMLInputElementMethod "setName" o = DOMHTMLInputElementSetNameMethodInfo
ResolveDOMHTMLInputElementMethod "setNodeValue" o = WebKit2WebExtension.DOMNode.DOMNodeSetNodeValueMethodInfo
ResolveDOMHTMLInputElementMethod "setOuterHtml" o = WebKit2WebExtension.DOMHTMLElement.DOMHTMLElementSetOuterHtmlMethodInfo
ResolveDOMHTMLInputElementMethod "setOuterText" o = WebKit2WebExtension.DOMHTMLElement.DOMHTMLElementSetOuterTextMethodInfo
ResolveDOMHTMLInputElementMethod "setPrefix" o = WebKit2WebExtension.DOMNode.DOMNodeSetPrefixMethodInfo
ResolveDOMHTMLInputElementMethod "setProperty" o = GObject.Object.ObjectSetPropertyMethodInfo
ResolveDOMHTMLInputElementMethod "setReadOnly" o = DOMHTMLInputElementSetReadOnlyMethodInfo
ResolveDOMHTMLInputElementMethod "setScrollLeft" o = WebKit2WebExtension.DOMElement.DOMElementSetScrollLeftMethodInfo
ResolveDOMHTMLInputElementMethod "setScrollTop" o = WebKit2WebExtension.DOMElement.DOMElementSetScrollTopMethodInfo
ResolveDOMHTMLInputElementMethod "setSize" o = DOMHTMLInputElementSetSizeMethodInfo
ResolveDOMHTMLInputElementMethod "setSpellcheck" o = WebKit2WebExtension.DOMHTMLElement.DOMHTMLElementSetSpellcheckMethodInfo
ResolveDOMHTMLInputElementMethod "setSrc" o = DOMHTMLInputElementSetSrcMethodInfo
ResolveDOMHTMLInputElementMethod "setTabIndex" o = WebKit2WebExtension.DOMHTMLElement.DOMHTMLElementSetTabIndexMethodInfo
ResolveDOMHTMLInputElementMethod "setTextContent" o = WebKit2WebExtension.DOMNode.DOMNodeSetTextContentMethodInfo
ResolveDOMHTMLInputElementMethod "setTitle" o = WebKit2WebExtension.DOMHTMLElement.DOMHTMLElementSetTitleMethodInfo
ResolveDOMHTMLInputElementMethod "setTranslate" o = WebKit2WebExtension.DOMHTMLElement.DOMHTMLElementSetTranslateMethodInfo
ResolveDOMHTMLInputElementMethod "setUseMap" o = DOMHTMLInputElementSetUseMapMethodInfo
ResolveDOMHTMLInputElementMethod "setValue" o = DOMHTMLInputElementSetValueMethodInfo
ResolveDOMHTMLInputElementMethod "setWebkitdropzone" o = WebKit2WebExtension.DOMHTMLElement.DOMHTMLElementSetWebkitdropzoneMethodInfo
ResolveDOMHTMLInputElementMethod "setWidth" o = DOMHTMLInputElementSetWidthMethodInfo
ResolveDOMHTMLInputElementMethod l o = O.MethodResolutionFailed l o
instance (info ~ ResolveDOMHTMLInputElementMethod t DOMHTMLInputElement, O.OverloadedMethod info DOMHTMLInputElement p) => OL.IsLabel t (DOMHTMLInputElement -> p) where
#if MIN_VERSION_base(4,10,0)
fromLabel = O.overloadedMethod @info
#else
fromLabel _ = O.overloadedMethod @info
#endif
#if MIN_VERSION_base(4,13,0)
instance (info ~ ResolveDOMHTMLInputElementMethod t DOMHTMLInputElement, O.OverloadedMethod info DOMHTMLInputElement p, R.HasField t DOMHTMLInputElement p) => R.HasField t DOMHTMLInputElement p where
getField = O.overloadedMethod @info
#endif
instance (info ~ ResolveDOMHTMLInputElementMethod t DOMHTMLInputElement, O.OverloadedMethodInfo info DOMHTMLInputElement) => OL.IsLabel t (O.MethodProxy info DOMHTMLInputElement) where
#if MIN_VERSION_base(4,10,0)
fromLabel = O.MethodProxy
#else
fromLabel _ = O.MethodProxy
#endif
#endif
getDOMHTMLInputElementAccept :: (MonadIO m, IsDOMHTMLInputElement o) => o -> m (Maybe T.Text)
getDOMHTMLInputElementAccept :: forall (m :: * -> *) o.
(MonadIO m, IsDOMHTMLInputElement o) =>
o -> m (Maybe Text)
getDOMHTMLInputElementAccept o
obj = IO (Maybe Text) -> m (Maybe Text)
forall a. IO a -> m a
forall (m :: * -> *) a. MonadIO m => IO a -> m a
MIO.liftIO (IO (Maybe Text) -> m (Maybe Text))
-> IO (Maybe Text) -> m (Maybe Text)
forall a b. (a -> b) -> a -> b
$ o -> String -> IO (Maybe Text)
forall a. GObject a => a -> String -> IO (Maybe Text)
B.Properties.getObjectPropertyString o
obj String
"accept"
setDOMHTMLInputElementAccept :: (MonadIO m, IsDOMHTMLInputElement o) => o -> T.Text -> m ()
setDOMHTMLInputElementAccept :: forall (m :: * -> *) o.
(MonadIO m, IsDOMHTMLInputElement o) =>
o -> Text -> m ()
setDOMHTMLInputElementAccept o
obj Text
val = IO () -> m ()
forall a. IO a -> m a
forall (m :: * -> *) a. MonadIO m => IO a -> m a
MIO.liftIO (IO () -> m ()) -> IO () -> m ()
forall a b. (a -> b) -> a -> b
$ do
o -> String -> Maybe Text -> IO ()
forall a. GObject a => a -> String -> Maybe Text -> IO ()
B.Properties.setObjectPropertyString o
obj String
"accept" (Text -> Maybe Text
forall a. a -> Maybe a
Just Text
val)
constructDOMHTMLInputElementAccept :: (IsDOMHTMLInputElement o, MIO.MonadIO m) => T.Text -> m (GValueConstruct o)
constructDOMHTMLInputElementAccept :: forall o (m :: * -> *).
(IsDOMHTMLInputElement o, MonadIO m) =>
Text -> m (GValueConstruct o)
constructDOMHTMLInputElementAccept Text
val = IO (GValueConstruct o) -> m (GValueConstruct o)
forall a. IO a -> m a
forall (m :: * -> *) a. MonadIO m => IO a -> m a
MIO.liftIO (IO (GValueConstruct o) -> m (GValueConstruct o))
-> IO (GValueConstruct o) -> m (GValueConstruct o)
forall a b. (a -> b) -> a -> b
$ do
IO (GValueConstruct o) -> IO (GValueConstruct o)
forall a. IO a -> IO a
forall (m :: * -> *) a. MonadIO m => IO a -> m a
MIO.liftIO (IO (GValueConstruct o) -> IO (GValueConstruct o))
-> IO (GValueConstruct o) -> IO (GValueConstruct o)
forall a b. (a -> b) -> a -> b
$ String -> Maybe Text -> IO (GValueConstruct o)
forall o. String -> Maybe Text -> IO (GValueConstruct o)
B.Properties.constructObjectPropertyString String
"accept" (Text -> Maybe Text
forall a. a -> Maybe a
P.Just Text
val)
#if defined(ENABLE_OVERLOADING)
data DOMHTMLInputElementAcceptPropertyInfo
instance AttrInfo DOMHTMLInputElementAcceptPropertyInfo where
type AttrAllowedOps DOMHTMLInputElementAcceptPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]
type AttrBaseTypeConstraint DOMHTMLInputElementAcceptPropertyInfo = IsDOMHTMLInputElement
type AttrSetTypeConstraint DOMHTMLInputElementAcceptPropertyInfo = (~) T.Text
type AttrTransferTypeConstraint DOMHTMLInputElementAcceptPropertyInfo = (~) T.Text
type AttrTransferType DOMHTMLInputElementAcceptPropertyInfo = T.Text
type AttrGetType DOMHTMLInputElementAcceptPropertyInfo = (Maybe T.Text)
type AttrLabel DOMHTMLInputElementAcceptPropertyInfo = "accept"
type AttrOrigin DOMHTMLInputElementAcceptPropertyInfo = DOMHTMLInputElement
attrGet = getDOMHTMLInputElementAccept
attrSet = setDOMHTMLInputElementAccept
attrTransfer _ v = do
return v
attrConstruct = constructDOMHTMLInputElementAccept
attrClear = undefined
dbgAttrInfo = P.Just (O.ResolvedSymbolInfo {
O.resolvedSymbolName = "GI.WebKit2WebExtension.Objects.DOMHTMLInputElement.accept"
, O.resolvedSymbolURL = "https://hackage.haskell.org/package/gi-webkit2webextension-4.0.28/docs/GI-WebKit2WebExtension-Objects-DOMHTMLInputElement.html#g:attr:accept"
})
#endif
getDOMHTMLInputElementAlign :: (MonadIO m, IsDOMHTMLInputElement o) => o -> m (Maybe T.Text)
getDOMHTMLInputElementAlign :: forall (m :: * -> *) o.
(MonadIO m, IsDOMHTMLInputElement o) =>
o -> m (Maybe Text)
getDOMHTMLInputElementAlign o
obj = IO (Maybe Text) -> m (Maybe Text)
forall a. IO a -> m a
forall (m :: * -> *) a. MonadIO m => IO a -> m a
MIO.liftIO (IO (Maybe Text) -> m (Maybe Text))
-> IO (Maybe Text) -> m (Maybe Text)
forall a b. (a -> b) -> a -> b
$ o -> String -> IO (Maybe Text)
forall a. GObject a => a -> String -> IO (Maybe Text)
B.Properties.getObjectPropertyString o
obj String
"align"
setDOMHTMLInputElementAlign :: (MonadIO m, IsDOMHTMLInputElement o) => o -> T.Text -> m ()
setDOMHTMLInputElementAlign :: forall (m :: * -> *) o.
(MonadIO m, IsDOMHTMLInputElement o) =>
o -> Text -> m ()
setDOMHTMLInputElementAlign o
obj Text
val = IO () -> m ()
forall a. IO a -> m a
forall (m :: * -> *) a. MonadIO m => IO a -> m a
MIO.liftIO (IO () -> m ()) -> IO () -> m ()
forall a b. (a -> b) -> a -> b
$ do
o -> String -> Maybe Text -> IO ()
forall a. GObject a => a -> String -> Maybe Text -> IO ()
B.Properties.setObjectPropertyString o
obj String
"align" (Text -> Maybe Text
forall a. a -> Maybe a
Just Text
val)
constructDOMHTMLInputElementAlign :: (IsDOMHTMLInputElement o, MIO.MonadIO m) => T.Text -> m (GValueConstruct o)
constructDOMHTMLInputElementAlign :: forall o (m :: * -> *).
(IsDOMHTMLInputElement o, MonadIO m) =>
Text -> m (GValueConstruct o)
constructDOMHTMLInputElementAlign Text
val = IO (GValueConstruct o) -> m (GValueConstruct o)
forall a. IO a -> m a
forall (m :: * -> *) a. MonadIO m => IO a -> m a
MIO.liftIO (IO (GValueConstruct o) -> m (GValueConstruct o))
-> IO (GValueConstruct o) -> m (GValueConstruct o)
forall a b. (a -> b) -> a -> b
$ do
IO (GValueConstruct o) -> IO (GValueConstruct o)
forall a. IO a -> IO a
forall (m :: * -> *) a. MonadIO m => IO a -> m a
MIO.liftIO (IO (GValueConstruct o) -> IO (GValueConstruct o))
-> IO (GValueConstruct o) -> IO (GValueConstruct o)
forall a b. (a -> b) -> a -> b
$ String -> Maybe Text -> IO (GValueConstruct o)
forall o. String -> Maybe Text -> IO (GValueConstruct o)
B.Properties.constructObjectPropertyString String
"align" (Text -> Maybe Text
forall a. a -> Maybe a
P.Just Text
val)
#if defined(ENABLE_OVERLOADING)
data DOMHTMLInputElementAlignPropertyInfo
instance AttrInfo DOMHTMLInputElementAlignPropertyInfo where
type AttrAllowedOps DOMHTMLInputElementAlignPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]
type AttrBaseTypeConstraint DOMHTMLInputElementAlignPropertyInfo = IsDOMHTMLInputElement
type AttrSetTypeConstraint DOMHTMLInputElementAlignPropertyInfo = (~) T.Text
type AttrTransferTypeConstraint DOMHTMLInputElementAlignPropertyInfo = (~) T.Text
type AttrTransferType DOMHTMLInputElementAlignPropertyInfo = T.Text
type AttrGetType DOMHTMLInputElementAlignPropertyInfo = (Maybe T.Text)
type AttrLabel DOMHTMLInputElementAlignPropertyInfo = "align"
type AttrOrigin DOMHTMLInputElementAlignPropertyInfo = DOMHTMLInputElement
attrGet = getDOMHTMLInputElementAlign
attrSet = setDOMHTMLInputElementAlign
attrTransfer _ v = do
return v
attrConstruct = constructDOMHTMLInputElementAlign
attrClear = undefined
dbgAttrInfo = P.Just (O.ResolvedSymbolInfo {
O.resolvedSymbolName = "GI.WebKit2WebExtension.Objects.DOMHTMLInputElement.align"
, O.resolvedSymbolURL = "https://hackage.haskell.org/package/gi-webkit2webextension-4.0.28/docs/GI-WebKit2WebExtension-Objects-DOMHTMLInputElement.html#g:attr:align"
})
#endif
getDOMHTMLInputElementAlt :: (MonadIO m, IsDOMHTMLInputElement o) => o -> m (Maybe T.Text)
getDOMHTMLInputElementAlt :: forall (m :: * -> *) o.
(MonadIO m, IsDOMHTMLInputElement o) =>
o -> m (Maybe Text)
getDOMHTMLInputElementAlt o
obj = IO (Maybe Text) -> m (Maybe Text)
forall a. IO a -> m a
forall (m :: * -> *) a. MonadIO m => IO a -> m a
MIO.liftIO (IO (Maybe Text) -> m (Maybe Text))
-> IO (Maybe Text) -> m (Maybe Text)
forall a b. (a -> b) -> a -> b
$ o -> String -> IO (Maybe Text)
forall a. GObject a => a -> String -> IO (Maybe Text)
B.Properties.getObjectPropertyString o
obj String
"alt"
setDOMHTMLInputElementAlt :: (MonadIO m, IsDOMHTMLInputElement o) => o -> T.Text -> m ()
setDOMHTMLInputElementAlt :: forall (m :: * -> *) o.
(MonadIO m, IsDOMHTMLInputElement o) =>
o -> Text -> m ()
setDOMHTMLInputElementAlt o
obj Text
val = IO () -> m ()
forall a. IO a -> m a
forall (m :: * -> *) a. MonadIO m => IO a -> m a
MIO.liftIO (IO () -> m ()) -> IO () -> m ()
forall a b. (a -> b) -> a -> b
$ do
o -> String -> Maybe Text -> IO ()
forall a. GObject a => a -> String -> Maybe Text -> IO ()
B.Properties.setObjectPropertyString o
obj String
"alt" (Text -> Maybe Text
forall a. a -> Maybe a
Just Text
val)
constructDOMHTMLInputElementAlt :: (IsDOMHTMLInputElement o, MIO.MonadIO m) => T.Text -> m (GValueConstruct o)
constructDOMHTMLInputElementAlt :: forall o (m :: * -> *).
(IsDOMHTMLInputElement o, MonadIO m) =>
Text -> m (GValueConstruct o)
constructDOMHTMLInputElementAlt Text
val = IO (GValueConstruct o) -> m (GValueConstruct o)
forall a. IO a -> m a
forall (m :: * -> *) a. MonadIO m => IO a -> m a
MIO.liftIO (IO (GValueConstruct o) -> m (GValueConstruct o))
-> IO (GValueConstruct o) -> m (GValueConstruct o)
forall a b. (a -> b) -> a -> b
$ do
IO (GValueConstruct o) -> IO (GValueConstruct o)
forall a. IO a -> IO a
forall (m :: * -> *) a. MonadIO m => IO a -> m a
MIO.liftIO (IO (GValueConstruct o) -> IO (GValueConstruct o))
-> IO (GValueConstruct o) -> IO (GValueConstruct o)
forall a b. (a -> b) -> a -> b
$ String -> Maybe Text -> IO (GValueConstruct o)
forall o. String -> Maybe Text -> IO (GValueConstruct o)
B.Properties.constructObjectPropertyString String
"alt" (Text -> Maybe Text
forall a. a -> Maybe a
P.Just Text
val)
#if defined(ENABLE_OVERLOADING)
data DOMHTMLInputElementAltPropertyInfo
instance AttrInfo DOMHTMLInputElementAltPropertyInfo where
type AttrAllowedOps DOMHTMLInputElementAltPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]
type AttrBaseTypeConstraint DOMHTMLInputElementAltPropertyInfo = IsDOMHTMLInputElement
type AttrSetTypeConstraint DOMHTMLInputElementAltPropertyInfo = (~) T.Text
type AttrTransferTypeConstraint DOMHTMLInputElementAltPropertyInfo = (~) T.Text
type AttrTransferType DOMHTMLInputElementAltPropertyInfo = T.Text
type AttrGetType DOMHTMLInputElementAltPropertyInfo = (Maybe T.Text)
type AttrLabel DOMHTMLInputElementAltPropertyInfo = "alt"
type AttrOrigin DOMHTMLInputElementAltPropertyInfo = DOMHTMLInputElement
attrGet = getDOMHTMLInputElementAlt
attrSet = setDOMHTMLInputElementAlt
attrTransfer _ v = do
return v
attrConstruct = constructDOMHTMLInputElementAlt
attrClear = undefined
dbgAttrInfo = P.Just (O.ResolvedSymbolInfo {
O.resolvedSymbolName = "GI.WebKit2WebExtension.Objects.DOMHTMLInputElement.alt"
, O.resolvedSymbolURL = "https://hackage.haskell.org/package/gi-webkit2webextension-4.0.28/docs/GI-WebKit2WebExtension-Objects-DOMHTMLInputElement.html#g:attr:alt"
})
#endif
getDOMHTMLInputElementAutofocus :: (MonadIO m, IsDOMHTMLInputElement o) => o -> m Bool
getDOMHTMLInputElementAutofocus :: forall (m :: * -> *) o.
(MonadIO m, IsDOMHTMLInputElement o) =>
o -> m Bool
getDOMHTMLInputElementAutofocus o
obj = IO Bool -> m Bool
forall a. IO a -> m a
forall (m :: * -> *) a. MonadIO m => IO a -> m a
MIO.liftIO (IO Bool -> m Bool) -> IO Bool -> m Bool
forall a b. (a -> b) -> a -> b
$ o -> String -> IO Bool
forall a. GObject a => a -> String -> IO Bool
B.Properties.getObjectPropertyBool o
obj String
"autofocus"
setDOMHTMLInputElementAutofocus :: (MonadIO m, IsDOMHTMLInputElement o) => o -> Bool -> m ()
setDOMHTMLInputElementAutofocus :: forall (m :: * -> *) o.
(MonadIO m, IsDOMHTMLInputElement o) =>
o -> Bool -> m ()
setDOMHTMLInputElementAutofocus o
obj Bool
val = IO () -> m ()
forall a. IO a -> m a
forall (m :: * -> *) a. MonadIO m => IO a -> m a
MIO.liftIO (IO () -> m ()) -> IO () -> m ()
forall a b. (a -> b) -> a -> b
$ do
o -> String -> Bool -> IO ()
forall a. GObject a => a -> String -> Bool -> IO ()
B.Properties.setObjectPropertyBool o
obj String
"autofocus" Bool
val
constructDOMHTMLInputElementAutofocus :: (IsDOMHTMLInputElement o, MIO.MonadIO m) => Bool -> m (GValueConstruct o)
constructDOMHTMLInputElementAutofocus :: forall o (m :: * -> *).
(IsDOMHTMLInputElement o, MonadIO m) =>
Bool -> m (GValueConstruct o)
constructDOMHTMLInputElementAutofocus Bool
val = IO (GValueConstruct o) -> m (GValueConstruct o)
forall a. IO a -> m a
forall (m :: * -> *) a. MonadIO m => IO a -> m a
MIO.liftIO (IO (GValueConstruct o) -> m (GValueConstruct o))
-> IO (GValueConstruct o) -> m (GValueConstruct o)
forall a b. (a -> b) -> a -> b
$ do
IO (GValueConstruct o) -> IO (GValueConstruct o)
forall a. IO a -> IO a
forall (m :: * -> *) a. MonadIO m => IO a -> m a
MIO.liftIO (IO (GValueConstruct o) -> IO (GValueConstruct o))
-> IO (GValueConstruct o) -> IO (GValueConstruct o)
forall a b. (a -> b) -> a -> b
$ String -> Bool -> IO (GValueConstruct o)
forall o. String -> Bool -> IO (GValueConstruct o)
B.Properties.constructObjectPropertyBool String
"autofocus" Bool
val
#if defined(ENABLE_OVERLOADING)
data DOMHTMLInputElementAutofocusPropertyInfo
instance AttrInfo DOMHTMLInputElementAutofocusPropertyInfo where
type AttrAllowedOps DOMHTMLInputElementAutofocusPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]
type AttrBaseTypeConstraint DOMHTMLInputElementAutofocusPropertyInfo = IsDOMHTMLInputElement
type AttrSetTypeConstraint DOMHTMLInputElementAutofocusPropertyInfo = (~) Bool
type AttrTransferTypeConstraint DOMHTMLInputElementAutofocusPropertyInfo = (~) Bool
type AttrTransferType DOMHTMLInputElementAutofocusPropertyInfo = Bool
type AttrGetType DOMHTMLInputElementAutofocusPropertyInfo = Bool
type AttrLabel DOMHTMLInputElementAutofocusPropertyInfo = "autofocus"
type AttrOrigin DOMHTMLInputElementAutofocusPropertyInfo = DOMHTMLInputElement
attrGet = getDOMHTMLInputElementAutofocus
attrSet = setDOMHTMLInputElementAutofocus
attrTransfer _ v = do
return v
attrConstruct = constructDOMHTMLInputElementAutofocus
attrClear = undefined
dbgAttrInfo = P.Just (O.ResolvedSymbolInfo {
O.resolvedSymbolName = "GI.WebKit2WebExtension.Objects.DOMHTMLInputElement.autofocus"
, O.resolvedSymbolURL = "https://hackage.haskell.org/package/gi-webkit2webextension-4.0.28/docs/GI-WebKit2WebExtension-Objects-DOMHTMLInputElement.html#g:attr:autofocus"
})
#endif
getDOMHTMLInputElementCapture :: (MonadIO m, IsDOMHTMLInputElement o) => o -> m (Maybe T.Text)
getDOMHTMLInputElementCapture :: forall (m :: * -> *) o.
(MonadIO m, IsDOMHTMLInputElement o) =>
o -> m (Maybe Text)
getDOMHTMLInputElementCapture o
obj = IO (Maybe Text) -> m (Maybe Text)
forall a. IO a -> m a
forall (m :: * -> *) a. MonadIO m => IO a -> m a
MIO.liftIO (IO (Maybe Text) -> m (Maybe Text))
-> IO (Maybe Text) -> m (Maybe Text)
forall a b. (a -> b) -> a -> b
$ o -> String -> IO (Maybe Text)
forall a. GObject a => a -> String -> IO (Maybe Text)
B.Properties.getObjectPropertyString o
obj String
"capture"
setDOMHTMLInputElementCapture :: (MonadIO m, IsDOMHTMLInputElement o) => o -> T.Text -> m ()
setDOMHTMLInputElementCapture :: forall (m :: * -> *) o.
(MonadIO m, IsDOMHTMLInputElement o) =>
o -> Text -> m ()
setDOMHTMLInputElementCapture o
obj Text
val = IO () -> m ()
forall a. IO a -> m a
forall (m :: * -> *) a. MonadIO m => IO a -> m a
MIO.liftIO (IO () -> m ()) -> IO () -> m ()
forall a b. (a -> b) -> a -> b
$ do
o -> String -> Maybe Text -> IO ()
forall a. GObject a => a -> String -> Maybe Text -> IO ()
B.Properties.setObjectPropertyString o
obj String
"capture" (Text -> Maybe Text
forall a. a -> Maybe a
Just Text
val)
constructDOMHTMLInputElementCapture :: (IsDOMHTMLInputElement o, MIO.MonadIO m) => T.Text -> m (GValueConstruct o)
constructDOMHTMLInputElementCapture :: forall o (m :: * -> *).
(IsDOMHTMLInputElement o, MonadIO m) =>
Text -> m (GValueConstruct o)
constructDOMHTMLInputElementCapture Text
val = IO (GValueConstruct o) -> m (GValueConstruct o)
forall a. IO a -> m a
forall (m :: * -> *) a. MonadIO m => IO a -> m a
MIO.liftIO (IO (GValueConstruct o) -> m (GValueConstruct o))
-> IO (GValueConstruct o) -> m (GValueConstruct o)
forall a b. (a -> b) -> a -> b
$ do
IO (GValueConstruct o) -> IO (GValueConstruct o)
forall a. IO a -> IO a
forall (m :: * -> *) a. MonadIO m => IO a -> m a
MIO.liftIO (IO (GValueConstruct o) -> IO (GValueConstruct o))
-> IO (GValueConstruct o) -> IO (GValueConstruct o)
forall a b. (a -> b) -> a -> b
$ String -> Maybe Text -> IO (GValueConstruct o)
forall o. String -> Maybe Text -> IO (GValueConstruct o)
B.Properties.constructObjectPropertyString String
"capture" (Text -> Maybe Text
forall a. a -> Maybe a
P.Just Text
val)
clearDOMHTMLInputElementCapture :: (MonadIO m, IsDOMHTMLInputElement o) => o -> m ()
clearDOMHTMLInputElementCapture :: forall (m :: * -> *) o.
(MonadIO m, IsDOMHTMLInputElement o) =>
o -> m ()
clearDOMHTMLInputElementCapture o
obj = IO () -> m ()
forall a. IO a -> m a
forall (m :: * -> *) a. MonadIO m => IO a -> m a
liftIO (IO () -> m ()) -> IO () -> m ()
forall a b. (a -> b) -> a -> b
$ o -> String -> Maybe Text -> IO ()
forall a. GObject a => a -> String -> Maybe Text -> IO ()
B.Properties.setObjectPropertyString o
obj String
"capture" (Maybe Text
forall a. Maybe a
Nothing :: Maybe T.Text)
#if defined(ENABLE_OVERLOADING)
data DOMHTMLInputElementCapturePropertyInfo
instance AttrInfo DOMHTMLInputElementCapturePropertyInfo where
type AttrAllowedOps DOMHTMLInputElementCapturePropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet, 'AttrClear]
type AttrBaseTypeConstraint DOMHTMLInputElementCapturePropertyInfo = IsDOMHTMLInputElement
type AttrSetTypeConstraint DOMHTMLInputElementCapturePropertyInfo = (~) T.Text
type AttrTransferTypeConstraint DOMHTMLInputElementCapturePropertyInfo = (~) T.Text
type AttrTransferType DOMHTMLInputElementCapturePropertyInfo = T.Text
type AttrGetType DOMHTMLInputElementCapturePropertyInfo = (Maybe T.Text)
type AttrLabel DOMHTMLInputElementCapturePropertyInfo = "capture"
type AttrOrigin DOMHTMLInputElementCapturePropertyInfo = DOMHTMLInputElement
attrGet = getDOMHTMLInputElementCapture
attrSet = setDOMHTMLInputElementCapture
attrTransfer _ v = do
return v
attrConstruct = constructDOMHTMLInputElementCapture
attrClear = clearDOMHTMLInputElementCapture
dbgAttrInfo = P.Just (O.ResolvedSymbolInfo {
O.resolvedSymbolName = "GI.WebKit2WebExtension.Objects.DOMHTMLInputElement.capture"
, O.resolvedSymbolURL = "https://hackage.haskell.org/package/gi-webkit2webextension-4.0.28/docs/GI-WebKit2WebExtension-Objects-DOMHTMLInputElement.html#g:attr:capture"
})
#endif
getDOMHTMLInputElementChecked :: (MonadIO m, IsDOMHTMLInputElement o) => o -> m Bool
getDOMHTMLInputElementChecked :: forall (m :: * -> *) o.
(MonadIO m, IsDOMHTMLInputElement o) =>
o -> m Bool
getDOMHTMLInputElementChecked o
obj = IO Bool -> m Bool
forall a. IO a -> m a
forall (m :: * -> *) a. MonadIO m => IO a -> m a
MIO.liftIO (IO Bool -> m Bool) -> IO Bool -> m Bool
forall a b. (a -> b) -> a -> b
$ o -> String -> IO Bool
forall a. GObject a => a -> String -> IO Bool
B.Properties.getObjectPropertyBool o
obj String
"checked"
setDOMHTMLInputElementChecked :: (MonadIO m, IsDOMHTMLInputElement o) => o -> Bool -> m ()
setDOMHTMLInputElementChecked :: forall (m :: * -> *) o.
(MonadIO m, IsDOMHTMLInputElement o) =>
o -> Bool -> m ()
setDOMHTMLInputElementChecked o
obj Bool
val = IO () -> m ()
forall a. IO a -> m a
forall (m :: * -> *) a. MonadIO m => IO a -> m a
MIO.liftIO (IO () -> m ()) -> IO () -> m ()
forall a b. (a -> b) -> a -> b
$ do
o -> String -> Bool -> IO ()
forall a. GObject a => a -> String -> Bool -> IO ()
B.Properties.setObjectPropertyBool o
obj String
"checked" Bool
val
constructDOMHTMLInputElementChecked :: (IsDOMHTMLInputElement o, MIO.MonadIO m) => Bool -> m (GValueConstruct o)
constructDOMHTMLInputElementChecked :: forall o (m :: * -> *).
(IsDOMHTMLInputElement o, MonadIO m) =>
Bool -> m (GValueConstruct o)
constructDOMHTMLInputElementChecked Bool
val = IO (GValueConstruct o) -> m (GValueConstruct o)
forall a. IO a -> m a
forall (m :: * -> *) a. MonadIO m => IO a -> m a
MIO.liftIO (IO (GValueConstruct o) -> m (GValueConstruct o))
-> IO (GValueConstruct o) -> m (GValueConstruct o)
forall a b. (a -> b) -> a -> b
$ do
IO (GValueConstruct o) -> IO (GValueConstruct o)
forall a. IO a -> IO a
forall (m :: * -> *) a. MonadIO m => IO a -> m a
MIO.liftIO (IO (GValueConstruct o) -> IO (GValueConstruct o))
-> IO (GValueConstruct o) -> IO (GValueConstruct o)
forall a b. (a -> b) -> a -> b
$ String -> Bool -> IO (GValueConstruct o)
forall o. String -> Bool -> IO (GValueConstruct o)
B.Properties.constructObjectPropertyBool String
"checked" Bool
val
#if defined(ENABLE_OVERLOADING)
data DOMHTMLInputElementCheckedPropertyInfo
instance AttrInfo DOMHTMLInputElementCheckedPropertyInfo where
type AttrAllowedOps DOMHTMLInputElementCheckedPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]
type AttrBaseTypeConstraint DOMHTMLInputElementCheckedPropertyInfo = IsDOMHTMLInputElement
type AttrSetTypeConstraint DOMHTMLInputElementCheckedPropertyInfo = (~) Bool
type AttrTransferTypeConstraint DOMHTMLInputElementCheckedPropertyInfo = (~) Bool
type AttrTransferType DOMHTMLInputElementCheckedPropertyInfo = Bool
type AttrGetType DOMHTMLInputElementCheckedPropertyInfo = Bool
type AttrLabel DOMHTMLInputElementCheckedPropertyInfo = "checked"
type AttrOrigin DOMHTMLInputElementCheckedPropertyInfo = DOMHTMLInputElement
attrGet = getDOMHTMLInputElementChecked
attrSet = setDOMHTMLInputElementChecked
attrTransfer _ v = do
return v
attrConstruct = constructDOMHTMLInputElementChecked
attrClear = undefined
dbgAttrInfo = P.Just (O.ResolvedSymbolInfo {
O.resolvedSymbolName = "GI.WebKit2WebExtension.Objects.DOMHTMLInputElement.checked"
, O.resolvedSymbolURL = "https://hackage.haskell.org/package/gi-webkit2webextension-4.0.28/docs/GI-WebKit2WebExtension-Objects-DOMHTMLInputElement.html#g:attr:checked"
})
#endif
getDOMHTMLInputElementDefaultChecked :: (MonadIO m, IsDOMHTMLInputElement o) => o -> m Bool
getDOMHTMLInputElementDefaultChecked :: forall (m :: * -> *) o.
(MonadIO m, IsDOMHTMLInputElement o) =>
o -> m Bool
getDOMHTMLInputElementDefaultChecked o
obj = IO Bool -> m Bool
forall a. IO a -> m a
forall (m :: * -> *) a. MonadIO m => IO a -> m a
MIO.liftIO (IO Bool -> m Bool) -> IO Bool -> m Bool
forall a b. (a -> b) -> a -> b
$ o -> String -> IO Bool
forall a. GObject a => a -> String -> IO Bool
B.Properties.getObjectPropertyBool o
obj String
"default-checked"
setDOMHTMLInputElementDefaultChecked :: (MonadIO m, IsDOMHTMLInputElement o) => o -> Bool -> m ()
setDOMHTMLInputElementDefaultChecked :: forall (m :: * -> *) o.
(MonadIO m, IsDOMHTMLInputElement o) =>
o -> Bool -> m ()
setDOMHTMLInputElementDefaultChecked o
obj Bool
val = IO () -> m ()
forall a. IO a -> m a
forall (m :: * -> *) a. MonadIO m => IO a -> m a
MIO.liftIO (IO () -> m ()) -> IO () -> m ()
forall a b. (a -> b) -> a -> b
$ do
o -> String -> Bool -> IO ()
forall a. GObject a => a -> String -> Bool -> IO ()
B.Properties.setObjectPropertyBool o
obj String
"default-checked" Bool
val
constructDOMHTMLInputElementDefaultChecked :: (IsDOMHTMLInputElement o, MIO.MonadIO m) => Bool -> m (GValueConstruct o)
constructDOMHTMLInputElementDefaultChecked :: forall o (m :: * -> *).
(IsDOMHTMLInputElement o, MonadIO m) =>
Bool -> m (GValueConstruct o)
constructDOMHTMLInputElementDefaultChecked Bool
val = IO (GValueConstruct o) -> m (GValueConstruct o)
forall a. IO a -> m a
forall (m :: * -> *) a. MonadIO m => IO a -> m a
MIO.liftIO (IO (GValueConstruct o) -> m (GValueConstruct o))
-> IO (GValueConstruct o) -> m (GValueConstruct o)
forall a b. (a -> b) -> a -> b
$ do
IO (GValueConstruct o) -> IO (GValueConstruct o)
forall a. IO a -> IO a
forall (m :: * -> *) a. MonadIO m => IO a -> m a
MIO.liftIO (IO (GValueConstruct o) -> IO (GValueConstruct o))
-> IO (GValueConstruct o) -> IO (GValueConstruct o)
forall a b. (a -> b) -> a -> b
$ String -> Bool -> IO (GValueConstruct o)
forall o. String -> Bool -> IO (GValueConstruct o)
B.Properties.constructObjectPropertyBool String
"default-checked" Bool
val
#if defined(ENABLE_OVERLOADING)
data DOMHTMLInputElementDefaultCheckedPropertyInfo
instance AttrInfo DOMHTMLInputElementDefaultCheckedPropertyInfo where
type AttrAllowedOps DOMHTMLInputElementDefaultCheckedPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]
type AttrBaseTypeConstraint DOMHTMLInputElementDefaultCheckedPropertyInfo = IsDOMHTMLInputElement
type AttrSetTypeConstraint DOMHTMLInputElementDefaultCheckedPropertyInfo = (~) Bool
type AttrTransferTypeConstraint DOMHTMLInputElementDefaultCheckedPropertyInfo = (~) Bool
type AttrTransferType DOMHTMLInputElementDefaultCheckedPropertyInfo = Bool
type AttrGetType DOMHTMLInputElementDefaultCheckedPropertyInfo = Bool
type AttrLabel DOMHTMLInputElementDefaultCheckedPropertyInfo = "default-checked"
type AttrOrigin DOMHTMLInputElementDefaultCheckedPropertyInfo = DOMHTMLInputElement
attrGet = getDOMHTMLInputElementDefaultChecked
attrSet = setDOMHTMLInputElementDefaultChecked
attrTransfer _ v = do
return v
attrConstruct = constructDOMHTMLInputElementDefaultChecked
attrClear = undefined
dbgAttrInfo = P.Just (O.ResolvedSymbolInfo {
O.resolvedSymbolName = "GI.WebKit2WebExtension.Objects.DOMHTMLInputElement.defaultChecked"
, O.resolvedSymbolURL = "https://hackage.haskell.org/package/gi-webkit2webextension-4.0.28/docs/GI-WebKit2WebExtension-Objects-DOMHTMLInputElement.html#g:attr:defaultChecked"
})
#endif
getDOMHTMLInputElementDefaultValue :: (MonadIO m, IsDOMHTMLInputElement o) => o -> m (Maybe T.Text)
getDOMHTMLInputElementDefaultValue :: forall (m :: * -> *) o.
(MonadIO m, IsDOMHTMLInputElement o) =>
o -> m (Maybe Text)
getDOMHTMLInputElementDefaultValue o
obj = IO (Maybe Text) -> m (Maybe Text)
forall a. IO a -> m a
forall (m :: * -> *) a. MonadIO m => IO a -> m a
MIO.liftIO (IO (Maybe Text) -> m (Maybe Text))
-> IO (Maybe Text) -> m (Maybe Text)
forall a b. (a -> b) -> a -> b
$ o -> String -> IO (Maybe Text)
forall a. GObject a => a -> String -> IO (Maybe Text)
B.Properties.getObjectPropertyString o
obj String
"default-value"
setDOMHTMLInputElementDefaultValue :: (MonadIO m, IsDOMHTMLInputElement o) => o -> T.Text -> m ()
setDOMHTMLInputElementDefaultValue :: forall (m :: * -> *) o.
(MonadIO m, IsDOMHTMLInputElement o) =>
o -> Text -> m ()
setDOMHTMLInputElementDefaultValue o
obj Text
val = IO () -> m ()
forall a. IO a -> m a
forall (m :: * -> *) a. MonadIO m => IO a -> m a
MIO.liftIO (IO () -> m ()) -> IO () -> m ()
forall a b. (a -> b) -> a -> b
$ do
o -> String -> Maybe Text -> IO ()
forall a. GObject a => a -> String -> Maybe Text -> IO ()
B.Properties.setObjectPropertyString o
obj String
"default-value" (Text -> Maybe Text
forall a. a -> Maybe a
Just Text
val)
constructDOMHTMLInputElementDefaultValue :: (IsDOMHTMLInputElement o, MIO.MonadIO m) => T.Text -> m (GValueConstruct o)
constructDOMHTMLInputElementDefaultValue :: forall o (m :: * -> *).
(IsDOMHTMLInputElement o, MonadIO m) =>
Text -> m (GValueConstruct o)
constructDOMHTMLInputElementDefaultValue Text
val = IO (GValueConstruct o) -> m (GValueConstruct o)
forall a. IO a -> m a
forall (m :: * -> *) a. MonadIO m => IO a -> m a
MIO.liftIO (IO (GValueConstruct o) -> m (GValueConstruct o))
-> IO (GValueConstruct o) -> m (GValueConstruct o)
forall a b. (a -> b) -> a -> b
$ do
IO (GValueConstruct o) -> IO (GValueConstruct o)
forall a. IO a -> IO a
forall (m :: * -> *) a. MonadIO m => IO a -> m a
MIO.liftIO (IO (GValueConstruct o) -> IO (GValueConstruct o))
-> IO (GValueConstruct o) -> IO (GValueConstruct o)
forall a b. (a -> b) -> a -> b
$ String -> Maybe Text -> IO (GValueConstruct o)
forall o. String -> Maybe Text -> IO (GValueConstruct o)
B.Properties.constructObjectPropertyString String
"default-value" (Text -> Maybe Text
forall a. a -> Maybe a
P.Just Text
val)
#if defined(ENABLE_OVERLOADING)
data DOMHTMLInputElementDefaultValuePropertyInfo
instance AttrInfo DOMHTMLInputElementDefaultValuePropertyInfo where
type AttrAllowedOps DOMHTMLInputElementDefaultValuePropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]
type AttrBaseTypeConstraint DOMHTMLInputElementDefaultValuePropertyInfo = IsDOMHTMLInputElement
type AttrSetTypeConstraint DOMHTMLInputElementDefaultValuePropertyInfo = (~) T.Text
type AttrTransferTypeConstraint DOMHTMLInputElementDefaultValuePropertyInfo = (~) T.Text
type AttrTransferType DOMHTMLInputElementDefaultValuePropertyInfo = T.Text
type AttrGetType DOMHTMLInputElementDefaultValuePropertyInfo = (Maybe T.Text)
type AttrLabel DOMHTMLInputElementDefaultValuePropertyInfo = "default-value"
type AttrOrigin DOMHTMLInputElementDefaultValuePropertyInfo = DOMHTMLInputElement
attrGet = getDOMHTMLInputElementDefaultValue
attrSet = setDOMHTMLInputElementDefaultValue
attrTransfer _ v = do
return v
attrConstruct = constructDOMHTMLInputElementDefaultValue
attrClear = undefined
dbgAttrInfo = P.Just (O.ResolvedSymbolInfo {
O.resolvedSymbolName = "GI.WebKit2WebExtension.Objects.DOMHTMLInputElement.defaultValue"
, O.resolvedSymbolURL = "https://hackage.haskell.org/package/gi-webkit2webextension-4.0.28/docs/GI-WebKit2WebExtension-Objects-DOMHTMLInputElement.html#g:attr:defaultValue"
})
#endif
getDOMHTMLInputElementDisabled :: (MonadIO m, IsDOMHTMLInputElement o) => o -> m Bool
getDOMHTMLInputElementDisabled :: forall (m :: * -> *) o.
(MonadIO m, IsDOMHTMLInputElement o) =>
o -> m Bool
getDOMHTMLInputElementDisabled o
obj = IO Bool -> m Bool
forall a. IO a -> m a
forall (m :: * -> *) a. MonadIO m => IO a -> m a
MIO.liftIO (IO Bool -> m Bool) -> IO Bool -> m Bool
forall a b. (a -> b) -> a -> b
$ o -> String -> IO Bool
forall a. GObject a => a -> String -> IO Bool
B.Properties.getObjectPropertyBool o
obj String
"disabled"
setDOMHTMLInputElementDisabled :: (MonadIO m, IsDOMHTMLInputElement o) => o -> Bool -> m ()
setDOMHTMLInputElementDisabled :: forall (m :: * -> *) o.
(MonadIO m, IsDOMHTMLInputElement o) =>
o -> Bool -> m ()
setDOMHTMLInputElementDisabled o
obj Bool
val = IO () -> m ()
forall a. IO a -> m a
forall (m :: * -> *) a. MonadIO m => IO a -> m a
MIO.liftIO (IO () -> m ()) -> IO () -> m ()
forall a b. (a -> b) -> a -> b
$ do
o -> String -> Bool -> IO ()
forall a. GObject a => a -> String -> Bool -> IO ()
B.Properties.setObjectPropertyBool o
obj String
"disabled" Bool
val
constructDOMHTMLInputElementDisabled :: (IsDOMHTMLInputElement o, MIO.MonadIO m) => Bool -> m (GValueConstruct o)
constructDOMHTMLInputElementDisabled :: forall o (m :: * -> *).
(IsDOMHTMLInputElement o, MonadIO m) =>
Bool -> m (GValueConstruct o)
constructDOMHTMLInputElementDisabled Bool
val = IO (GValueConstruct o) -> m (GValueConstruct o)
forall a. IO a -> m a
forall (m :: * -> *) a. MonadIO m => IO a -> m a
MIO.liftIO (IO (GValueConstruct o) -> m (GValueConstruct o))
-> IO (GValueConstruct o) -> m (GValueConstruct o)
forall a b. (a -> b) -> a -> b
$ do
IO (GValueConstruct o) -> IO (GValueConstruct o)
forall a. IO a -> IO a
forall (m :: * -> *) a. MonadIO m => IO a -> m a
MIO.liftIO (IO (GValueConstruct o) -> IO (GValueConstruct o))
-> IO (GValueConstruct o) -> IO (GValueConstruct o)
forall a b. (a -> b) -> a -> b
$ String -> Bool -> IO (GValueConstruct o)
forall o. String -> Bool -> IO (GValueConstruct o)
B.Properties.constructObjectPropertyBool String
"disabled" Bool
val
#if defined(ENABLE_OVERLOADING)
data DOMHTMLInputElementDisabledPropertyInfo
instance AttrInfo DOMHTMLInputElementDisabledPropertyInfo where
type AttrAllowedOps DOMHTMLInputElementDisabledPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]
type AttrBaseTypeConstraint DOMHTMLInputElementDisabledPropertyInfo = IsDOMHTMLInputElement
type AttrSetTypeConstraint DOMHTMLInputElementDisabledPropertyInfo = (~) Bool
type AttrTransferTypeConstraint DOMHTMLInputElementDisabledPropertyInfo = (~) Bool
type AttrTransferType DOMHTMLInputElementDisabledPropertyInfo = Bool
type AttrGetType DOMHTMLInputElementDisabledPropertyInfo = Bool
type AttrLabel DOMHTMLInputElementDisabledPropertyInfo = "disabled"
type AttrOrigin DOMHTMLInputElementDisabledPropertyInfo = DOMHTMLInputElement
attrGet = getDOMHTMLInputElementDisabled
attrSet = setDOMHTMLInputElementDisabled
attrTransfer _ v = do
return v
attrConstruct = constructDOMHTMLInputElementDisabled
attrClear = undefined
dbgAttrInfo = P.Just (O.ResolvedSymbolInfo {
O.resolvedSymbolName = "GI.WebKit2WebExtension.Objects.DOMHTMLInputElement.disabled"
, O.resolvedSymbolURL = "https://hackage.haskell.org/package/gi-webkit2webextension-4.0.28/docs/GI-WebKit2WebExtension-Objects-DOMHTMLInputElement.html#g:attr:disabled"
})
#endif
getDOMHTMLInputElementFiles :: (MonadIO m, IsDOMHTMLInputElement o) => o -> m (Maybe WebKit2WebExtension.DOMFileList.DOMFileList)
getDOMHTMLInputElementFiles :: forall (m :: * -> *) o.
(MonadIO m, IsDOMHTMLInputElement o) =>
o -> m (Maybe DOMFileList)
getDOMHTMLInputElementFiles o
obj = IO (Maybe DOMFileList) -> m (Maybe DOMFileList)
forall a. IO a -> m a
forall (m :: * -> *) a. MonadIO m => IO a -> m a
MIO.liftIO (IO (Maybe DOMFileList) -> m (Maybe DOMFileList))
-> IO (Maybe DOMFileList) -> m (Maybe DOMFileList)
forall a b. (a -> b) -> a -> b
$ o
-> String
-> (ManagedPtr DOMFileList -> DOMFileList)
-> IO (Maybe DOMFileList)
forall a b.
(GObject a, GObject b) =>
a -> String -> (ManagedPtr b -> b) -> IO (Maybe b)
B.Properties.getObjectPropertyObject o
obj String
"files" ManagedPtr DOMFileList -> DOMFileList
WebKit2WebExtension.DOMFileList.DOMFileList
#if defined(ENABLE_OVERLOADING)
data DOMHTMLInputElementFilesPropertyInfo
instance AttrInfo DOMHTMLInputElementFilesPropertyInfo where
type AttrAllowedOps DOMHTMLInputElementFilesPropertyInfo = '[ 'AttrGet]
type AttrBaseTypeConstraint DOMHTMLInputElementFilesPropertyInfo = IsDOMHTMLInputElement
type AttrSetTypeConstraint DOMHTMLInputElementFilesPropertyInfo = (~) ()
type AttrTransferTypeConstraint DOMHTMLInputElementFilesPropertyInfo = (~) ()
type AttrTransferType DOMHTMLInputElementFilesPropertyInfo = ()
type AttrGetType DOMHTMLInputElementFilesPropertyInfo = (Maybe WebKit2WebExtension.DOMFileList.DOMFileList)
type AttrLabel DOMHTMLInputElementFilesPropertyInfo = "files"
type AttrOrigin DOMHTMLInputElementFilesPropertyInfo = DOMHTMLInputElement
attrGet = getDOMHTMLInputElementFiles
attrSet = undefined
attrTransfer _ = undefined
attrConstruct = undefined
attrClear = undefined
dbgAttrInfo = P.Just (O.ResolvedSymbolInfo {
O.resolvedSymbolName = "GI.WebKit2WebExtension.Objects.DOMHTMLInputElement.files"
, O.resolvedSymbolURL = "https://hackage.haskell.org/package/gi-webkit2webextension-4.0.28/docs/GI-WebKit2WebExtension-Objects-DOMHTMLInputElement.html#g:attr:files"
})
#endif
getDOMHTMLInputElementForm :: (MonadIO m, IsDOMHTMLInputElement o) => o -> m WebKit2WebExtension.DOMHTMLFormElement.DOMHTMLFormElement
getDOMHTMLInputElementForm :: forall (m :: * -> *) o.
(MonadIO m, IsDOMHTMLInputElement o) =>
o -> m DOMHTMLFormElement
getDOMHTMLInputElementForm o
obj = IO DOMHTMLFormElement -> m DOMHTMLFormElement
forall a. IO a -> m a
forall (m :: * -> *) a. MonadIO m => IO a -> m a
MIO.liftIO (IO DOMHTMLFormElement -> m DOMHTMLFormElement)
-> IO DOMHTMLFormElement -> m DOMHTMLFormElement
forall a b. (a -> b) -> a -> b
$ Text -> IO (Maybe DOMHTMLFormElement) -> IO DOMHTMLFormElement
forall a. HasCallStack => Text -> IO (Maybe a) -> IO a
checkUnexpectedNothing Text
"getDOMHTMLInputElementForm" (IO (Maybe DOMHTMLFormElement) -> IO DOMHTMLFormElement)
-> IO (Maybe DOMHTMLFormElement) -> IO DOMHTMLFormElement
forall a b. (a -> b) -> a -> b
$ o
-> String
-> (ManagedPtr DOMHTMLFormElement -> DOMHTMLFormElement)
-> IO (Maybe DOMHTMLFormElement)
forall a b.
(GObject a, GObject b) =>
a -> String -> (ManagedPtr b -> b) -> IO (Maybe b)
B.Properties.getObjectPropertyObject o
obj String
"form" ManagedPtr DOMHTMLFormElement -> DOMHTMLFormElement
WebKit2WebExtension.DOMHTMLFormElement.DOMHTMLFormElement
#if defined(ENABLE_OVERLOADING)
data DOMHTMLInputElementFormPropertyInfo
instance AttrInfo DOMHTMLInputElementFormPropertyInfo where
type AttrAllowedOps DOMHTMLInputElementFormPropertyInfo = '[ 'AttrGet, 'AttrClear]
type AttrBaseTypeConstraint DOMHTMLInputElementFormPropertyInfo = IsDOMHTMLInputElement
type AttrSetTypeConstraint DOMHTMLInputElementFormPropertyInfo = (~) ()
type AttrTransferTypeConstraint DOMHTMLInputElementFormPropertyInfo = (~) ()
type AttrTransferType DOMHTMLInputElementFormPropertyInfo = ()
type AttrGetType DOMHTMLInputElementFormPropertyInfo = WebKit2WebExtension.DOMHTMLFormElement.DOMHTMLFormElement
type AttrLabel DOMHTMLInputElementFormPropertyInfo = "form"
type AttrOrigin DOMHTMLInputElementFormPropertyInfo = DOMHTMLInputElement
attrGet = getDOMHTMLInputElementForm
attrSet = undefined
attrTransfer _ = undefined
attrConstruct = undefined
attrClear = undefined
dbgAttrInfo = P.Just (O.ResolvedSymbolInfo {
O.resolvedSymbolName = "GI.WebKit2WebExtension.Objects.DOMHTMLInputElement.form"
, O.resolvedSymbolURL = "https://hackage.haskell.org/package/gi-webkit2webextension-4.0.28/docs/GI-WebKit2WebExtension-Objects-DOMHTMLInputElement.html#g:attr:form"
})
#endif
getDOMHTMLInputElementHeight :: (MonadIO m, IsDOMHTMLInputElement o) => o -> m CULong
getDOMHTMLInputElementHeight :: forall (m :: * -> *) o.
(MonadIO m, IsDOMHTMLInputElement o) =>
o -> m CULong
getDOMHTMLInputElementHeight o
obj = IO CULong -> m CULong
forall a. IO a -> m a
forall (m :: * -> *) a. MonadIO m => IO a -> m a
MIO.liftIO (IO CULong -> m CULong) -> IO CULong -> m CULong
forall a b. (a -> b) -> a -> b
$ o -> String -> IO CULong
forall a. GObject a => a -> String -> IO CULong
B.Properties.getObjectPropertyULong o
obj String
"height"
setDOMHTMLInputElementHeight :: (MonadIO m, IsDOMHTMLInputElement o) => o -> CULong -> m ()
setDOMHTMLInputElementHeight :: forall (m :: * -> *) o.
(MonadIO m, IsDOMHTMLInputElement o) =>
o -> CULong -> m ()
setDOMHTMLInputElementHeight o
obj CULong
val = IO () -> m ()
forall a. IO a -> m a
forall (m :: * -> *) a. MonadIO m => IO a -> m a
MIO.liftIO (IO () -> m ()) -> IO () -> m ()
forall a b. (a -> b) -> a -> b
$ do
o -> String -> CULong -> IO ()
forall a. GObject a => a -> String -> CULong -> IO ()
B.Properties.setObjectPropertyULong o
obj String
"height" CULong
val
constructDOMHTMLInputElementHeight :: (IsDOMHTMLInputElement o, MIO.MonadIO m) => CULong -> m (GValueConstruct o)
constructDOMHTMLInputElementHeight :: forall o (m :: * -> *).
(IsDOMHTMLInputElement o, MonadIO m) =>
CULong -> m (GValueConstruct o)
constructDOMHTMLInputElementHeight CULong
val = IO (GValueConstruct o) -> m (GValueConstruct o)
forall a. IO a -> m a
forall (m :: * -> *) a. MonadIO m => IO a -> m a
MIO.liftIO (IO (GValueConstruct o) -> m (GValueConstruct o))
-> IO (GValueConstruct o) -> m (GValueConstruct o)
forall a b. (a -> b) -> a -> b
$ do
IO (GValueConstruct o) -> IO (GValueConstruct o)
forall a. IO a -> IO a
forall (m :: * -> *) a. MonadIO m => IO a -> m a
MIO.liftIO (IO (GValueConstruct o) -> IO (GValueConstruct o))
-> IO (GValueConstruct o) -> IO (GValueConstruct o)
forall a b. (a -> b) -> a -> b
$ String -> CULong -> IO (GValueConstruct o)
forall o. String -> CULong -> IO (GValueConstruct o)
B.Properties.constructObjectPropertyULong String
"height" CULong
val
#if defined(ENABLE_OVERLOADING)
data DOMHTMLInputElementHeightPropertyInfo
instance AttrInfo DOMHTMLInputElementHeightPropertyInfo where
type AttrAllowedOps DOMHTMLInputElementHeightPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]
type AttrBaseTypeConstraint DOMHTMLInputElementHeightPropertyInfo = IsDOMHTMLInputElement
type AttrSetTypeConstraint DOMHTMLInputElementHeightPropertyInfo = (~) CULong
type AttrTransferTypeConstraint DOMHTMLInputElementHeightPropertyInfo = (~) CULong
type AttrTransferType DOMHTMLInputElementHeightPropertyInfo = CULong
type AttrGetType DOMHTMLInputElementHeightPropertyInfo = CULong
type AttrLabel DOMHTMLInputElementHeightPropertyInfo = "height"
type AttrOrigin DOMHTMLInputElementHeightPropertyInfo = DOMHTMLInputElement
attrGet = getDOMHTMLInputElementHeight
attrSet = setDOMHTMLInputElementHeight
attrTransfer _ v = do
return v
attrConstruct = constructDOMHTMLInputElementHeight
attrClear = undefined
dbgAttrInfo = P.Just (O.ResolvedSymbolInfo {
O.resolvedSymbolName = "GI.WebKit2WebExtension.Objects.DOMHTMLInputElement.height"
, O.resolvedSymbolURL = "https://hackage.haskell.org/package/gi-webkit2webextension-4.0.28/docs/GI-WebKit2WebExtension-Objects-DOMHTMLInputElement.html#g:attr:height"
})
#endif
getDOMHTMLInputElementIndeterminate :: (MonadIO m, IsDOMHTMLInputElement o) => o -> m Bool
getDOMHTMLInputElementIndeterminate :: forall (m :: * -> *) o.
(MonadIO m, IsDOMHTMLInputElement o) =>
o -> m Bool
getDOMHTMLInputElementIndeterminate o
obj = IO Bool -> m Bool
forall a. IO a -> m a
forall (m :: * -> *) a. MonadIO m => IO a -> m a
MIO.liftIO (IO Bool -> m Bool) -> IO Bool -> m Bool
forall a b. (a -> b) -> a -> b
$ o -> String -> IO Bool
forall a. GObject a => a -> String -> IO Bool
B.Properties.getObjectPropertyBool o
obj String
"indeterminate"
setDOMHTMLInputElementIndeterminate :: (MonadIO m, IsDOMHTMLInputElement o) => o -> Bool -> m ()
setDOMHTMLInputElementIndeterminate :: forall (m :: * -> *) o.
(MonadIO m, IsDOMHTMLInputElement o) =>
o -> Bool -> m ()
setDOMHTMLInputElementIndeterminate o
obj Bool
val = IO () -> m ()
forall a. IO a -> m a
forall (m :: * -> *) a. MonadIO m => IO a -> m a
MIO.liftIO (IO () -> m ()) -> IO () -> m ()
forall a b. (a -> b) -> a -> b
$ do
o -> String -> Bool -> IO ()
forall a. GObject a => a -> String -> Bool -> IO ()
B.Properties.setObjectPropertyBool o
obj String
"indeterminate" Bool
val
constructDOMHTMLInputElementIndeterminate :: (IsDOMHTMLInputElement o, MIO.MonadIO m) => Bool -> m (GValueConstruct o)
constructDOMHTMLInputElementIndeterminate :: forall o (m :: * -> *).
(IsDOMHTMLInputElement o, MonadIO m) =>
Bool -> m (GValueConstruct o)
constructDOMHTMLInputElementIndeterminate Bool
val = IO (GValueConstruct o) -> m (GValueConstruct o)
forall a. IO a -> m a
forall (m :: * -> *) a. MonadIO m => IO a -> m a
MIO.liftIO (IO (GValueConstruct o) -> m (GValueConstruct o))
-> IO (GValueConstruct o) -> m (GValueConstruct o)
forall a b. (a -> b) -> a -> b
$ do
IO (GValueConstruct o) -> IO (GValueConstruct o)
forall a. IO a -> IO a
forall (m :: * -> *) a. MonadIO m => IO a -> m a
MIO.liftIO (IO (GValueConstruct o) -> IO (GValueConstruct o))
-> IO (GValueConstruct o) -> IO (GValueConstruct o)
forall a b. (a -> b) -> a -> b
$ String -> Bool -> IO (GValueConstruct o)
forall o. String -> Bool -> IO (GValueConstruct o)
B.Properties.constructObjectPropertyBool String
"indeterminate" Bool
val
#if defined(ENABLE_OVERLOADING)
data DOMHTMLInputElementIndeterminatePropertyInfo
instance AttrInfo DOMHTMLInputElementIndeterminatePropertyInfo where
type AttrAllowedOps DOMHTMLInputElementIndeterminatePropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]
type AttrBaseTypeConstraint DOMHTMLInputElementIndeterminatePropertyInfo = IsDOMHTMLInputElement
type AttrSetTypeConstraint DOMHTMLInputElementIndeterminatePropertyInfo = (~) Bool
type AttrTransferTypeConstraint DOMHTMLInputElementIndeterminatePropertyInfo = (~) Bool
type AttrTransferType DOMHTMLInputElementIndeterminatePropertyInfo = Bool
type AttrGetType DOMHTMLInputElementIndeterminatePropertyInfo = Bool
type AttrLabel DOMHTMLInputElementIndeterminatePropertyInfo = "indeterminate"
type AttrOrigin DOMHTMLInputElementIndeterminatePropertyInfo = DOMHTMLInputElement
attrGet = getDOMHTMLInputElementIndeterminate
attrSet = setDOMHTMLInputElementIndeterminate
attrTransfer _ v = do
return v
attrConstruct = constructDOMHTMLInputElementIndeterminate
attrClear = undefined
dbgAttrInfo = P.Just (O.ResolvedSymbolInfo {
O.resolvedSymbolName = "GI.WebKit2WebExtension.Objects.DOMHTMLInputElement.indeterminate"
, O.resolvedSymbolURL = "https://hackage.haskell.org/package/gi-webkit2webextension-4.0.28/docs/GI-WebKit2WebExtension-Objects-DOMHTMLInputElement.html#g:attr:indeterminate"
})
#endif
getDOMHTMLInputElementMaxLength :: (MonadIO m, IsDOMHTMLInputElement o) => o -> m CLong
getDOMHTMLInputElementMaxLength :: forall (m :: * -> *) o.
(MonadIO m, IsDOMHTMLInputElement o) =>
o -> m CLong
getDOMHTMLInputElementMaxLength o
obj = IO CLong -> m CLong
forall a. IO a -> m a
forall (m :: * -> *) a. MonadIO m => IO a -> m a
MIO.liftIO (IO CLong -> m CLong) -> IO CLong -> m CLong
forall a b. (a -> b) -> a -> b
$ o -> String -> IO CLong
forall a. GObject a => a -> String -> IO CLong
B.Properties.getObjectPropertyLong o
obj String
"max-length"
setDOMHTMLInputElementMaxLength :: (MonadIO m, IsDOMHTMLInputElement o) => o -> CLong -> m ()
setDOMHTMLInputElementMaxLength :: forall (m :: * -> *) o.
(MonadIO m, IsDOMHTMLInputElement o) =>
o -> CLong -> m ()
setDOMHTMLInputElementMaxLength o
obj CLong
val = IO () -> m ()
forall a. IO a -> m a
forall (m :: * -> *) a. MonadIO m => IO a -> m a
MIO.liftIO (IO () -> m ()) -> IO () -> m ()
forall a b. (a -> b) -> a -> b
$ do
o -> String -> CLong -> IO ()
forall a. GObject a => a -> String -> CLong -> IO ()
B.Properties.setObjectPropertyLong o
obj String
"max-length" CLong
val
constructDOMHTMLInputElementMaxLength :: (IsDOMHTMLInputElement o, MIO.MonadIO m) => CLong -> m (GValueConstruct o)
constructDOMHTMLInputElementMaxLength :: forall o (m :: * -> *).
(IsDOMHTMLInputElement o, MonadIO m) =>
CLong -> m (GValueConstruct o)
constructDOMHTMLInputElementMaxLength CLong
val = IO (GValueConstruct o) -> m (GValueConstruct o)
forall a. IO a -> m a
forall (m :: * -> *) a. MonadIO m => IO a -> m a
MIO.liftIO (IO (GValueConstruct o) -> m (GValueConstruct o))
-> IO (GValueConstruct o) -> m (GValueConstruct o)
forall a b. (a -> b) -> a -> b
$ do
IO (GValueConstruct o) -> IO (GValueConstruct o)
forall a. IO a -> IO a
forall (m :: * -> *) a. MonadIO m => IO a -> m a
MIO.liftIO (IO (GValueConstruct o) -> IO (GValueConstruct o))
-> IO (GValueConstruct o) -> IO (GValueConstruct o)
forall a b. (a -> b) -> a -> b
$ String -> CLong -> IO (GValueConstruct o)
forall o. String -> CLong -> IO (GValueConstruct o)
B.Properties.constructObjectPropertyLong String
"max-length" CLong
val
#if defined(ENABLE_OVERLOADING)
data DOMHTMLInputElementMaxLengthPropertyInfo
instance AttrInfo DOMHTMLInputElementMaxLengthPropertyInfo where
type AttrAllowedOps DOMHTMLInputElementMaxLengthPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]
type AttrBaseTypeConstraint DOMHTMLInputElementMaxLengthPropertyInfo = IsDOMHTMLInputElement
type AttrSetTypeConstraint DOMHTMLInputElementMaxLengthPropertyInfo = (~) CLong
type AttrTransferTypeConstraint DOMHTMLInputElementMaxLengthPropertyInfo = (~) CLong
type AttrTransferType DOMHTMLInputElementMaxLengthPropertyInfo = CLong
type AttrGetType DOMHTMLInputElementMaxLengthPropertyInfo = CLong
type AttrLabel DOMHTMLInputElementMaxLengthPropertyInfo = "max-length"
type AttrOrigin DOMHTMLInputElementMaxLengthPropertyInfo = DOMHTMLInputElement
attrGet = getDOMHTMLInputElementMaxLength
attrSet = setDOMHTMLInputElementMaxLength
attrTransfer _ v = do
return v
attrConstruct = constructDOMHTMLInputElementMaxLength
attrClear = undefined
dbgAttrInfo = P.Just (O.ResolvedSymbolInfo {
O.resolvedSymbolName = "GI.WebKit2WebExtension.Objects.DOMHTMLInputElement.maxLength"
, O.resolvedSymbolURL = "https://hackage.haskell.org/package/gi-webkit2webextension-4.0.28/docs/GI-WebKit2WebExtension-Objects-DOMHTMLInputElement.html#g:attr:maxLength"
})
#endif
getDOMHTMLInputElementMultiple :: (MonadIO m, IsDOMHTMLInputElement o) => o -> m Bool
getDOMHTMLInputElementMultiple :: forall (m :: * -> *) o.
(MonadIO m, IsDOMHTMLInputElement o) =>
o -> m Bool
getDOMHTMLInputElementMultiple o
obj = IO Bool -> m Bool
forall a. IO a -> m a
forall (m :: * -> *) a. MonadIO m => IO a -> m a
MIO.liftIO (IO Bool -> m Bool) -> IO Bool -> m Bool
forall a b. (a -> b) -> a -> b
$ o -> String -> IO Bool
forall a. GObject a => a -> String -> IO Bool
B.Properties.getObjectPropertyBool o
obj String
"multiple"
setDOMHTMLInputElementMultiple :: (MonadIO m, IsDOMHTMLInputElement o) => o -> Bool -> m ()
setDOMHTMLInputElementMultiple :: forall (m :: * -> *) o.
(MonadIO m, IsDOMHTMLInputElement o) =>
o -> Bool -> m ()
setDOMHTMLInputElementMultiple o
obj Bool
val = IO () -> m ()
forall a. IO a -> m a
forall (m :: * -> *) a. MonadIO m => IO a -> m a
MIO.liftIO (IO () -> m ()) -> IO () -> m ()
forall a b. (a -> b) -> a -> b
$ do
o -> String -> Bool -> IO ()
forall a. GObject a => a -> String -> Bool -> IO ()
B.Properties.setObjectPropertyBool o
obj String
"multiple" Bool
val
constructDOMHTMLInputElementMultiple :: (IsDOMHTMLInputElement o, MIO.MonadIO m) => Bool -> m (GValueConstruct o)
constructDOMHTMLInputElementMultiple :: forall o (m :: * -> *).
(IsDOMHTMLInputElement o, MonadIO m) =>
Bool -> m (GValueConstruct o)
constructDOMHTMLInputElementMultiple Bool
val = IO (GValueConstruct o) -> m (GValueConstruct o)
forall a. IO a -> m a
forall (m :: * -> *) a. MonadIO m => IO a -> m a
MIO.liftIO (IO (GValueConstruct o) -> m (GValueConstruct o))
-> IO (GValueConstruct o) -> m (GValueConstruct o)
forall a b. (a -> b) -> a -> b
$ do
IO (GValueConstruct o) -> IO (GValueConstruct o)
forall a. IO a -> IO a
forall (m :: * -> *) a. MonadIO m => IO a -> m a
MIO.liftIO (IO (GValueConstruct o) -> IO (GValueConstruct o))
-> IO (GValueConstruct o) -> IO (GValueConstruct o)
forall a b. (a -> b) -> a -> b
$ String -> Bool -> IO (GValueConstruct o)
forall o. String -> Bool -> IO (GValueConstruct o)
B.Properties.constructObjectPropertyBool String
"multiple" Bool
val
#if defined(ENABLE_OVERLOADING)
data DOMHTMLInputElementMultiplePropertyInfo
instance AttrInfo DOMHTMLInputElementMultiplePropertyInfo where
type AttrAllowedOps DOMHTMLInputElementMultiplePropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]
type AttrBaseTypeConstraint DOMHTMLInputElementMultiplePropertyInfo = IsDOMHTMLInputElement
type AttrSetTypeConstraint DOMHTMLInputElementMultiplePropertyInfo = (~) Bool
type AttrTransferTypeConstraint DOMHTMLInputElementMultiplePropertyInfo = (~) Bool
type AttrTransferType DOMHTMLInputElementMultiplePropertyInfo = Bool
type AttrGetType DOMHTMLInputElementMultiplePropertyInfo = Bool
type AttrLabel DOMHTMLInputElementMultiplePropertyInfo = "multiple"
type AttrOrigin DOMHTMLInputElementMultiplePropertyInfo = DOMHTMLInputElement
attrGet = getDOMHTMLInputElementMultiple
attrSet = setDOMHTMLInputElementMultiple
attrTransfer _ v = do
return v
attrConstruct = constructDOMHTMLInputElementMultiple
attrClear = undefined
dbgAttrInfo = P.Just (O.ResolvedSymbolInfo {
O.resolvedSymbolName = "GI.WebKit2WebExtension.Objects.DOMHTMLInputElement.multiple"
, O.resolvedSymbolURL = "https://hackage.haskell.org/package/gi-webkit2webextension-4.0.28/docs/GI-WebKit2WebExtension-Objects-DOMHTMLInputElement.html#g:attr:multiple"
})
#endif
getDOMHTMLInputElementName :: (MonadIO m, IsDOMHTMLInputElement o) => o -> m (Maybe T.Text)
getDOMHTMLInputElementName :: forall (m :: * -> *) o.
(MonadIO m, IsDOMHTMLInputElement o) =>
o -> m (Maybe Text)
getDOMHTMLInputElementName o
obj = IO (Maybe Text) -> m (Maybe Text)
forall a. IO a -> m a
forall (m :: * -> *) a. MonadIO m => IO a -> m a
MIO.liftIO (IO (Maybe Text) -> m (Maybe Text))
-> IO (Maybe Text) -> m (Maybe Text)
forall a b. (a -> b) -> a -> b
$ o -> String -> IO (Maybe Text)
forall a. GObject a => a -> String -> IO (Maybe Text)
B.Properties.getObjectPropertyString o
obj String
"name"
setDOMHTMLInputElementName :: (MonadIO m, IsDOMHTMLInputElement o) => o -> T.Text -> m ()
setDOMHTMLInputElementName :: forall (m :: * -> *) o.
(MonadIO m, IsDOMHTMLInputElement o) =>
o -> Text -> m ()
setDOMHTMLInputElementName o
obj Text
val = IO () -> m ()
forall a. IO a -> m a
forall (m :: * -> *) a. MonadIO m => IO a -> m a
MIO.liftIO (IO () -> m ()) -> IO () -> m ()
forall a b. (a -> b) -> a -> b
$ do
o -> String -> Maybe Text -> IO ()
forall a. GObject a => a -> String -> Maybe Text -> IO ()
B.Properties.setObjectPropertyString o
obj String
"name" (Text -> Maybe Text
forall a. a -> Maybe a
Just Text
val)
constructDOMHTMLInputElementName :: (IsDOMHTMLInputElement o, MIO.MonadIO m) => T.Text -> m (GValueConstruct o)
constructDOMHTMLInputElementName :: forall o (m :: * -> *).
(IsDOMHTMLInputElement o, MonadIO m) =>
Text -> m (GValueConstruct o)
constructDOMHTMLInputElementName Text
val = IO (GValueConstruct o) -> m (GValueConstruct o)
forall a. IO a -> m a
forall (m :: * -> *) a. MonadIO m => IO a -> m a
MIO.liftIO (IO (GValueConstruct o) -> m (GValueConstruct o))
-> IO (GValueConstruct o) -> m (GValueConstruct o)
forall a b. (a -> b) -> a -> b
$ do
IO (GValueConstruct o) -> IO (GValueConstruct o)
forall a. IO a -> IO a
forall (m :: * -> *) a. MonadIO m => IO a -> m a
MIO.liftIO (IO (GValueConstruct o) -> IO (GValueConstruct o))
-> IO (GValueConstruct o) -> IO (GValueConstruct o)
forall a b. (a -> b) -> a -> b
$ String -> Maybe Text -> IO (GValueConstruct o)
forall o. String -> Maybe Text -> IO (GValueConstruct o)
B.Properties.constructObjectPropertyString String
"name" (Text -> Maybe Text
forall a. a -> Maybe a
P.Just Text
val)
#if defined(ENABLE_OVERLOADING)
data DOMHTMLInputElementNamePropertyInfo
instance AttrInfo DOMHTMLInputElementNamePropertyInfo where
type AttrAllowedOps DOMHTMLInputElementNamePropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]
type AttrBaseTypeConstraint DOMHTMLInputElementNamePropertyInfo = IsDOMHTMLInputElement
type AttrSetTypeConstraint DOMHTMLInputElementNamePropertyInfo = (~) T.Text
type AttrTransferTypeConstraint DOMHTMLInputElementNamePropertyInfo = (~) T.Text
type AttrTransferType DOMHTMLInputElementNamePropertyInfo = T.Text
type AttrGetType DOMHTMLInputElementNamePropertyInfo = (Maybe T.Text)
type AttrLabel DOMHTMLInputElementNamePropertyInfo = "name"
type AttrOrigin DOMHTMLInputElementNamePropertyInfo = DOMHTMLInputElement
attrGet = getDOMHTMLInputElementName
attrSet = setDOMHTMLInputElementName
attrTransfer _ v = do
return v
attrConstruct = constructDOMHTMLInputElementName
attrClear = undefined
dbgAttrInfo = P.Just (O.ResolvedSymbolInfo {
O.resolvedSymbolName = "GI.WebKit2WebExtension.Objects.DOMHTMLInputElement.name"
, O.resolvedSymbolURL = "https://hackage.haskell.org/package/gi-webkit2webextension-4.0.28/docs/GI-WebKit2WebExtension-Objects-DOMHTMLInputElement.html#g:attr:name"
})
#endif
getDOMHTMLInputElementReadOnly :: (MonadIO m, IsDOMHTMLInputElement o) => o -> m Bool
getDOMHTMLInputElementReadOnly :: forall (m :: * -> *) o.
(MonadIO m, IsDOMHTMLInputElement o) =>
o -> m Bool
getDOMHTMLInputElementReadOnly o
obj = IO Bool -> m Bool
forall a. IO a -> m a
forall (m :: * -> *) a. MonadIO m => IO a -> m a
MIO.liftIO (IO Bool -> m Bool) -> IO Bool -> m Bool
forall a b. (a -> b) -> a -> b
$ o -> String -> IO Bool
forall a. GObject a => a -> String -> IO Bool
B.Properties.getObjectPropertyBool o
obj String
"read-only"
setDOMHTMLInputElementReadOnly :: (MonadIO m, IsDOMHTMLInputElement o) => o -> Bool -> m ()
setDOMHTMLInputElementReadOnly :: forall (m :: * -> *) o.
(MonadIO m, IsDOMHTMLInputElement o) =>
o -> Bool -> m ()
setDOMHTMLInputElementReadOnly o
obj Bool
val = IO () -> m ()
forall a. IO a -> m a
forall (m :: * -> *) a. MonadIO m => IO a -> m a
MIO.liftIO (IO () -> m ()) -> IO () -> m ()
forall a b. (a -> b) -> a -> b
$ do
o -> String -> Bool -> IO ()
forall a. GObject a => a -> String -> Bool -> IO ()
B.Properties.setObjectPropertyBool o
obj String
"read-only" Bool
val
constructDOMHTMLInputElementReadOnly :: (IsDOMHTMLInputElement o, MIO.MonadIO m) => Bool -> m (GValueConstruct o)
constructDOMHTMLInputElementReadOnly :: forall o (m :: * -> *).
(IsDOMHTMLInputElement o, MonadIO m) =>
Bool -> m (GValueConstruct o)
constructDOMHTMLInputElementReadOnly Bool
val = IO (GValueConstruct o) -> m (GValueConstruct o)
forall a. IO a -> m a
forall (m :: * -> *) a. MonadIO m => IO a -> m a
MIO.liftIO (IO (GValueConstruct o) -> m (GValueConstruct o))
-> IO (GValueConstruct o) -> m (GValueConstruct o)
forall a b. (a -> b) -> a -> b
$ do
IO (GValueConstruct o) -> IO (GValueConstruct o)
forall a. IO a -> IO a
forall (m :: * -> *) a. MonadIO m => IO a -> m a
MIO.liftIO (IO (GValueConstruct o) -> IO (GValueConstruct o))
-> IO (GValueConstruct o) -> IO (GValueConstruct o)
forall a b. (a -> b) -> a -> b
$ String -> Bool -> IO (GValueConstruct o)
forall o. String -> Bool -> IO (GValueConstruct o)
B.Properties.constructObjectPropertyBool String
"read-only" Bool
val
#if defined(ENABLE_OVERLOADING)
data DOMHTMLInputElementReadOnlyPropertyInfo
instance AttrInfo DOMHTMLInputElementReadOnlyPropertyInfo where
type AttrAllowedOps DOMHTMLInputElementReadOnlyPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]
type AttrBaseTypeConstraint DOMHTMLInputElementReadOnlyPropertyInfo = IsDOMHTMLInputElement
type AttrSetTypeConstraint DOMHTMLInputElementReadOnlyPropertyInfo = (~) Bool
type AttrTransferTypeConstraint DOMHTMLInputElementReadOnlyPropertyInfo = (~) Bool
type AttrTransferType DOMHTMLInputElementReadOnlyPropertyInfo = Bool
type AttrGetType DOMHTMLInputElementReadOnlyPropertyInfo = Bool
type AttrLabel DOMHTMLInputElementReadOnlyPropertyInfo = "read-only"
type AttrOrigin DOMHTMLInputElementReadOnlyPropertyInfo = DOMHTMLInputElement
attrGet = getDOMHTMLInputElementReadOnly
attrSet = setDOMHTMLInputElementReadOnly
attrTransfer _ v = do
return v
attrConstruct = constructDOMHTMLInputElementReadOnly
attrClear = undefined
dbgAttrInfo = P.Just (O.ResolvedSymbolInfo {
O.resolvedSymbolName = "GI.WebKit2WebExtension.Objects.DOMHTMLInputElement.readOnly"
, O.resolvedSymbolURL = "https://hackage.haskell.org/package/gi-webkit2webextension-4.0.28/docs/GI-WebKit2WebExtension-Objects-DOMHTMLInputElement.html#g:attr:readOnly"
})
#endif
getDOMHTMLInputElementSize :: (MonadIO m, IsDOMHTMLInputElement o) => o -> m CULong
getDOMHTMLInputElementSize :: forall (m :: * -> *) o.
(MonadIO m, IsDOMHTMLInputElement o) =>
o -> m CULong
getDOMHTMLInputElementSize o
obj = IO CULong -> m CULong
forall a. IO a -> m a
forall (m :: * -> *) a. MonadIO m => IO a -> m a
MIO.liftIO (IO CULong -> m CULong) -> IO CULong -> m CULong
forall a b. (a -> b) -> a -> b
$ o -> String -> IO CULong
forall a. GObject a => a -> String -> IO CULong
B.Properties.getObjectPropertyULong o
obj String
"size"
setDOMHTMLInputElementSize :: (MonadIO m, IsDOMHTMLInputElement o) => o -> CULong -> m ()
setDOMHTMLInputElementSize :: forall (m :: * -> *) o.
(MonadIO m, IsDOMHTMLInputElement o) =>
o -> CULong -> m ()
setDOMHTMLInputElementSize o
obj CULong
val = IO () -> m ()
forall a. IO a -> m a
forall (m :: * -> *) a. MonadIO m => IO a -> m a
MIO.liftIO (IO () -> m ()) -> IO () -> m ()
forall a b. (a -> b) -> a -> b
$ do
o -> String -> CULong -> IO ()
forall a. GObject a => a -> String -> CULong -> IO ()
B.Properties.setObjectPropertyULong o
obj String
"size" CULong
val
constructDOMHTMLInputElementSize :: (IsDOMHTMLInputElement o, MIO.MonadIO m) => CULong -> m (GValueConstruct o)
constructDOMHTMLInputElementSize :: forall o (m :: * -> *).
(IsDOMHTMLInputElement o, MonadIO m) =>
CULong -> m (GValueConstruct o)
constructDOMHTMLInputElementSize CULong
val = IO (GValueConstruct o) -> m (GValueConstruct o)
forall a. IO a -> m a
forall (m :: * -> *) a. MonadIO m => IO a -> m a
MIO.liftIO (IO (GValueConstruct o) -> m (GValueConstruct o))
-> IO (GValueConstruct o) -> m (GValueConstruct o)
forall a b. (a -> b) -> a -> b
$ do
IO (GValueConstruct o) -> IO (GValueConstruct o)
forall a. IO a -> IO a
forall (m :: * -> *) a. MonadIO m => IO a -> m a
MIO.liftIO (IO (GValueConstruct o) -> IO (GValueConstruct o))
-> IO (GValueConstruct o) -> IO (GValueConstruct o)
forall a b. (a -> b) -> a -> b
$ String -> CULong -> IO (GValueConstruct o)
forall o. String -> CULong -> IO (GValueConstruct o)
B.Properties.constructObjectPropertyULong String
"size" CULong
val
#if defined(ENABLE_OVERLOADING)
data DOMHTMLInputElementSizePropertyInfo
instance AttrInfo DOMHTMLInputElementSizePropertyInfo where
type AttrAllowedOps DOMHTMLInputElementSizePropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]
type AttrBaseTypeConstraint DOMHTMLInputElementSizePropertyInfo = IsDOMHTMLInputElement
type AttrSetTypeConstraint DOMHTMLInputElementSizePropertyInfo = (~) CULong
type AttrTransferTypeConstraint DOMHTMLInputElementSizePropertyInfo = (~) CULong
type AttrTransferType DOMHTMLInputElementSizePropertyInfo = CULong
type AttrGetType DOMHTMLInputElementSizePropertyInfo = CULong
type AttrLabel DOMHTMLInputElementSizePropertyInfo = "size"
type AttrOrigin DOMHTMLInputElementSizePropertyInfo = DOMHTMLInputElement
attrGet = getDOMHTMLInputElementSize
attrSet = setDOMHTMLInputElementSize
attrTransfer _ v = do
return v
attrConstruct = constructDOMHTMLInputElementSize
attrClear = undefined
dbgAttrInfo = P.Just (O.ResolvedSymbolInfo {
O.resolvedSymbolName = "GI.WebKit2WebExtension.Objects.DOMHTMLInputElement.size"
, O.resolvedSymbolURL = "https://hackage.haskell.org/package/gi-webkit2webextension-4.0.28/docs/GI-WebKit2WebExtension-Objects-DOMHTMLInputElement.html#g:attr:size"
})
#endif
getDOMHTMLInputElementSrc :: (MonadIO m, IsDOMHTMLInputElement o) => o -> m (Maybe T.Text)
getDOMHTMLInputElementSrc :: forall (m :: * -> *) o.
(MonadIO m, IsDOMHTMLInputElement o) =>
o -> m (Maybe Text)
getDOMHTMLInputElementSrc o
obj = IO (Maybe Text) -> m (Maybe Text)
forall a. IO a -> m a
forall (m :: * -> *) a. MonadIO m => IO a -> m a
MIO.liftIO (IO (Maybe Text) -> m (Maybe Text))
-> IO (Maybe Text) -> m (Maybe Text)
forall a b. (a -> b) -> a -> b
$ o -> String -> IO (Maybe Text)
forall a. GObject a => a -> String -> IO (Maybe Text)
B.Properties.getObjectPropertyString o
obj String
"src"
setDOMHTMLInputElementSrc :: (MonadIO m, IsDOMHTMLInputElement o) => o -> T.Text -> m ()
setDOMHTMLInputElementSrc :: forall (m :: * -> *) o.
(MonadIO m, IsDOMHTMLInputElement o) =>
o -> Text -> m ()
setDOMHTMLInputElementSrc o
obj Text
val = IO () -> m ()
forall a. IO a -> m a
forall (m :: * -> *) a. MonadIO m => IO a -> m a
MIO.liftIO (IO () -> m ()) -> IO () -> m ()
forall a b. (a -> b) -> a -> b
$ do
o -> String -> Maybe Text -> IO ()
forall a. GObject a => a -> String -> Maybe Text -> IO ()
B.Properties.setObjectPropertyString o
obj String
"src" (Text -> Maybe Text
forall a. a -> Maybe a
Just Text
val)
constructDOMHTMLInputElementSrc :: (IsDOMHTMLInputElement o, MIO.MonadIO m) => T.Text -> m (GValueConstruct o)
constructDOMHTMLInputElementSrc :: forall o (m :: * -> *).
(IsDOMHTMLInputElement o, MonadIO m) =>
Text -> m (GValueConstruct o)
constructDOMHTMLInputElementSrc Text
val = IO (GValueConstruct o) -> m (GValueConstruct o)
forall a. IO a -> m a
forall (m :: * -> *) a. MonadIO m => IO a -> m a
MIO.liftIO (IO (GValueConstruct o) -> m (GValueConstruct o))
-> IO (GValueConstruct o) -> m (GValueConstruct o)
forall a b. (a -> b) -> a -> b
$ do
IO (GValueConstruct o) -> IO (GValueConstruct o)
forall a. IO a -> IO a
forall (m :: * -> *) a. MonadIO m => IO a -> m a
MIO.liftIO (IO (GValueConstruct o) -> IO (GValueConstruct o))
-> IO (GValueConstruct o) -> IO (GValueConstruct o)
forall a b. (a -> b) -> a -> b
$ String -> Maybe Text -> IO (GValueConstruct o)
forall o. String -> Maybe Text -> IO (GValueConstruct o)
B.Properties.constructObjectPropertyString String
"src" (Text -> Maybe Text
forall a. a -> Maybe a
P.Just Text
val)
#if defined(ENABLE_OVERLOADING)
data DOMHTMLInputElementSrcPropertyInfo
instance AttrInfo DOMHTMLInputElementSrcPropertyInfo where
type AttrAllowedOps DOMHTMLInputElementSrcPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]
type AttrBaseTypeConstraint DOMHTMLInputElementSrcPropertyInfo = IsDOMHTMLInputElement
type AttrSetTypeConstraint DOMHTMLInputElementSrcPropertyInfo = (~) T.Text
type AttrTransferTypeConstraint DOMHTMLInputElementSrcPropertyInfo = (~) T.Text
type AttrTransferType DOMHTMLInputElementSrcPropertyInfo = T.Text
type AttrGetType DOMHTMLInputElementSrcPropertyInfo = (Maybe T.Text)
type AttrLabel DOMHTMLInputElementSrcPropertyInfo = "src"
type AttrOrigin DOMHTMLInputElementSrcPropertyInfo = DOMHTMLInputElement
attrGet = getDOMHTMLInputElementSrc
attrSet = setDOMHTMLInputElementSrc
attrTransfer _ v = do
return v
attrConstruct = constructDOMHTMLInputElementSrc
attrClear = undefined
dbgAttrInfo = P.Just (O.ResolvedSymbolInfo {
O.resolvedSymbolName = "GI.WebKit2WebExtension.Objects.DOMHTMLInputElement.src"
, O.resolvedSymbolURL = "https://hackage.haskell.org/package/gi-webkit2webextension-4.0.28/docs/GI-WebKit2WebExtension-Objects-DOMHTMLInputElement.html#g:attr:src"
})
#endif
getDOMHTMLInputElementType :: (MonadIO m, IsDOMHTMLInputElement o) => o -> m (Maybe T.Text)
getDOMHTMLInputElementType :: forall (m :: * -> *) o.
(MonadIO m, IsDOMHTMLInputElement o) =>
o -> m (Maybe Text)
getDOMHTMLInputElementType o
obj = IO (Maybe Text) -> m (Maybe Text)
forall a. IO a -> m a
forall (m :: * -> *) a. MonadIO m => IO a -> m a
MIO.liftIO (IO (Maybe Text) -> m (Maybe Text))
-> IO (Maybe Text) -> m (Maybe Text)
forall a b. (a -> b) -> a -> b
$ o -> String -> IO (Maybe Text)
forall a. GObject a => a -> String -> IO (Maybe Text)
B.Properties.getObjectPropertyString o
obj String
"type"
setDOMHTMLInputElementType :: (MonadIO m, IsDOMHTMLInputElement o) => o -> T.Text -> m ()
setDOMHTMLInputElementType :: forall (m :: * -> *) o.
(MonadIO m, IsDOMHTMLInputElement o) =>
o -> Text -> m ()
setDOMHTMLInputElementType o
obj Text
val = IO () -> m ()
forall a. IO a -> m a
forall (m :: * -> *) a. MonadIO m => IO a -> m a
MIO.liftIO (IO () -> m ()) -> IO () -> m ()
forall a b. (a -> b) -> a -> b
$ do
o -> String -> Maybe Text -> IO ()
forall a. GObject a => a -> String -> Maybe Text -> IO ()
B.Properties.setObjectPropertyString o
obj String
"type" (Text -> Maybe Text
forall a. a -> Maybe a
Just Text
val)
constructDOMHTMLInputElementType :: (IsDOMHTMLInputElement o, MIO.MonadIO m) => T.Text -> m (GValueConstruct o)
constructDOMHTMLInputElementType :: forall o (m :: * -> *).
(IsDOMHTMLInputElement o, MonadIO m) =>
Text -> m (GValueConstruct o)
constructDOMHTMLInputElementType Text
val = IO (GValueConstruct o) -> m (GValueConstruct o)
forall a. IO a -> m a
forall (m :: * -> *) a. MonadIO m => IO a -> m a
MIO.liftIO (IO (GValueConstruct o) -> m (GValueConstruct o))
-> IO (GValueConstruct o) -> m (GValueConstruct o)
forall a b. (a -> b) -> a -> b
$ do
IO (GValueConstruct o) -> IO (GValueConstruct o)
forall a. IO a -> IO a
forall (m :: * -> *) a. MonadIO m => IO a -> m a
MIO.liftIO (IO (GValueConstruct o) -> IO (GValueConstruct o))
-> IO (GValueConstruct o) -> IO (GValueConstruct o)
forall a b. (a -> b) -> a -> b
$ String -> Maybe Text -> IO (GValueConstruct o)
forall o. String -> Maybe Text -> IO (GValueConstruct o)
B.Properties.constructObjectPropertyString String
"type" (Text -> Maybe Text
forall a. a -> Maybe a
P.Just Text
val)
clearDOMHTMLInputElementType :: (MonadIO m, IsDOMHTMLInputElement o) => o -> m ()
clearDOMHTMLInputElementType :: forall (m :: * -> *) o.
(MonadIO m, IsDOMHTMLInputElement o) =>
o -> m ()
clearDOMHTMLInputElementType o
obj = IO () -> m ()
forall a. IO a -> m a
forall (m :: * -> *) a. MonadIO m => IO a -> m a
liftIO (IO () -> m ()) -> IO () -> m ()
forall a b. (a -> b) -> a -> b
$ o -> String -> Maybe Text -> IO ()
forall a. GObject a => a -> String -> Maybe Text -> IO ()
B.Properties.setObjectPropertyString o
obj String
"type" (Maybe Text
forall a. Maybe a
Nothing :: Maybe T.Text)
#if defined(ENABLE_OVERLOADING)
data DOMHTMLInputElementTypePropertyInfo
instance AttrInfo DOMHTMLInputElementTypePropertyInfo where
type AttrAllowedOps DOMHTMLInputElementTypePropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet, 'AttrClear]
type AttrBaseTypeConstraint DOMHTMLInputElementTypePropertyInfo = IsDOMHTMLInputElement
type AttrSetTypeConstraint DOMHTMLInputElementTypePropertyInfo = (~) T.Text
type AttrTransferTypeConstraint DOMHTMLInputElementTypePropertyInfo = (~) T.Text
type AttrTransferType DOMHTMLInputElementTypePropertyInfo = T.Text
type AttrGetType DOMHTMLInputElementTypePropertyInfo = (Maybe T.Text)
type AttrLabel DOMHTMLInputElementTypePropertyInfo = "type"
type AttrOrigin DOMHTMLInputElementTypePropertyInfo = DOMHTMLInputElement
attrGet = getDOMHTMLInputElementType
attrSet = setDOMHTMLInputElementType
attrTransfer _ v = do
return v
attrConstruct = constructDOMHTMLInputElementType
attrClear = clearDOMHTMLInputElementType
dbgAttrInfo = P.Just (O.ResolvedSymbolInfo {
O.resolvedSymbolName = "GI.WebKit2WebExtension.Objects.DOMHTMLInputElement.type"
, O.resolvedSymbolURL = "https://hackage.haskell.org/package/gi-webkit2webextension-4.0.28/docs/GI-WebKit2WebExtension-Objects-DOMHTMLInputElement.html#g:attr:type"
})
#endif
getDOMHTMLInputElementUseMap :: (MonadIO m, IsDOMHTMLInputElement o) => o -> m (Maybe T.Text)
getDOMHTMLInputElementUseMap :: forall (m :: * -> *) o.
(MonadIO m, IsDOMHTMLInputElement o) =>
o -> m (Maybe Text)
getDOMHTMLInputElementUseMap o
obj = IO (Maybe Text) -> m (Maybe Text)
forall a. IO a -> m a
forall (m :: * -> *) a. MonadIO m => IO a -> m a
MIO.liftIO (IO (Maybe Text) -> m (Maybe Text))
-> IO (Maybe Text) -> m (Maybe Text)
forall a b. (a -> b) -> a -> b
$ o -> String -> IO (Maybe Text)
forall a. GObject a => a -> String -> IO (Maybe Text)
B.Properties.getObjectPropertyString o
obj String
"use-map"
setDOMHTMLInputElementUseMap :: (MonadIO m, IsDOMHTMLInputElement o) => o -> T.Text -> m ()
setDOMHTMLInputElementUseMap :: forall (m :: * -> *) o.
(MonadIO m, IsDOMHTMLInputElement o) =>
o -> Text -> m ()
setDOMHTMLInputElementUseMap o
obj Text
val = IO () -> m ()
forall a. IO a -> m a
forall (m :: * -> *) a. MonadIO m => IO a -> m a
MIO.liftIO (IO () -> m ()) -> IO () -> m ()
forall a b. (a -> b) -> a -> b
$ do
o -> String -> Maybe Text -> IO ()
forall a. GObject a => a -> String -> Maybe Text -> IO ()
B.Properties.setObjectPropertyString o
obj String
"use-map" (Text -> Maybe Text
forall a. a -> Maybe a
Just Text
val)
constructDOMHTMLInputElementUseMap :: (IsDOMHTMLInputElement o, MIO.MonadIO m) => T.Text -> m (GValueConstruct o)
constructDOMHTMLInputElementUseMap :: forall o (m :: * -> *).
(IsDOMHTMLInputElement o, MonadIO m) =>
Text -> m (GValueConstruct o)
constructDOMHTMLInputElementUseMap Text
val = IO (GValueConstruct o) -> m (GValueConstruct o)
forall a. IO a -> m a
forall (m :: * -> *) a. MonadIO m => IO a -> m a
MIO.liftIO (IO (GValueConstruct o) -> m (GValueConstruct o))
-> IO (GValueConstruct o) -> m (GValueConstruct o)
forall a b. (a -> b) -> a -> b
$ do
IO (GValueConstruct o) -> IO (GValueConstruct o)
forall a. IO a -> IO a
forall (m :: * -> *) a. MonadIO m => IO a -> m a
MIO.liftIO (IO (GValueConstruct o) -> IO (GValueConstruct o))
-> IO (GValueConstruct o) -> IO (GValueConstruct o)
forall a b. (a -> b) -> a -> b
$ String -> Maybe Text -> IO (GValueConstruct o)
forall o. String -> Maybe Text -> IO (GValueConstruct o)
B.Properties.constructObjectPropertyString String
"use-map" (Text -> Maybe Text
forall a. a -> Maybe a
P.Just Text
val)
#if defined(ENABLE_OVERLOADING)
data DOMHTMLInputElementUseMapPropertyInfo
instance AttrInfo DOMHTMLInputElementUseMapPropertyInfo where
type AttrAllowedOps DOMHTMLInputElementUseMapPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]
type AttrBaseTypeConstraint DOMHTMLInputElementUseMapPropertyInfo = IsDOMHTMLInputElement
type AttrSetTypeConstraint DOMHTMLInputElementUseMapPropertyInfo = (~) T.Text
type AttrTransferTypeConstraint DOMHTMLInputElementUseMapPropertyInfo = (~) T.Text
type AttrTransferType DOMHTMLInputElementUseMapPropertyInfo = T.Text
type AttrGetType DOMHTMLInputElementUseMapPropertyInfo = (Maybe T.Text)
type AttrLabel DOMHTMLInputElementUseMapPropertyInfo = "use-map"
type AttrOrigin DOMHTMLInputElementUseMapPropertyInfo = DOMHTMLInputElement
attrGet = getDOMHTMLInputElementUseMap
attrSet = setDOMHTMLInputElementUseMap
attrTransfer _ v = do
return v
attrConstruct = constructDOMHTMLInputElementUseMap
attrClear = undefined
dbgAttrInfo = P.Just (O.ResolvedSymbolInfo {
O.resolvedSymbolName = "GI.WebKit2WebExtension.Objects.DOMHTMLInputElement.useMap"
, O.resolvedSymbolURL = "https://hackage.haskell.org/package/gi-webkit2webextension-4.0.28/docs/GI-WebKit2WebExtension-Objects-DOMHTMLInputElement.html#g:attr:useMap"
})
#endif
getDOMHTMLInputElementValue :: (MonadIO m, IsDOMHTMLInputElement o) => o -> m (Maybe T.Text)
getDOMHTMLInputElementValue :: forall (m :: * -> *) o.
(MonadIO m, IsDOMHTMLInputElement o) =>
o -> m (Maybe Text)
getDOMHTMLInputElementValue o
obj = IO (Maybe Text) -> m (Maybe Text)
forall a. IO a -> m a
forall (m :: * -> *) a. MonadIO m => IO a -> m a
MIO.liftIO (IO (Maybe Text) -> m (Maybe Text))
-> IO (Maybe Text) -> m (Maybe Text)
forall a b. (a -> b) -> a -> b
$ o -> String -> IO (Maybe Text)
forall a. GObject a => a -> String -> IO (Maybe Text)
B.Properties.getObjectPropertyString o
obj String
"value"
setDOMHTMLInputElementValue :: (MonadIO m, IsDOMHTMLInputElement o) => o -> T.Text -> m ()
setDOMHTMLInputElementValue :: forall (m :: * -> *) o.
(MonadIO m, IsDOMHTMLInputElement o) =>
o -> Text -> m ()
setDOMHTMLInputElementValue o
obj Text
val = IO () -> m ()
forall a. IO a -> m a
forall (m :: * -> *) a. MonadIO m => IO a -> m a
MIO.liftIO (IO () -> m ()) -> IO () -> m ()
forall a b. (a -> b) -> a -> b
$ do
o -> String -> Maybe Text -> IO ()
forall a. GObject a => a -> String -> Maybe Text -> IO ()
B.Properties.setObjectPropertyString o
obj String
"value" (Text -> Maybe Text
forall a. a -> Maybe a
Just Text
val)
constructDOMHTMLInputElementValue :: (IsDOMHTMLInputElement o, MIO.MonadIO m) => T.Text -> m (GValueConstruct o)
constructDOMHTMLInputElementValue :: forall o (m :: * -> *).
(IsDOMHTMLInputElement o, MonadIO m) =>
Text -> m (GValueConstruct o)
constructDOMHTMLInputElementValue Text
val = IO (GValueConstruct o) -> m (GValueConstruct o)
forall a. IO a -> m a
forall (m :: * -> *) a. MonadIO m => IO a -> m a
MIO.liftIO (IO (GValueConstruct o) -> m (GValueConstruct o))
-> IO (GValueConstruct o) -> m (GValueConstruct o)
forall a b. (a -> b) -> a -> b
$ do
IO (GValueConstruct o) -> IO (GValueConstruct o)
forall a. IO a -> IO a
forall (m :: * -> *) a. MonadIO m => IO a -> m a
MIO.liftIO (IO (GValueConstruct o) -> IO (GValueConstruct o))
-> IO (GValueConstruct o) -> IO (GValueConstruct o)
forall a b. (a -> b) -> a -> b
$ String -> Maybe Text -> IO (GValueConstruct o)
forall o. String -> Maybe Text -> IO (GValueConstruct o)
B.Properties.constructObjectPropertyString String
"value" (Text -> Maybe Text
forall a. a -> Maybe a
P.Just Text
val)
#if defined(ENABLE_OVERLOADING)
data DOMHTMLInputElementValuePropertyInfo
instance AttrInfo DOMHTMLInputElementValuePropertyInfo where
type AttrAllowedOps DOMHTMLInputElementValuePropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]
type AttrBaseTypeConstraint DOMHTMLInputElementValuePropertyInfo = IsDOMHTMLInputElement
type AttrSetTypeConstraint DOMHTMLInputElementValuePropertyInfo = (~) T.Text
type AttrTransferTypeConstraint DOMHTMLInputElementValuePropertyInfo = (~) T.Text
type AttrTransferType DOMHTMLInputElementValuePropertyInfo = T.Text
type AttrGetType DOMHTMLInputElementValuePropertyInfo = (Maybe T.Text)
type AttrLabel DOMHTMLInputElementValuePropertyInfo = "value"
type AttrOrigin DOMHTMLInputElementValuePropertyInfo = DOMHTMLInputElement
attrGet = getDOMHTMLInputElementValue
attrSet = setDOMHTMLInputElementValue
attrTransfer _ v = do
return v
attrConstruct = constructDOMHTMLInputElementValue
attrClear = undefined
dbgAttrInfo = P.Just (O.ResolvedSymbolInfo {
O.resolvedSymbolName = "GI.WebKit2WebExtension.Objects.DOMHTMLInputElement.value"
, O.resolvedSymbolURL = "https://hackage.haskell.org/package/gi-webkit2webextension-4.0.28/docs/GI-WebKit2WebExtension-Objects-DOMHTMLInputElement.html#g:attr:value"
})
#endif
getDOMHTMLInputElementWidth :: (MonadIO m, IsDOMHTMLInputElement o) => o -> m CULong
getDOMHTMLInputElementWidth :: forall (m :: * -> *) o.
(MonadIO m, IsDOMHTMLInputElement o) =>
o -> m CULong
getDOMHTMLInputElementWidth o
obj = IO CULong -> m CULong
forall a. IO a -> m a
forall (m :: * -> *) a. MonadIO m => IO a -> m a
MIO.liftIO (IO CULong -> m CULong) -> IO CULong -> m CULong
forall a b. (a -> b) -> a -> b
$ o -> String -> IO CULong
forall a. GObject a => a -> String -> IO CULong
B.Properties.getObjectPropertyULong o
obj String
"width"
setDOMHTMLInputElementWidth :: (MonadIO m, IsDOMHTMLInputElement o) => o -> CULong -> m ()
setDOMHTMLInputElementWidth :: forall (m :: * -> *) o.
(MonadIO m, IsDOMHTMLInputElement o) =>
o -> CULong -> m ()
setDOMHTMLInputElementWidth o
obj CULong
val = IO () -> m ()
forall a. IO a -> m a
forall (m :: * -> *) a. MonadIO m => IO a -> m a
MIO.liftIO (IO () -> m ()) -> IO () -> m ()
forall a b. (a -> b) -> a -> b
$ do
o -> String -> CULong -> IO ()
forall a. GObject a => a -> String -> CULong -> IO ()
B.Properties.setObjectPropertyULong o
obj String
"width" CULong
val
constructDOMHTMLInputElementWidth :: (IsDOMHTMLInputElement o, MIO.MonadIO m) => CULong -> m (GValueConstruct o)
constructDOMHTMLInputElementWidth :: forall o (m :: * -> *).
(IsDOMHTMLInputElement o, MonadIO m) =>
CULong -> m (GValueConstruct o)
constructDOMHTMLInputElementWidth CULong
val = IO (GValueConstruct o) -> m (GValueConstruct o)
forall a. IO a -> m a
forall (m :: * -> *) a. MonadIO m => IO a -> m a
MIO.liftIO (IO (GValueConstruct o) -> m (GValueConstruct o))
-> IO (GValueConstruct o) -> m (GValueConstruct o)
forall a b. (a -> b) -> a -> b
$ do
IO (GValueConstruct o) -> IO (GValueConstruct o)
forall a. IO a -> IO a
forall (m :: * -> *) a. MonadIO m => IO a -> m a
MIO.liftIO (IO (GValueConstruct o) -> IO (GValueConstruct o))
-> IO (GValueConstruct o) -> IO (GValueConstruct o)
forall a b. (a -> b) -> a -> b
$ String -> CULong -> IO (GValueConstruct o)
forall o. String -> CULong -> IO (GValueConstruct o)
B.Properties.constructObjectPropertyULong String
"width" CULong
val
#if defined(ENABLE_OVERLOADING)
data DOMHTMLInputElementWidthPropertyInfo
instance AttrInfo DOMHTMLInputElementWidthPropertyInfo where
type AttrAllowedOps DOMHTMLInputElementWidthPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]
type AttrBaseTypeConstraint DOMHTMLInputElementWidthPropertyInfo = IsDOMHTMLInputElement
type AttrSetTypeConstraint DOMHTMLInputElementWidthPropertyInfo = (~) CULong
type AttrTransferTypeConstraint DOMHTMLInputElementWidthPropertyInfo = (~) CULong
type AttrTransferType DOMHTMLInputElementWidthPropertyInfo = CULong
type AttrGetType DOMHTMLInputElementWidthPropertyInfo = CULong
type AttrLabel DOMHTMLInputElementWidthPropertyInfo = "width"
type AttrOrigin DOMHTMLInputElementWidthPropertyInfo = DOMHTMLInputElement
attrGet = getDOMHTMLInputElementWidth
attrSet = setDOMHTMLInputElementWidth
attrTransfer _ v = do
return v
attrConstruct = constructDOMHTMLInputElementWidth
attrClear = undefined
dbgAttrInfo = P.Just (O.ResolvedSymbolInfo {
O.resolvedSymbolName = "GI.WebKit2WebExtension.Objects.DOMHTMLInputElement.width"
, O.resolvedSymbolURL = "https://hackage.haskell.org/package/gi-webkit2webextension-4.0.28/docs/GI-WebKit2WebExtension-Objects-DOMHTMLInputElement.html#g:attr:width"
})
#endif
getDOMHTMLInputElementWillValidate :: (MonadIO m, IsDOMHTMLInputElement o) => o -> m Bool
getDOMHTMLInputElementWillValidate :: forall (m :: * -> *) o.
(MonadIO m, IsDOMHTMLInputElement o) =>
o -> m Bool
getDOMHTMLInputElementWillValidate o
obj = IO Bool -> m Bool
forall a. IO a -> m a
forall (m :: * -> *) a. MonadIO m => IO a -> m a
MIO.liftIO (IO Bool -> m Bool) -> IO Bool -> m Bool
forall a b. (a -> b) -> a -> b
$ o -> String -> IO Bool
forall a. GObject a => a -> String -> IO Bool
B.Properties.getObjectPropertyBool o
obj String
"will-validate"
#if defined(ENABLE_OVERLOADING)
data DOMHTMLInputElementWillValidatePropertyInfo
instance AttrInfo DOMHTMLInputElementWillValidatePropertyInfo where
type AttrAllowedOps DOMHTMLInputElementWillValidatePropertyInfo = '[ 'AttrGet]
type AttrBaseTypeConstraint DOMHTMLInputElementWillValidatePropertyInfo = IsDOMHTMLInputElement
type AttrSetTypeConstraint DOMHTMLInputElementWillValidatePropertyInfo = (~) ()
type AttrTransferTypeConstraint DOMHTMLInputElementWillValidatePropertyInfo = (~) ()
type AttrTransferType DOMHTMLInputElementWillValidatePropertyInfo = ()
type AttrGetType DOMHTMLInputElementWillValidatePropertyInfo = Bool
type AttrLabel DOMHTMLInputElementWillValidatePropertyInfo = "will-validate"
type AttrOrigin DOMHTMLInputElementWillValidatePropertyInfo = DOMHTMLInputElement
attrGet = getDOMHTMLInputElementWillValidate
attrSet = undefined
attrTransfer _ = undefined
attrConstruct = undefined
attrClear = undefined
dbgAttrInfo = P.Just (O.ResolvedSymbolInfo {
O.resolvedSymbolName = "GI.WebKit2WebExtension.Objects.DOMHTMLInputElement.willValidate"
, O.resolvedSymbolURL = "https://hackage.haskell.org/package/gi-webkit2webextension-4.0.28/docs/GI-WebKit2WebExtension-Objects-DOMHTMLInputElement.html#g:attr:willValidate"
})
#endif
#if defined(ENABLE_OVERLOADING)
instance O.HasAttributeList DOMHTMLInputElement
type instance O.AttributeList DOMHTMLInputElement = DOMHTMLInputElementAttributeList
type DOMHTMLInputElementAttributeList = ('[ '("accept", DOMHTMLInputElementAcceptPropertyInfo), '("accessKey", WebKit2WebExtension.DOMHTMLElement.DOMHTMLElementAccessKeyPropertyInfo), '("align", DOMHTMLInputElementAlignPropertyInfo), '("alt", DOMHTMLInputElementAltPropertyInfo), '("attributes", WebKit2WebExtension.DOMElement.DOMElementAttributesPropertyInfo), '("autofocus", DOMHTMLInputElementAutofocusPropertyInfo), '("baseUri", WebKit2WebExtension.DOMNode.DOMNodeBaseUriPropertyInfo), '("capture", DOMHTMLInputElementCapturePropertyInfo), '("checked", DOMHTMLInputElementCheckedPropertyInfo), '("childElementCount", WebKit2WebExtension.DOMElement.DOMElementChildElementCountPropertyInfo), '("childNodes", WebKit2WebExtension.DOMNode.DOMNodeChildNodesPropertyInfo), '("children", WebKit2WebExtension.DOMElement.DOMElementChildrenPropertyInfo), '("classList", WebKit2WebExtension.DOMElement.DOMElementClassListPropertyInfo), '("className", WebKit2WebExtension.DOMElement.DOMElementClassNamePropertyInfo), '("clientHeight", WebKit2WebExtension.DOMElement.DOMElementClientHeightPropertyInfo), '("clientLeft", WebKit2WebExtension.DOMElement.DOMElementClientLeftPropertyInfo), '("clientTop", WebKit2WebExtension.DOMElement.DOMElementClientTopPropertyInfo), '("clientWidth", WebKit2WebExtension.DOMElement.DOMElementClientWidthPropertyInfo), '("contentEditable", WebKit2WebExtension.DOMHTMLElement.DOMHTMLElementContentEditablePropertyInfo), '("coreObject", WebKit2WebExtension.DOMObject.DOMObjectCoreObjectPropertyInfo), '("defaultChecked", DOMHTMLInputElementDefaultCheckedPropertyInfo), '("defaultValue", DOMHTMLInputElementDefaultValuePropertyInfo), '("dir", WebKit2WebExtension.DOMHTMLElement.DOMHTMLElementDirPropertyInfo), '("disabled", DOMHTMLInputElementDisabledPropertyInfo), '("draggable", WebKit2WebExtension.DOMHTMLElement.DOMHTMLElementDraggablePropertyInfo), '("files", DOMHTMLInputElementFilesPropertyInfo), '("firstChild", WebKit2WebExtension.DOMNode.DOMNodeFirstChildPropertyInfo), '("firstElementChild", WebKit2WebExtension.DOMElement.DOMElementFirstElementChildPropertyInfo), '("form", DOMHTMLInputElementFormPropertyInfo), '("height", DOMHTMLInputElementHeightPropertyInfo), '("hidden", WebKit2WebExtension.DOMHTMLElement.DOMHTMLElementHiddenPropertyInfo), '("id", WebKit2WebExtension.DOMElement.DOMElementIdPropertyInfo), '("indeterminate", DOMHTMLInputElementIndeterminatePropertyInfo), '("innerHtml", WebKit2WebExtension.DOMElement.DOMElementInnerHtmlPropertyInfo), '("innerText", WebKit2WebExtension.DOMHTMLElement.DOMHTMLElementInnerTextPropertyInfo), '("isContentEditable", WebKit2WebExtension.DOMHTMLElement.DOMHTMLElementIsContentEditablePropertyInfo), '("lang", WebKit2WebExtension.DOMHTMLElement.DOMHTMLElementLangPropertyInfo), '("lastChild", WebKit2WebExtension.DOMNode.DOMNodeLastChildPropertyInfo), '("lastElementChild", WebKit2WebExtension.DOMElement.DOMElementLastElementChildPropertyInfo), '("localName", WebKit2WebExtension.DOMElement.DOMElementLocalNamePropertyInfo), '("maxLength", DOMHTMLInputElementMaxLengthPropertyInfo), '("multiple", DOMHTMLInputElementMultiplePropertyInfo), '("name", DOMHTMLInputElementNamePropertyInfo), '("namespaceUri", WebKit2WebExtension.DOMElement.DOMElementNamespaceUriPropertyInfo), '("nextElementSibling", WebKit2WebExtension.DOMElement.DOMElementNextElementSiblingPropertyInfo), '("nextSibling", WebKit2WebExtension.DOMNode.DOMNodeNextSiblingPropertyInfo), '("nodeName", WebKit2WebExtension.DOMNode.DOMNodeNodeNamePropertyInfo), '("nodeType", WebKit2WebExtension.DOMNode.DOMNodeNodeTypePropertyInfo), '("nodeValue", WebKit2WebExtension.DOMNode.DOMNodeNodeValuePropertyInfo), '("offsetHeight", WebKit2WebExtension.DOMElement.DOMElementOffsetHeightPropertyInfo), '("offsetLeft", WebKit2WebExtension.DOMElement.DOMElementOffsetLeftPropertyInfo), '("offsetParent", WebKit2WebExtension.DOMElement.DOMElementOffsetParentPropertyInfo), '("offsetTop", WebKit2WebExtension.DOMElement.DOMElementOffsetTopPropertyInfo), '("offsetWidth", WebKit2WebExtension.DOMElement.DOMElementOffsetWidthPropertyInfo), '("outerHtml", WebKit2WebExtension.DOMElement.DOMElementOuterHtmlPropertyInfo), '("outerText", WebKit2WebExtension.DOMHTMLElement.DOMHTMLElementOuterTextPropertyInfo), '("ownerDocument", WebKit2WebExtension.DOMNode.DOMNodeOwnerDocumentPropertyInfo), '("parentElement", WebKit2WebExtension.DOMNode.DOMNodeParentElementPropertyInfo), '("parentNode", WebKit2WebExtension.DOMNode.DOMNodeParentNodePropertyInfo), '("prefix", WebKit2WebExtension.DOMElement.DOMElementPrefixPropertyInfo), '("previousElementSibling", WebKit2WebExtension.DOMElement.DOMElementPreviousElementSiblingPropertyInfo), '("previousSibling", WebKit2WebExtension.DOMNode.DOMNodePreviousSiblingPropertyInfo), '("readOnly", DOMHTMLInputElementReadOnlyPropertyInfo), '("scrollHeight", WebKit2WebExtension.DOMElement.DOMElementScrollHeightPropertyInfo), '("scrollLeft", WebKit2WebExtension.DOMElement.DOMElementScrollLeftPropertyInfo), '("scrollTop", WebKit2WebExtension.DOMElement.DOMElementScrollTopPropertyInfo), '("scrollWidth", WebKit2WebExtension.DOMElement.DOMElementScrollWidthPropertyInfo), '("size", DOMHTMLInputElementSizePropertyInfo), '("spellcheck", WebKit2WebExtension.DOMHTMLElement.DOMHTMLElementSpellcheckPropertyInfo), '("src", DOMHTMLInputElementSrcPropertyInfo), '("style", WebKit2WebExtension.DOMElement.DOMElementStylePropertyInfo), '("tabIndex", WebKit2WebExtension.DOMHTMLElement.DOMHTMLElementTabIndexPropertyInfo), '("tagName", WebKit2WebExtension.DOMElement.DOMElementTagNamePropertyInfo), '("textContent", WebKit2WebExtension.DOMNode.DOMNodeTextContentPropertyInfo), '("title", WebKit2WebExtension.DOMHTMLElement.DOMHTMLElementTitlePropertyInfo), '("translate", WebKit2WebExtension.DOMHTMLElement.DOMHTMLElementTranslatePropertyInfo), '("type", DOMHTMLInputElementTypePropertyInfo), '("useMap", DOMHTMLInputElementUseMapPropertyInfo), '("value", DOMHTMLInputElementValuePropertyInfo), '("webkitRegionOverset", WebKit2WebExtension.DOMElement.DOMElementWebkitRegionOversetPropertyInfo), '("webkitdropzone", WebKit2WebExtension.DOMHTMLElement.DOMHTMLElementWebkitdropzonePropertyInfo), '("width", DOMHTMLInputElementWidthPropertyInfo), '("willValidate", DOMHTMLInputElementWillValidatePropertyInfo)] :: [(Symbol, *)])
#endif
#if defined(ENABLE_OVERLOADING)
dOMHTMLInputElementAccept :: AttrLabelProxy "accept"
dOMHTMLInputElementAccept = AttrLabelProxy
dOMHTMLInputElementAlign :: AttrLabelProxy "align"
dOMHTMLInputElementAlign = AttrLabelProxy
dOMHTMLInputElementAlt :: AttrLabelProxy "alt"
dOMHTMLInputElementAlt = AttrLabelProxy
dOMHTMLInputElementAutofocus :: AttrLabelProxy "autofocus"
dOMHTMLInputElementAutofocus = AttrLabelProxy
dOMHTMLInputElementCapture :: AttrLabelProxy "capture"
dOMHTMLInputElementCapture = AttrLabelProxy
dOMHTMLInputElementChecked :: AttrLabelProxy "checked"
dOMHTMLInputElementChecked = AttrLabelProxy
dOMHTMLInputElementDefaultChecked :: AttrLabelProxy "defaultChecked"
dOMHTMLInputElementDefaultChecked = AttrLabelProxy
dOMHTMLInputElementDefaultValue :: AttrLabelProxy "defaultValue"
dOMHTMLInputElementDefaultValue = AttrLabelProxy
dOMHTMLInputElementDisabled :: AttrLabelProxy "disabled"
dOMHTMLInputElementDisabled = AttrLabelProxy
dOMHTMLInputElementFiles :: AttrLabelProxy "files"
dOMHTMLInputElementFiles = AttrLabelProxy
dOMHTMLInputElementForm :: AttrLabelProxy "form"
dOMHTMLInputElementForm = AttrLabelProxy
dOMHTMLInputElementHeight :: AttrLabelProxy "height"
dOMHTMLInputElementHeight = AttrLabelProxy
dOMHTMLInputElementIndeterminate :: AttrLabelProxy "indeterminate"
dOMHTMLInputElementIndeterminate = AttrLabelProxy
dOMHTMLInputElementMaxLength :: AttrLabelProxy "maxLength"
dOMHTMLInputElementMaxLength = AttrLabelProxy
dOMHTMLInputElementMultiple :: AttrLabelProxy "multiple"
dOMHTMLInputElementMultiple = AttrLabelProxy
dOMHTMLInputElementName :: AttrLabelProxy "name"
dOMHTMLInputElementName = AttrLabelProxy
dOMHTMLInputElementReadOnly :: AttrLabelProxy "readOnly"
dOMHTMLInputElementReadOnly = AttrLabelProxy
dOMHTMLInputElementSize :: AttrLabelProxy "size"
dOMHTMLInputElementSize = AttrLabelProxy
dOMHTMLInputElementSrc :: AttrLabelProxy "src"
dOMHTMLInputElementSrc = AttrLabelProxy
dOMHTMLInputElementType :: AttrLabelProxy "type"
dOMHTMLInputElementType = AttrLabelProxy
dOMHTMLInputElementUseMap :: AttrLabelProxy "useMap"
dOMHTMLInputElementUseMap = AttrLabelProxy
dOMHTMLInputElementValue :: AttrLabelProxy "value"
dOMHTMLInputElementValue = AttrLabelProxy
dOMHTMLInputElementWidth :: AttrLabelProxy "width"
dOMHTMLInputElementWidth = AttrLabelProxy
dOMHTMLInputElementWillValidate :: AttrLabelProxy "willValidate"
dOMHTMLInputElementWillValidate = AttrLabelProxy
#endif
#if defined(ENABLE_OVERLOADING)
type instance O.SignalList DOMHTMLInputElement = DOMHTMLInputElementSignalList
type DOMHTMLInputElementSignalList = ('[ '("notify", GObject.Object.ObjectNotifySignalInfo)] :: [(Symbol, *)])
#endif
foreign import ccall "webkit_dom_html_input_element_get_accept" webkit_dom_html_input_element_get_accept ::
Ptr DOMHTMLInputElement ->
IO CString
{-# DEPRECATED dOMHTMLInputElementGetAccept ["(Since version 2.22)","Use JavaScriptCore API instead"] #-}
dOMHTMLInputElementGetAccept ::
(B.CallStack.HasCallStack, MonadIO m, IsDOMHTMLInputElement a) =>
a
-> m T.Text
dOMHTMLInputElementGetAccept :: forall (m :: * -> *) a.
(HasCallStack, MonadIO m, IsDOMHTMLInputElement a) =>
a -> m Text
dOMHTMLInputElementGetAccept a
self = IO Text -> m Text
forall a. IO a -> m a
forall (m :: * -> *) a. MonadIO m => IO a -> m a
liftIO (IO Text -> m Text) -> IO Text -> m Text
forall a b. (a -> b) -> a -> b
$ do
Ptr DOMHTMLInputElement
self' <- a -> IO (Ptr DOMHTMLInputElement)
forall a b. (HasCallStack, ManagedPtrNewtype a) => a -> IO (Ptr b)
unsafeManagedPtrCastPtr a
self
CString
result <- Ptr DOMHTMLInputElement -> IO CString
webkit_dom_html_input_element_get_accept Ptr DOMHTMLInputElement
self'
Text -> CString -> IO ()
forall a. HasCallStack => Text -> Ptr a -> IO ()
checkUnexpectedReturnNULL Text
"dOMHTMLInputElementGetAccept" CString
result
Text
result' <- HasCallStack => CString -> IO Text
CString -> IO Text
cstringToText CString
result
CString -> IO ()
forall a. Ptr a -> IO ()
freeMem CString
result
a -> IO ()
forall a. ManagedPtrNewtype a => a -> IO ()
touchManagedPtr a
self
Text -> IO Text
forall a. a -> IO a
forall (m :: * -> *) a. Monad m => a -> m a
return Text
result'
#if defined(ENABLE_OVERLOADING)
data DOMHTMLInputElementGetAcceptMethodInfo
instance (signature ~ (m T.Text), MonadIO m, IsDOMHTMLInputElement a) => O.OverloadedMethod DOMHTMLInputElementGetAcceptMethodInfo a signature where
overloadedMethod = dOMHTMLInputElementGetAccept
instance O.OverloadedMethodInfo DOMHTMLInputElementGetAcceptMethodInfo a where
overloadedMethodInfo = P.Just (O.ResolvedSymbolInfo {
O.resolvedSymbolName = "GI.WebKit2WebExtension.Objects.DOMHTMLInputElement.dOMHTMLInputElementGetAccept",
O.resolvedSymbolURL = "https://hackage.haskell.org/package/gi-webkit2webextension-4.0.28/docs/GI-WebKit2WebExtension-Objects-DOMHTMLInputElement.html#v:dOMHTMLInputElementGetAccept"
})
#endif
foreign import ccall "webkit_dom_html_input_element_get_align" webkit_dom_html_input_element_get_align ::
Ptr DOMHTMLInputElement ->
IO CString
{-# DEPRECATED dOMHTMLInputElementGetAlign ["(Since version 2.22)","Use JavaScriptCore API instead"] #-}
dOMHTMLInputElementGetAlign ::
(B.CallStack.HasCallStack, MonadIO m, IsDOMHTMLInputElement a) =>
a
-> m T.Text
dOMHTMLInputElementGetAlign :: forall (m :: * -> *) a.
(HasCallStack, MonadIO m, IsDOMHTMLInputElement a) =>
a -> m Text
dOMHTMLInputElementGetAlign a
self = IO Text -> m Text
forall a. IO a -> m a
forall (m :: * -> *) a. MonadIO m => IO a -> m a
liftIO (IO Text -> m Text) -> IO Text -> m Text
forall a b. (a -> b) -> a -> b
$ do
Ptr DOMHTMLInputElement
self' <- a -> IO (Ptr DOMHTMLInputElement)
forall a b. (HasCallStack, ManagedPtrNewtype a) => a -> IO (Ptr b)
unsafeManagedPtrCastPtr a
self
CString
result <- Ptr DOMHTMLInputElement -> IO CString
webkit_dom_html_input_element_get_align Ptr DOMHTMLInputElement
self'
Text -> CString -> IO ()
forall a. HasCallStack => Text -> Ptr a -> IO ()
checkUnexpectedReturnNULL Text
"dOMHTMLInputElementGetAlign" CString
result
Text
result' <- HasCallStack => CString -> IO Text
CString -> IO Text
cstringToText CString
result
CString -> IO ()
forall a. Ptr a -> IO ()
freeMem CString
result
a -> IO ()
forall a. ManagedPtrNewtype a => a -> IO ()
touchManagedPtr a
self
Text -> IO Text
forall a. a -> IO a
forall (m :: * -> *) a. Monad m => a -> m a
return Text
result'
#if defined(ENABLE_OVERLOADING)
data DOMHTMLInputElementGetAlignMethodInfo
instance (signature ~ (m T.Text), MonadIO m, IsDOMHTMLInputElement a) => O.OverloadedMethod DOMHTMLInputElementGetAlignMethodInfo a signature where
overloadedMethod = dOMHTMLInputElementGetAlign
instance O.OverloadedMethodInfo DOMHTMLInputElementGetAlignMethodInfo a where
overloadedMethodInfo = P.Just (O.ResolvedSymbolInfo {
O.resolvedSymbolName = "GI.WebKit2WebExtension.Objects.DOMHTMLInputElement.dOMHTMLInputElementGetAlign",
O.resolvedSymbolURL = "https://hackage.haskell.org/package/gi-webkit2webextension-4.0.28/docs/GI-WebKit2WebExtension-Objects-DOMHTMLInputElement.html#v:dOMHTMLInputElementGetAlign"
})
#endif
foreign import ccall "webkit_dom_html_input_element_get_alt" webkit_dom_html_input_element_get_alt ::
Ptr DOMHTMLInputElement ->
IO CString
{-# DEPRECATED dOMHTMLInputElementGetAlt ["(Since version 2.22)","Use JavaScriptCore API instead"] #-}
dOMHTMLInputElementGetAlt ::
(B.CallStack.HasCallStack, MonadIO m, IsDOMHTMLInputElement a) =>
a
-> m T.Text
dOMHTMLInputElementGetAlt :: forall (m :: * -> *) a.
(HasCallStack, MonadIO m, IsDOMHTMLInputElement a) =>
a -> m Text
dOMHTMLInputElementGetAlt a
self = IO Text -> m Text
forall a. IO a -> m a
forall (m :: * -> *) a. MonadIO m => IO a -> m a
liftIO (IO Text -> m Text) -> IO Text -> m Text
forall a b. (a -> b) -> a -> b
$ do
Ptr DOMHTMLInputElement
self' <- a -> IO (Ptr DOMHTMLInputElement)
forall a b. (HasCallStack, ManagedPtrNewtype a) => a -> IO (Ptr b)
unsafeManagedPtrCastPtr a
self
CString
result <- Ptr DOMHTMLInputElement -> IO CString
webkit_dom_html_input_element_get_alt Ptr DOMHTMLInputElement
self'
Text -> CString -> IO ()
forall a. HasCallStack => Text -> Ptr a -> IO ()
checkUnexpectedReturnNULL Text
"dOMHTMLInputElementGetAlt" CString
result
Text
result' <- HasCallStack => CString -> IO Text
CString -> IO Text
cstringToText CString
result
CString -> IO ()
forall a. Ptr a -> IO ()
freeMem CString
result
a -> IO ()
forall a. ManagedPtrNewtype a => a -> IO ()
touchManagedPtr a
self
Text -> IO Text
forall a. a -> IO a
forall (m :: * -> *) a. Monad m => a -> m a
return Text
result'
#if defined(ENABLE_OVERLOADING)
data DOMHTMLInputElementGetAltMethodInfo
instance (signature ~ (m T.Text), MonadIO m, IsDOMHTMLInputElement a) => O.OverloadedMethod DOMHTMLInputElementGetAltMethodInfo a signature where
overloadedMethod = dOMHTMLInputElementGetAlt
instance O.OverloadedMethodInfo DOMHTMLInputElementGetAltMethodInfo a where
overloadedMethodInfo = P.Just (O.ResolvedSymbolInfo {
O.resolvedSymbolName = "GI.WebKit2WebExtension.Objects.DOMHTMLInputElement.dOMHTMLInputElementGetAlt",
O.resolvedSymbolURL = "https://hackage.haskell.org/package/gi-webkit2webextension-4.0.28/docs/GI-WebKit2WebExtension-Objects-DOMHTMLInputElement.html#v:dOMHTMLInputElementGetAlt"
})
#endif
foreign import ccall "webkit_dom_html_input_element_get_auto_filled" webkit_dom_html_input_element_get_auto_filled ::
Ptr DOMHTMLInputElement ->
IO CInt
{-# DEPRECATED dOMHTMLInputElementGetAutoFilled ["(Since version 2.22)","Use 'GI.WebKit2WebExtension.Objects.DOMElement.dOMElementHtmlInputElementGetAutoFilled' instead."] #-}
dOMHTMLInputElementGetAutoFilled ::
(B.CallStack.HasCallStack, MonadIO m, IsDOMHTMLInputElement a) =>
a
-> m Bool
dOMHTMLInputElementGetAutoFilled :: forall (m :: * -> *) a.
(HasCallStack, MonadIO m, IsDOMHTMLInputElement a) =>
a -> m Bool
dOMHTMLInputElementGetAutoFilled a
self = IO Bool -> m Bool
forall a. IO a -> m a
forall (m :: * -> *) a. MonadIO m => IO a -> m a
liftIO (IO Bool -> m Bool) -> IO Bool -> m Bool
forall a b. (a -> b) -> a -> b
$ do
Ptr DOMHTMLInputElement
self' <- a -> IO (Ptr DOMHTMLInputElement)
forall a b. (HasCallStack, ManagedPtrNewtype a) => a -> IO (Ptr b)
unsafeManagedPtrCastPtr a
self
CInt
result <- Ptr DOMHTMLInputElement -> IO CInt
webkit_dom_html_input_element_get_auto_filled Ptr DOMHTMLInputElement
self'
let result' :: Bool
result' = (CInt -> CInt -> Bool
forall a. Eq a => a -> a -> Bool
/= CInt
0) CInt
result
a -> IO ()
forall a. ManagedPtrNewtype a => a -> IO ()
touchManagedPtr a
self
Bool -> IO Bool
forall a. a -> IO a
forall (m :: * -> *) a. Monad m => a -> m a
return Bool
result'
#if defined(ENABLE_OVERLOADING)
data DOMHTMLInputElementGetAutoFilledMethodInfo
instance (signature ~ (m Bool), MonadIO m, IsDOMHTMLInputElement a) => O.OverloadedMethod DOMHTMLInputElementGetAutoFilledMethodInfo a signature where
overloadedMethod = dOMHTMLInputElementGetAutoFilled
instance O.OverloadedMethodInfo DOMHTMLInputElementGetAutoFilledMethodInfo a where
overloadedMethodInfo = P.Just (O.ResolvedSymbolInfo {
O.resolvedSymbolName = "GI.WebKit2WebExtension.Objects.DOMHTMLInputElement.dOMHTMLInputElementGetAutoFilled",
O.resolvedSymbolURL = "https://hackage.haskell.org/package/gi-webkit2webextension-4.0.28/docs/GI-WebKit2WebExtension-Objects-DOMHTMLInputElement.html#v:dOMHTMLInputElementGetAutoFilled"
})
#endif
foreign import ccall "webkit_dom_html_input_element_get_autofocus" webkit_dom_html_input_element_get_autofocus ::
Ptr DOMHTMLInputElement ->
IO CInt
{-# DEPRECATED dOMHTMLInputElementGetAutofocus ["(Since version 2.22)","Use JavaScriptCore API instead"] #-}
dOMHTMLInputElementGetAutofocus ::
(B.CallStack.HasCallStack, MonadIO m, IsDOMHTMLInputElement a) =>
a
-> m Bool
dOMHTMLInputElementGetAutofocus :: forall (m :: * -> *) a.
(HasCallStack, MonadIO m, IsDOMHTMLInputElement a) =>
a -> m Bool
dOMHTMLInputElementGetAutofocus a
self = IO Bool -> m Bool
forall a. IO a -> m a
forall (m :: * -> *) a. MonadIO m => IO a -> m a
liftIO (IO Bool -> m Bool) -> IO Bool -> m Bool
forall a b. (a -> b) -> a -> b
$ do
Ptr DOMHTMLInputElement
self' <- a -> IO (Ptr DOMHTMLInputElement)
forall a b. (HasCallStack, ManagedPtrNewtype a) => a -> IO (Ptr b)
unsafeManagedPtrCastPtr a
self
CInt
result <- Ptr DOMHTMLInputElement -> IO CInt
webkit_dom_html_input_element_get_autofocus Ptr DOMHTMLInputElement
self'
let result' :: Bool
result' = (CInt -> CInt -> Bool
forall a. Eq a => a -> a -> Bool
/= CInt
0) CInt
result
a -> IO ()
forall a. ManagedPtrNewtype a => a -> IO ()
touchManagedPtr a
self
Bool -> IO Bool
forall a. a -> IO a
forall (m :: * -> *) a. Monad m => a -> m a
return Bool
result'
#if defined(ENABLE_OVERLOADING)
data DOMHTMLInputElementGetAutofocusMethodInfo
instance (signature ~ (m Bool), MonadIO m, IsDOMHTMLInputElement a) => O.OverloadedMethod DOMHTMLInputElementGetAutofocusMethodInfo a signature where
overloadedMethod = dOMHTMLInputElementGetAutofocus
instance O.OverloadedMethodInfo DOMHTMLInputElementGetAutofocusMethodInfo a where
overloadedMethodInfo = P.Just (O.ResolvedSymbolInfo {
O.resolvedSymbolName = "GI.WebKit2WebExtension.Objects.DOMHTMLInputElement.dOMHTMLInputElementGetAutofocus",
O.resolvedSymbolURL = "https://hackage.haskell.org/package/gi-webkit2webextension-4.0.28/docs/GI-WebKit2WebExtension-Objects-DOMHTMLInputElement.html#v:dOMHTMLInputElementGetAutofocus"
})
#endif
foreign import ccall "webkit_dom_html_input_element_get_capture" webkit_dom_html_input_element_get_capture ::
Ptr DOMHTMLInputElement ->
IO CInt
{-# DEPRECATED dOMHTMLInputElementGetCapture ["(Since version 2.14)","Use 'GI.WebKit2WebExtension.Objects.DOMHTMLInputElement.dOMHTMLInputElementGetCaptureType' instead."] #-}
dOMHTMLInputElementGetCapture ::
(B.CallStack.HasCallStack, MonadIO m, IsDOMHTMLInputElement a) =>
a
-> m Bool
dOMHTMLInputElementGetCapture :: forall (m :: * -> *) a.
(HasCallStack, MonadIO m, IsDOMHTMLInputElement a) =>
a -> m Bool
dOMHTMLInputElementGetCapture a
self = IO Bool -> m Bool
forall a. IO a -> m a
forall (m :: * -> *) a. MonadIO m => IO a -> m a
liftIO (IO Bool -> m Bool) -> IO Bool -> m Bool
forall a b. (a -> b) -> a -> b
$ do
Ptr DOMHTMLInputElement
self' <- a -> IO (Ptr DOMHTMLInputElement)
forall a b. (HasCallStack, ManagedPtrNewtype a) => a -> IO (Ptr b)
unsafeManagedPtrCastPtr a
self
CInt
result <- Ptr DOMHTMLInputElement -> IO CInt
webkit_dom_html_input_element_get_capture Ptr DOMHTMLInputElement
self'
let result' :: Bool
result' = (CInt -> CInt -> Bool
forall a. Eq a => a -> a -> Bool
/= CInt
0) CInt
result
a -> IO ()
forall a. ManagedPtrNewtype a => a -> IO ()
touchManagedPtr a
self
Bool -> IO Bool
forall a. a -> IO a
forall (m :: * -> *) a. Monad m => a -> m a
return Bool
result'
#if defined(ENABLE_OVERLOADING)
data DOMHTMLInputElementGetCaptureMethodInfo
instance (signature ~ (m Bool), MonadIO m, IsDOMHTMLInputElement a) => O.OverloadedMethod DOMHTMLInputElementGetCaptureMethodInfo a signature where
overloadedMethod = dOMHTMLInputElementGetCapture
instance O.OverloadedMethodInfo DOMHTMLInputElementGetCaptureMethodInfo a where
overloadedMethodInfo = P.Just (O.ResolvedSymbolInfo {
O.resolvedSymbolName = "GI.WebKit2WebExtension.Objects.DOMHTMLInputElement.dOMHTMLInputElementGetCapture",
O.resolvedSymbolURL = "https://hackage.haskell.org/package/gi-webkit2webextension-4.0.28/docs/GI-WebKit2WebExtension-Objects-DOMHTMLInputElement.html#v:dOMHTMLInputElementGetCapture"
})
#endif
foreign import ccall "webkit_dom_html_input_element_get_capture_type" webkit_dom_html_input_element_get_capture_type ::
Ptr DOMHTMLInputElement ->
IO CString
{-# DEPRECATED dOMHTMLInputElementGetCaptureType ["(Since version 2.22)","Use JavaScriptCore API instead"] #-}
dOMHTMLInputElementGetCaptureType ::
(B.CallStack.HasCallStack, MonadIO m, IsDOMHTMLInputElement a) =>
a
-> m T.Text
dOMHTMLInputElementGetCaptureType :: forall (m :: * -> *) a.
(HasCallStack, MonadIO m, IsDOMHTMLInputElement a) =>
a -> m Text
dOMHTMLInputElementGetCaptureType a
self = IO Text -> m Text
forall a. IO a -> m a
forall (m :: * -> *) a. MonadIO m => IO a -> m a
liftIO (IO Text -> m Text) -> IO Text -> m Text
forall a b. (a -> b) -> a -> b
$ do
Ptr DOMHTMLInputElement
self' <- a -> IO (Ptr DOMHTMLInputElement)
forall a b. (HasCallStack, ManagedPtrNewtype a) => a -> IO (Ptr b)
unsafeManagedPtrCastPtr a
self
CString
result <- Ptr DOMHTMLInputElement -> IO CString
webkit_dom_html_input_element_get_capture_type Ptr DOMHTMLInputElement
self'
Text -> CString -> IO ()
forall a. HasCallStack => Text -> Ptr a -> IO ()
checkUnexpectedReturnNULL Text
"dOMHTMLInputElementGetCaptureType" CString
result
Text
result' <- HasCallStack => CString -> IO Text
CString -> IO Text
cstringToText CString
result
CString -> IO ()
forall a. Ptr a -> IO ()
freeMem CString
result
a -> IO ()
forall a. ManagedPtrNewtype a => a -> IO ()
touchManagedPtr a
self
Text -> IO Text
forall a. a -> IO a
forall (m :: * -> *) a. Monad m => a -> m a
return Text
result'
#if defined(ENABLE_OVERLOADING)
data DOMHTMLInputElementGetCaptureTypeMethodInfo
instance (signature ~ (m T.Text), MonadIO m, IsDOMHTMLInputElement a) => O.OverloadedMethod DOMHTMLInputElementGetCaptureTypeMethodInfo a signature where
overloadedMethod = dOMHTMLInputElementGetCaptureType
instance O.OverloadedMethodInfo DOMHTMLInputElementGetCaptureTypeMethodInfo a where
overloadedMethodInfo = P.Just (O.ResolvedSymbolInfo {
O.resolvedSymbolName = "GI.WebKit2WebExtension.Objects.DOMHTMLInputElement.dOMHTMLInputElementGetCaptureType",
O.resolvedSymbolURL = "https://hackage.haskell.org/package/gi-webkit2webextension-4.0.28/docs/GI-WebKit2WebExtension-Objects-DOMHTMLInputElement.html#v:dOMHTMLInputElementGetCaptureType"
})
#endif
foreign import ccall "webkit_dom_html_input_element_get_checked" webkit_dom_html_input_element_get_checked ::
Ptr DOMHTMLInputElement ->
IO CInt
{-# DEPRECATED dOMHTMLInputElementGetChecked ["(Since version 2.22)","Use JavaScriptCore API instead"] #-}
dOMHTMLInputElementGetChecked ::
(B.CallStack.HasCallStack, MonadIO m, IsDOMHTMLInputElement a) =>
a
-> m Bool
dOMHTMLInputElementGetChecked :: forall (m :: * -> *) a.
(HasCallStack, MonadIO m, IsDOMHTMLInputElement a) =>
a -> m Bool
dOMHTMLInputElementGetChecked a
self = IO Bool -> m Bool
forall a. IO a -> m a
forall (m :: * -> *) a. MonadIO m => IO a -> m a
liftIO (IO Bool -> m Bool) -> IO Bool -> m Bool
forall a b. (a -> b) -> a -> b
$ do
Ptr DOMHTMLInputElement
self' <- a -> IO (Ptr DOMHTMLInputElement)
forall a b. (HasCallStack, ManagedPtrNewtype a) => a -> IO (Ptr b)
unsafeManagedPtrCastPtr a
self
CInt
result <- Ptr DOMHTMLInputElement -> IO CInt
webkit_dom_html_input_element_get_checked Ptr DOMHTMLInputElement
self'
let result' :: Bool
result' = (CInt -> CInt -> Bool
forall a. Eq a => a -> a -> Bool
/= CInt
0) CInt
result
a -> IO ()
forall a. ManagedPtrNewtype a => a -> IO ()
touchManagedPtr a
self
Bool -> IO Bool
forall a. a -> IO a
forall (m :: * -> *) a. Monad m => a -> m a
return Bool
result'
#if defined(ENABLE_OVERLOADING)
data DOMHTMLInputElementGetCheckedMethodInfo
instance (signature ~ (m Bool), MonadIO m, IsDOMHTMLInputElement a) => O.OverloadedMethod DOMHTMLInputElementGetCheckedMethodInfo a signature where
overloadedMethod = dOMHTMLInputElementGetChecked
instance O.OverloadedMethodInfo DOMHTMLInputElementGetCheckedMethodInfo a where
overloadedMethodInfo = P.Just (O.ResolvedSymbolInfo {
O.resolvedSymbolName = "GI.WebKit2WebExtension.Objects.DOMHTMLInputElement.dOMHTMLInputElementGetChecked",
O.resolvedSymbolURL = "https://hackage.haskell.org/package/gi-webkit2webextension-4.0.28/docs/GI-WebKit2WebExtension-Objects-DOMHTMLInputElement.html#v:dOMHTMLInputElementGetChecked"
})
#endif
foreign import ccall "webkit_dom_html_input_element_get_default_checked" webkit_dom_html_input_element_get_default_checked ::
Ptr DOMHTMLInputElement ->
IO CInt
{-# DEPRECATED dOMHTMLInputElementGetDefaultChecked ["(Since version 2.22)","Use JavaScriptCore API instead"] #-}
dOMHTMLInputElementGetDefaultChecked ::
(B.CallStack.HasCallStack, MonadIO m, IsDOMHTMLInputElement a) =>
a
-> m Bool
dOMHTMLInputElementGetDefaultChecked :: forall (m :: * -> *) a.
(HasCallStack, MonadIO m, IsDOMHTMLInputElement a) =>
a -> m Bool
dOMHTMLInputElementGetDefaultChecked a
self = IO Bool -> m Bool
forall a. IO a -> m a
forall (m :: * -> *) a. MonadIO m => IO a -> m a
liftIO (IO Bool -> m Bool) -> IO Bool -> m Bool
forall a b. (a -> b) -> a -> b
$ do
Ptr DOMHTMLInputElement
self' <- a -> IO (Ptr DOMHTMLInputElement)
forall a b. (HasCallStack, ManagedPtrNewtype a) => a -> IO (Ptr b)
unsafeManagedPtrCastPtr a
self
CInt
result <- Ptr DOMHTMLInputElement -> IO CInt
webkit_dom_html_input_element_get_default_checked Ptr DOMHTMLInputElement
self'
let result' :: Bool
result' = (CInt -> CInt -> Bool
forall a. Eq a => a -> a -> Bool
/= CInt
0) CInt
result
a -> IO ()
forall a. ManagedPtrNewtype a => a -> IO ()
touchManagedPtr a
self
Bool -> IO Bool
forall a. a -> IO a
forall (m :: * -> *) a. Monad m => a -> m a
return Bool
result'
#if defined(ENABLE_OVERLOADING)
data DOMHTMLInputElementGetDefaultCheckedMethodInfo
instance (signature ~ (m Bool), MonadIO m, IsDOMHTMLInputElement a) => O.OverloadedMethod DOMHTMLInputElementGetDefaultCheckedMethodInfo a signature where
overloadedMethod = dOMHTMLInputElementGetDefaultChecked
instance O.OverloadedMethodInfo DOMHTMLInputElementGetDefaultCheckedMethodInfo a where
overloadedMethodInfo = P.Just (O.ResolvedSymbolInfo {
O.resolvedSymbolName = "GI.WebKit2WebExtension.Objects.DOMHTMLInputElement.dOMHTMLInputElementGetDefaultChecked",
O.resolvedSymbolURL = "https://hackage.haskell.org/package/gi-webkit2webextension-4.0.28/docs/GI-WebKit2WebExtension-Objects-DOMHTMLInputElement.html#v:dOMHTMLInputElementGetDefaultChecked"
})
#endif
foreign import ccall "webkit_dom_html_input_element_get_default_value" webkit_dom_html_input_element_get_default_value ::
Ptr DOMHTMLInputElement ->
IO CString
{-# DEPRECATED dOMHTMLInputElementGetDefaultValue ["(Since version 2.22)","Use JavaScriptCore API instead"] #-}
dOMHTMLInputElementGetDefaultValue ::
(B.CallStack.HasCallStack, MonadIO m, IsDOMHTMLInputElement a) =>
a
-> m T.Text
dOMHTMLInputElementGetDefaultValue :: forall (m :: * -> *) a.
(HasCallStack, MonadIO m, IsDOMHTMLInputElement a) =>
a -> m Text
dOMHTMLInputElementGetDefaultValue a
self = IO Text -> m Text
forall a. IO a -> m a
forall (m :: * -> *) a. MonadIO m => IO a -> m a
liftIO (IO Text -> m Text) -> IO Text -> m Text
forall a b. (a -> b) -> a -> b
$ do
Ptr DOMHTMLInputElement
self' <- a -> IO (Ptr DOMHTMLInputElement)
forall a b. (HasCallStack, ManagedPtrNewtype a) => a -> IO (Ptr b)
unsafeManagedPtrCastPtr a
self
CString
result <- Ptr DOMHTMLInputElement -> IO CString
webkit_dom_html_input_element_get_default_value Ptr DOMHTMLInputElement
self'
Text -> CString -> IO ()
forall a. HasCallStack => Text -> Ptr a -> IO ()
checkUnexpectedReturnNULL Text
"dOMHTMLInputElementGetDefaultValue" CString
result
Text
result' <- HasCallStack => CString -> IO Text
CString -> IO Text
cstringToText CString
result
CString -> IO ()
forall a. Ptr a -> IO ()
freeMem CString
result
a -> IO ()
forall a. ManagedPtrNewtype a => a -> IO ()
touchManagedPtr a
self
Text -> IO Text
forall a. a -> IO a
forall (m :: * -> *) a. Monad m => a -> m a
return Text
result'
#if defined(ENABLE_OVERLOADING)
data DOMHTMLInputElementGetDefaultValueMethodInfo
instance (signature ~ (m T.Text), MonadIO m, IsDOMHTMLInputElement a) => O.OverloadedMethod DOMHTMLInputElementGetDefaultValueMethodInfo a signature where
overloadedMethod = dOMHTMLInputElementGetDefaultValue
instance O.OverloadedMethodInfo DOMHTMLInputElementGetDefaultValueMethodInfo a where
overloadedMethodInfo = P.Just (O.ResolvedSymbolInfo {
O.resolvedSymbolName = "GI.WebKit2WebExtension.Objects.DOMHTMLInputElement.dOMHTMLInputElementGetDefaultValue",
O.resolvedSymbolURL = "https://hackage.haskell.org/package/gi-webkit2webextension-4.0.28/docs/GI-WebKit2WebExtension-Objects-DOMHTMLInputElement.html#v:dOMHTMLInputElementGetDefaultValue"
})
#endif
foreign import ccall "webkit_dom_html_input_element_get_disabled" webkit_dom_html_input_element_get_disabled ::
Ptr DOMHTMLInputElement ->
IO CInt
{-# DEPRECATED dOMHTMLInputElementGetDisabled ["(Since version 2.22)","Use JavaScriptCore API instead"] #-}
dOMHTMLInputElementGetDisabled ::
(B.CallStack.HasCallStack, MonadIO m, IsDOMHTMLInputElement a) =>
a
-> m Bool
dOMHTMLInputElementGetDisabled :: forall (m :: * -> *) a.
(HasCallStack, MonadIO m, IsDOMHTMLInputElement a) =>
a -> m Bool
dOMHTMLInputElementGetDisabled a
self = IO Bool -> m Bool
forall a. IO a -> m a
forall (m :: * -> *) a. MonadIO m => IO a -> m a
liftIO (IO Bool -> m Bool) -> IO Bool -> m Bool
forall a b. (a -> b) -> a -> b
$ do
Ptr DOMHTMLInputElement
self' <- a -> IO (Ptr DOMHTMLInputElement)
forall a b. (HasCallStack, ManagedPtrNewtype a) => a -> IO (Ptr b)
unsafeManagedPtrCastPtr a
self
CInt
result <- Ptr DOMHTMLInputElement -> IO CInt
webkit_dom_html_input_element_get_disabled Ptr DOMHTMLInputElement
self'
let result' :: Bool
result' = (CInt -> CInt -> Bool
forall a. Eq a => a -> a -> Bool
/= CInt
0) CInt
result
a -> IO ()
forall a. ManagedPtrNewtype a => a -> IO ()
touchManagedPtr a
self
Bool -> IO Bool
forall a. a -> IO a
forall (m :: * -> *) a. Monad m => a -> m a
return Bool
result'
#if defined(ENABLE_OVERLOADING)
data DOMHTMLInputElementGetDisabledMethodInfo
instance (signature ~ (m Bool), MonadIO m, IsDOMHTMLInputElement a) => O.OverloadedMethod DOMHTMLInputElementGetDisabledMethodInfo a signature where
overloadedMethod = dOMHTMLInputElementGetDisabled
instance O.OverloadedMethodInfo DOMHTMLInputElementGetDisabledMethodInfo a where
overloadedMethodInfo = P.Just (O.ResolvedSymbolInfo {
O.resolvedSymbolName = "GI.WebKit2WebExtension.Objects.DOMHTMLInputElement.dOMHTMLInputElementGetDisabled",
O.resolvedSymbolURL = "https://hackage.haskell.org/package/gi-webkit2webextension-4.0.28/docs/GI-WebKit2WebExtension-Objects-DOMHTMLInputElement.html#v:dOMHTMLInputElementGetDisabled"
})
#endif
foreign import ccall "webkit_dom_html_input_element_get_files" webkit_dom_html_input_element_get_files ::
Ptr DOMHTMLInputElement ->
IO (Ptr WebKit2WebExtension.DOMFileList.DOMFileList)
{-# DEPRECATED dOMHTMLInputElementGetFiles ["(Since version 2.22)","Use JavaScriptCore API instead"] #-}
dOMHTMLInputElementGetFiles ::
(B.CallStack.HasCallStack, MonadIO m, IsDOMHTMLInputElement a) =>
a
-> m WebKit2WebExtension.DOMFileList.DOMFileList
dOMHTMLInputElementGetFiles :: forall (m :: * -> *) a.
(HasCallStack, MonadIO m, IsDOMHTMLInputElement a) =>
a -> m DOMFileList
dOMHTMLInputElementGetFiles a
self = IO DOMFileList -> m DOMFileList
forall a. IO a -> m a
forall (m :: * -> *) a. MonadIO m => IO a -> m a
liftIO (IO DOMFileList -> m DOMFileList)
-> IO DOMFileList -> m DOMFileList
forall a b. (a -> b) -> a -> b
$ do
Ptr DOMHTMLInputElement
self' <- a -> IO (Ptr DOMHTMLInputElement)
forall a b. (HasCallStack, ManagedPtrNewtype a) => a -> IO (Ptr b)
unsafeManagedPtrCastPtr a
self
Ptr DOMFileList
result <- Ptr DOMHTMLInputElement -> IO (Ptr DOMFileList)
webkit_dom_html_input_element_get_files Ptr DOMHTMLInputElement
self'
Text -> Ptr DOMFileList -> IO ()
forall a. HasCallStack => Text -> Ptr a -> IO ()
checkUnexpectedReturnNULL Text
"dOMHTMLInputElementGetFiles" Ptr DOMFileList
result
DOMFileList
result' <- ((ManagedPtr DOMFileList -> DOMFileList)
-> Ptr DOMFileList -> IO DOMFileList
forall a b.
(HasCallStack, GObject a, GObject b) =>
(ManagedPtr a -> a) -> Ptr b -> IO a
wrapObject ManagedPtr DOMFileList -> DOMFileList
WebKit2WebExtension.DOMFileList.DOMFileList) Ptr DOMFileList
result
a -> IO ()
forall a. ManagedPtrNewtype a => a -> IO ()
touchManagedPtr a
self
DOMFileList -> IO DOMFileList
forall a. a -> IO a
forall (m :: * -> *) a. Monad m => a -> m a
return DOMFileList
result'
#if defined(ENABLE_OVERLOADING)
data DOMHTMLInputElementGetFilesMethodInfo
instance (signature ~ (m WebKit2WebExtension.DOMFileList.DOMFileList), MonadIO m, IsDOMHTMLInputElement a) => O.OverloadedMethod DOMHTMLInputElementGetFilesMethodInfo a signature where
overloadedMethod = dOMHTMLInputElementGetFiles
instance O.OverloadedMethodInfo DOMHTMLInputElementGetFilesMethodInfo a where
overloadedMethodInfo = P.Just (O.ResolvedSymbolInfo {
O.resolvedSymbolName = "GI.WebKit2WebExtension.Objects.DOMHTMLInputElement.dOMHTMLInputElementGetFiles",
O.resolvedSymbolURL = "https://hackage.haskell.org/package/gi-webkit2webextension-4.0.28/docs/GI-WebKit2WebExtension-Objects-DOMHTMLInputElement.html#v:dOMHTMLInputElementGetFiles"
})
#endif
foreign import ccall "webkit_dom_html_input_element_get_form" webkit_dom_html_input_element_get_form ::
Ptr DOMHTMLInputElement ->
IO (Ptr WebKit2WebExtension.DOMHTMLFormElement.DOMHTMLFormElement)
{-# DEPRECATED dOMHTMLInputElementGetForm ["(Since version 2.22)","Use JavaScriptCore API instead"] #-}
dOMHTMLInputElementGetForm ::
(B.CallStack.HasCallStack, MonadIO m, IsDOMHTMLInputElement a) =>
a
-> m WebKit2WebExtension.DOMHTMLFormElement.DOMHTMLFormElement
dOMHTMLInputElementGetForm :: forall (m :: * -> *) a.
(HasCallStack, MonadIO m, IsDOMHTMLInputElement a) =>
a -> m DOMHTMLFormElement
dOMHTMLInputElementGetForm a
self = IO DOMHTMLFormElement -> m DOMHTMLFormElement
forall a. IO a -> m a
forall (m :: * -> *) a. MonadIO m => IO a -> m a
liftIO (IO DOMHTMLFormElement -> m DOMHTMLFormElement)
-> IO DOMHTMLFormElement -> m DOMHTMLFormElement
forall a b. (a -> b) -> a -> b
$ do
Ptr DOMHTMLInputElement
self' <- a -> IO (Ptr DOMHTMLInputElement)
forall a b. (HasCallStack, ManagedPtrNewtype a) => a -> IO (Ptr b)
unsafeManagedPtrCastPtr a
self
Ptr DOMHTMLFormElement
result <- Ptr DOMHTMLInputElement -> IO (Ptr DOMHTMLFormElement)
webkit_dom_html_input_element_get_form Ptr DOMHTMLInputElement
self'
Text -> Ptr DOMHTMLFormElement -> IO ()
forall a. HasCallStack => Text -> Ptr a -> IO ()
checkUnexpectedReturnNULL Text
"dOMHTMLInputElementGetForm" Ptr DOMHTMLFormElement
result
DOMHTMLFormElement
result' <- ((ManagedPtr DOMHTMLFormElement -> DOMHTMLFormElement)
-> Ptr DOMHTMLFormElement -> IO DOMHTMLFormElement
forall a b.
(HasCallStack, GObject a, GObject b) =>
(ManagedPtr a -> a) -> Ptr b -> IO a
newObject ManagedPtr DOMHTMLFormElement -> DOMHTMLFormElement
WebKit2WebExtension.DOMHTMLFormElement.DOMHTMLFormElement) Ptr DOMHTMLFormElement
result
a -> IO ()
forall a. ManagedPtrNewtype a => a -> IO ()
touchManagedPtr a
self
DOMHTMLFormElement -> IO DOMHTMLFormElement
forall a. a -> IO a
forall (m :: * -> *) a. Monad m => a -> m a
return DOMHTMLFormElement
result'
#if defined(ENABLE_OVERLOADING)
data DOMHTMLInputElementGetFormMethodInfo
instance (signature ~ (m WebKit2WebExtension.DOMHTMLFormElement.DOMHTMLFormElement), MonadIO m, IsDOMHTMLInputElement a) => O.OverloadedMethod DOMHTMLInputElementGetFormMethodInfo a signature where
overloadedMethod = dOMHTMLInputElementGetForm
instance O.OverloadedMethodInfo DOMHTMLInputElementGetFormMethodInfo a where
overloadedMethodInfo = P.Just (O.ResolvedSymbolInfo {
O.resolvedSymbolName = "GI.WebKit2WebExtension.Objects.DOMHTMLInputElement.dOMHTMLInputElementGetForm",
O.resolvedSymbolURL = "https://hackage.haskell.org/package/gi-webkit2webextension-4.0.28/docs/GI-WebKit2WebExtension-Objects-DOMHTMLInputElement.html#v:dOMHTMLInputElementGetForm"
})
#endif
foreign import ccall "webkit_dom_html_input_element_get_height" webkit_dom_html_input_element_get_height ::
Ptr DOMHTMLInputElement ->
IO CULong
{-# DEPRECATED dOMHTMLInputElementGetHeight ["(Since version 2.22)","Use JavaScriptCore API instead"] #-}
dOMHTMLInputElementGetHeight ::
(B.CallStack.HasCallStack, MonadIO m, IsDOMHTMLInputElement a) =>
a
-> m CULong
dOMHTMLInputElementGetHeight :: forall (m :: * -> *) a.
(HasCallStack, MonadIO m, IsDOMHTMLInputElement a) =>
a -> m CULong
dOMHTMLInputElementGetHeight a
self = IO CULong -> m CULong
forall a. IO a -> m a
forall (m :: * -> *) a. MonadIO m => IO a -> m a
liftIO (IO CULong -> m CULong) -> IO CULong -> m CULong
forall a b. (a -> b) -> a -> b
$ do
Ptr DOMHTMLInputElement
self' <- a -> IO (Ptr DOMHTMLInputElement)
forall a b. (HasCallStack, ManagedPtrNewtype a) => a -> IO (Ptr b)
unsafeManagedPtrCastPtr a
self
CULong
result <- Ptr DOMHTMLInputElement -> IO CULong
webkit_dom_html_input_element_get_height Ptr DOMHTMLInputElement
self'
a -> IO ()
forall a. ManagedPtrNewtype a => a -> IO ()
touchManagedPtr a
self
CULong -> IO CULong
forall a. a -> IO a
forall (m :: * -> *) a. Monad m => a -> m a
return CULong
result
#if defined(ENABLE_OVERLOADING)
data DOMHTMLInputElementGetHeightMethodInfo
instance (signature ~ (m CULong), MonadIO m, IsDOMHTMLInputElement a) => O.OverloadedMethod DOMHTMLInputElementGetHeightMethodInfo a signature where
overloadedMethod = dOMHTMLInputElementGetHeight
instance O.OverloadedMethodInfo DOMHTMLInputElementGetHeightMethodInfo a where
overloadedMethodInfo = P.Just (O.ResolvedSymbolInfo {
O.resolvedSymbolName = "GI.WebKit2WebExtension.Objects.DOMHTMLInputElement.dOMHTMLInputElementGetHeight",
O.resolvedSymbolURL = "https://hackage.haskell.org/package/gi-webkit2webextension-4.0.28/docs/GI-WebKit2WebExtension-Objects-DOMHTMLInputElement.html#v:dOMHTMLInputElementGetHeight"
})
#endif
foreign import ccall "webkit_dom_html_input_element_get_indeterminate" webkit_dom_html_input_element_get_indeterminate ::
Ptr DOMHTMLInputElement ->
IO CInt
{-# DEPRECATED dOMHTMLInputElementGetIndeterminate ["(Since version 2.22)","Use JavaScriptCore API instead"] #-}
dOMHTMLInputElementGetIndeterminate ::
(B.CallStack.HasCallStack, MonadIO m, IsDOMHTMLInputElement a) =>
a
-> m Bool
dOMHTMLInputElementGetIndeterminate :: forall (m :: * -> *) a.
(HasCallStack, MonadIO m, IsDOMHTMLInputElement a) =>
a -> m Bool
dOMHTMLInputElementGetIndeterminate a
self = IO Bool -> m Bool
forall a. IO a -> m a
forall (m :: * -> *) a. MonadIO m => IO a -> m a
liftIO (IO Bool -> m Bool) -> IO Bool -> m Bool
forall a b. (a -> b) -> a -> b
$ do
Ptr DOMHTMLInputElement
self' <- a -> IO (Ptr DOMHTMLInputElement)
forall a b. (HasCallStack, ManagedPtrNewtype a) => a -> IO (Ptr b)
unsafeManagedPtrCastPtr a
self
CInt
result <- Ptr DOMHTMLInputElement -> IO CInt
webkit_dom_html_input_element_get_indeterminate Ptr DOMHTMLInputElement
self'
let result' :: Bool
result' = (CInt -> CInt -> Bool
forall a. Eq a => a -> a -> Bool
/= CInt
0) CInt
result
a -> IO ()
forall a. ManagedPtrNewtype a => a -> IO ()
touchManagedPtr a
self
Bool -> IO Bool
forall a. a -> IO a
forall (m :: * -> *) a. Monad m => a -> m a
return Bool
result'
#if defined(ENABLE_OVERLOADING)
data DOMHTMLInputElementGetIndeterminateMethodInfo
instance (signature ~ (m Bool), MonadIO m, IsDOMHTMLInputElement a) => O.OverloadedMethod DOMHTMLInputElementGetIndeterminateMethodInfo a signature where
overloadedMethod = dOMHTMLInputElementGetIndeterminate
instance O.OverloadedMethodInfo DOMHTMLInputElementGetIndeterminateMethodInfo a where
overloadedMethodInfo = P.Just (O.ResolvedSymbolInfo {
O.resolvedSymbolName = "GI.WebKit2WebExtension.Objects.DOMHTMLInputElement.dOMHTMLInputElementGetIndeterminate",
O.resolvedSymbolURL = "https://hackage.haskell.org/package/gi-webkit2webextension-4.0.28/docs/GI-WebKit2WebExtension-Objects-DOMHTMLInputElement.html#v:dOMHTMLInputElementGetIndeterminate"
})
#endif
foreign import ccall "webkit_dom_html_input_element_get_input_type" webkit_dom_html_input_element_get_input_type ::
Ptr DOMHTMLInputElement ->
IO CString
{-# DEPRECATED dOMHTMLInputElementGetInputType ["(Since version 2.22)","Use JavaScriptCore API instead"] #-}
dOMHTMLInputElementGetInputType ::
(B.CallStack.HasCallStack, MonadIO m, IsDOMHTMLInputElement a) =>
a
-> m T.Text
dOMHTMLInputElementGetInputType :: forall (m :: * -> *) a.
(HasCallStack, MonadIO m, IsDOMHTMLInputElement a) =>
a -> m Text
dOMHTMLInputElementGetInputType a
self = IO Text -> m Text
forall a. IO a -> m a
forall (m :: * -> *) a. MonadIO m => IO a -> m a
liftIO (IO Text -> m Text) -> IO Text -> m Text
forall a b. (a -> b) -> a -> b
$ do
Ptr DOMHTMLInputElement
self' <- a -> IO (Ptr DOMHTMLInputElement)
forall a b. (HasCallStack, ManagedPtrNewtype a) => a -> IO (Ptr b)
unsafeManagedPtrCastPtr a
self
CString
result <- Ptr DOMHTMLInputElement -> IO CString
webkit_dom_html_input_element_get_input_type Ptr DOMHTMLInputElement
self'
Text -> CString -> IO ()
forall a. HasCallStack => Text -> Ptr a -> IO ()
checkUnexpectedReturnNULL Text
"dOMHTMLInputElementGetInputType" CString
result
Text
result' <- HasCallStack => CString -> IO Text
CString -> IO Text
cstringToText CString
result
CString -> IO ()
forall a. Ptr a -> IO ()
freeMem CString
result
a -> IO ()
forall a. ManagedPtrNewtype a => a -> IO ()
touchManagedPtr a
self
Text -> IO Text
forall a. a -> IO a
forall (m :: * -> *) a. Monad m => a -> m a
return Text
result'
#if defined(ENABLE_OVERLOADING)
data DOMHTMLInputElementGetInputTypeMethodInfo
instance (signature ~ (m T.Text), MonadIO m, IsDOMHTMLInputElement a) => O.OverloadedMethod DOMHTMLInputElementGetInputTypeMethodInfo a signature where
overloadedMethod = dOMHTMLInputElementGetInputType
instance O.OverloadedMethodInfo DOMHTMLInputElementGetInputTypeMethodInfo a where
overloadedMethodInfo = P.Just (O.ResolvedSymbolInfo {
O.resolvedSymbolName = "GI.WebKit2WebExtension.Objects.DOMHTMLInputElement.dOMHTMLInputElementGetInputType",
O.resolvedSymbolURL = "https://hackage.haskell.org/package/gi-webkit2webextension-4.0.28/docs/GI-WebKit2WebExtension-Objects-DOMHTMLInputElement.html#v:dOMHTMLInputElementGetInputType"
})
#endif
foreign import ccall "webkit_dom_html_input_element_get_max_length" webkit_dom_html_input_element_get_max_length ::
Ptr DOMHTMLInputElement ->
IO CLong
{-# DEPRECATED dOMHTMLInputElementGetMaxLength ["(Since version 2.22)","Use JavaScriptCore API instead"] #-}
dOMHTMLInputElementGetMaxLength ::
(B.CallStack.HasCallStack, MonadIO m, IsDOMHTMLInputElement a) =>
a
-> m CLong
dOMHTMLInputElementGetMaxLength :: forall (m :: * -> *) a.
(HasCallStack, MonadIO m, IsDOMHTMLInputElement a) =>
a -> m CLong
dOMHTMLInputElementGetMaxLength a
self = IO CLong -> m CLong
forall a. IO a -> m a
forall (m :: * -> *) a. MonadIO m => IO a -> m a
liftIO (IO CLong -> m CLong) -> IO CLong -> m CLong
forall a b. (a -> b) -> a -> b
$ do
Ptr DOMHTMLInputElement
self' <- a -> IO (Ptr DOMHTMLInputElement)
forall a b. (HasCallStack, ManagedPtrNewtype a) => a -> IO (Ptr b)
unsafeManagedPtrCastPtr a
self
CLong
result <- Ptr DOMHTMLInputElement -> IO CLong
webkit_dom_html_input_element_get_max_length Ptr DOMHTMLInputElement
self'
a -> IO ()
forall a. ManagedPtrNewtype a => a -> IO ()
touchManagedPtr a
self
CLong -> IO CLong
forall a. a -> IO a
forall (m :: * -> *) a. Monad m => a -> m a
return CLong
result
#if defined(ENABLE_OVERLOADING)
data DOMHTMLInputElementGetMaxLengthMethodInfo
instance (signature ~ (m CLong), MonadIO m, IsDOMHTMLInputElement a) => O.OverloadedMethod DOMHTMLInputElementGetMaxLengthMethodInfo a signature where
overloadedMethod = dOMHTMLInputElementGetMaxLength
instance O.OverloadedMethodInfo DOMHTMLInputElementGetMaxLengthMethodInfo a where
overloadedMethodInfo = P.Just (O.ResolvedSymbolInfo {
O.resolvedSymbolName = "GI.WebKit2WebExtension.Objects.DOMHTMLInputElement.dOMHTMLInputElementGetMaxLength",
O.resolvedSymbolURL = "https://hackage.haskell.org/package/gi-webkit2webextension-4.0.28/docs/GI-WebKit2WebExtension-Objects-DOMHTMLInputElement.html#v:dOMHTMLInputElementGetMaxLength"
})
#endif
foreign import ccall "webkit_dom_html_input_element_get_multiple" webkit_dom_html_input_element_get_multiple ::
Ptr DOMHTMLInputElement ->
IO CInt
{-# DEPRECATED dOMHTMLInputElementGetMultiple ["(Since version 2.22)","Use JavaScriptCore API instead"] #-}
dOMHTMLInputElementGetMultiple ::
(B.CallStack.HasCallStack, MonadIO m, IsDOMHTMLInputElement a) =>
a
-> m Bool
dOMHTMLInputElementGetMultiple :: forall (m :: * -> *) a.
(HasCallStack, MonadIO m, IsDOMHTMLInputElement a) =>
a -> m Bool
dOMHTMLInputElementGetMultiple a
self = IO Bool -> m Bool
forall a. IO a -> m a
forall (m :: * -> *) a. MonadIO m => IO a -> m a
liftIO (IO Bool -> m Bool) -> IO Bool -> m Bool
forall a b. (a -> b) -> a -> b
$ do
Ptr DOMHTMLInputElement
self' <- a -> IO (Ptr DOMHTMLInputElement)
forall a b. (HasCallStack, ManagedPtrNewtype a) => a -> IO (Ptr b)
unsafeManagedPtrCastPtr a
self
CInt
result <- Ptr DOMHTMLInputElement -> IO CInt
webkit_dom_html_input_element_get_multiple Ptr DOMHTMLInputElement
self'
let result' :: Bool
result' = (CInt -> CInt -> Bool
forall a. Eq a => a -> a -> Bool
/= CInt
0) CInt
result
a -> IO ()
forall a. ManagedPtrNewtype a => a -> IO ()
touchManagedPtr a
self
Bool -> IO Bool
forall a. a -> IO a
forall (m :: * -> *) a. Monad m => a -> m a
return Bool
result'
#if defined(ENABLE_OVERLOADING)
data DOMHTMLInputElementGetMultipleMethodInfo
instance (signature ~ (m Bool), MonadIO m, IsDOMHTMLInputElement a) => O.OverloadedMethod DOMHTMLInputElementGetMultipleMethodInfo a signature where
overloadedMethod = dOMHTMLInputElementGetMultiple
instance O.OverloadedMethodInfo DOMHTMLInputElementGetMultipleMethodInfo a where
overloadedMethodInfo = P.Just (O.ResolvedSymbolInfo {
O.resolvedSymbolName = "GI.WebKit2WebExtension.Objects.DOMHTMLInputElement.dOMHTMLInputElementGetMultiple",
O.resolvedSymbolURL = "https://hackage.haskell.org/package/gi-webkit2webextension-4.0.28/docs/GI-WebKit2WebExtension-Objects-DOMHTMLInputElement.html#v:dOMHTMLInputElementGetMultiple"
})
#endif
foreign import ccall "webkit_dom_html_input_element_get_name" webkit_dom_html_input_element_get_name ::
Ptr DOMHTMLInputElement ->
IO CString
{-# DEPRECATED dOMHTMLInputElementGetName ["(Since version 2.22)","Use JavaScriptCore API instead"] #-}
dOMHTMLInputElementGetName ::
(B.CallStack.HasCallStack, MonadIO m, IsDOMHTMLInputElement a) =>
a
-> m T.Text
dOMHTMLInputElementGetName :: forall (m :: * -> *) a.
(HasCallStack, MonadIO m, IsDOMHTMLInputElement a) =>
a -> m Text
dOMHTMLInputElementGetName a
self = IO Text -> m Text
forall a. IO a -> m a
forall (m :: * -> *) a. MonadIO m => IO a -> m a
liftIO (IO Text -> m Text) -> IO Text -> m Text
forall a b. (a -> b) -> a -> b
$ do
Ptr DOMHTMLInputElement
self' <- a -> IO (Ptr DOMHTMLInputElement)
forall a b. (HasCallStack, ManagedPtrNewtype a) => a -> IO (Ptr b)
unsafeManagedPtrCastPtr a
self
CString
result <- Ptr DOMHTMLInputElement -> IO CString
webkit_dom_html_input_element_get_name Ptr DOMHTMLInputElement
self'
Text -> CString -> IO ()
forall a. HasCallStack => Text -> Ptr a -> IO ()
checkUnexpectedReturnNULL Text
"dOMHTMLInputElementGetName" CString
result
Text
result' <- HasCallStack => CString -> IO Text
CString -> IO Text
cstringToText CString
result
CString -> IO ()
forall a. Ptr a -> IO ()
freeMem CString
result
a -> IO ()
forall a. ManagedPtrNewtype a => a -> IO ()
touchManagedPtr a
self
Text -> IO Text
forall a. a -> IO a
forall (m :: * -> *) a. Monad m => a -> m a
return Text
result'
#if defined(ENABLE_OVERLOADING)
data DOMHTMLInputElementGetNameMethodInfo
instance (signature ~ (m T.Text), MonadIO m, IsDOMHTMLInputElement a) => O.OverloadedMethod DOMHTMLInputElementGetNameMethodInfo a signature where
overloadedMethod = dOMHTMLInputElementGetName
instance O.OverloadedMethodInfo DOMHTMLInputElementGetNameMethodInfo a where
overloadedMethodInfo = P.Just (O.ResolvedSymbolInfo {
O.resolvedSymbolName = "GI.WebKit2WebExtension.Objects.DOMHTMLInputElement.dOMHTMLInputElementGetName",
O.resolvedSymbolURL = "https://hackage.haskell.org/package/gi-webkit2webextension-4.0.28/docs/GI-WebKit2WebExtension-Objects-DOMHTMLInputElement.html#v:dOMHTMLInputElementGetName"
})
#endif
foreign import ccall "webkit_dom_html_input_element_get_read_only" webkit_dom_html_input_element_get_read_only ::
Ptr DOMHTMLInputElement ->
IO CInt
{-# DEPRECATED dOMHTMLInputElementGetReadOnly ["(Since version 2.22)","Use JavaScriptCore API instead"] #-}
dOMHTMLInputElementGetReadOnly ::
(B.CallStack.HasCallStack, MonadIO m, IsDOMHTMLInputElement a) =>
a
-> m Bool
dOMHTMLInputElementGetReadOnly :: forall (m :: * -> *) a.
(HasCallStack, MonadIO m, IsDOMHTMLInputElement a) =>
a -> m Bool
dOMHTMLInputElementGetReadOnly a
self = IO Bool -> m Bool
forall a. IO a -> m a
forall (m :: * -> *) a. MonadIO m => IO a -> m a
liftIO (IO Bool -> m Bool) -> IO Bool -> m Bool
forall a b. (a -> b) -> a -> b
$ do
Ptr DOMHTMLInputElement
self' <- a -> IO (Ptr DOMHTMLInputElement)
forall a b. (HasCallStack, ManagedPtrNewtype a) => a -> IO (Ptr b)
unsafeManagedPtrCastPtr a
self
CInt
result <- Ptr DOMHTMLInputElement -> IO CInt
webkit_dom_html_input_element_get_read_only Ptr DOMHTMLInputElement
self'
let result' :: Bool
result' = (CInt -> CInt -> Bool
forall a. Eq a => a -> a -> Bool
/= CInt
0) CInt
result
a -> IO ()
forall a. ManagedPtrNewtype a => a -> IO ()
touchManagedPtr a
self
Bool -> IO Bool
forall a. a -> IO a
forall (m :: * -> *) a. Monad m => a -> m a
return Bool
result'
#if defined(ENABLE_OVERLOADING)
data DOMHTMLInputElementGetReadOnlyMethodInfo
instance (signature ~ (m Bool), MonadIO m, IsDOMHTMLInputElement a) => O.OverloadedMethod DOMHTMLInputElementGetReadOnlyMethodInfo a signature where
overloadedMethod = dOMHTMLInputElementGetReadOnly
instance O.OverloadedMethodInfo DOMHTMLInputElementGetReadOnlyMethodInfo a where
overloadedMethodInfo = P.Just (O.ResolvedSymbolInfo {
O.resolvedSymbolName = "GI.WebKit2WebExtension.Objects.DOMHTMLInputElement.dOMHTMLInputElementGetReadOnly",
O.resolvedSymbolURL = "https://hackage.haskell.org/package/gi-webkit2webextension-4.0.28/docs/GI-WebKit2WebExtension-Objects-DOMHTMLInputElement.html#v:dOMHTMLInputElementGetReadOnly"
})
#endif
foreign import ccall "webkit_dom_html_input_element_get_size" webkit_dom_html_input_element_get_size ::
Ptr DOMHTMLInputElement ->
IO CULong
{-# DEPRECATED dOMHTMLInputElementGetSize ["(Since version 2.22)","Use JavaScriptCore API instead"] #-}
dOMHTMLInputElementGetSize ::
(B.CallStack.HasCallStack, MonadIO m, IsDOMHTMLInputElement a) =>
a
-> m CULong
dOMHTMLInputElementGetSize :: forall (m :: * -> *) a.
(HasCallStack, MonadIO m, IsDOMHTMLInputElement a) =>
a -> m CULong
dOMHTMLInputElementGetSize a
self = IO CULong -> m CULong
forall a. IO a -> m a
forall (m :: * -> *) a. MonadIO m => IO a -> m a
liftIO (IO CULong -> m CULong) -> IO CULong -> m CULong
forall a b. (a -> b) -> a -> b
$ do
Ptr DOMHTMLInputElement
self' <- a -> IO (Ptr DOMHTMLInputElement)
forall a b. (HasCallStack, ManagedPtrNewtype a) => a -> IO (Ptr b)
unsafeManagedPtrCastPtr a
self
CULong
result <- Ptr DOMHTMLInputElement -> IO CULong
webkit_dom_html_input_element_get_size Ptr DOMHTMLInputElement
self'
a -> IO ()
forall a. ManagedPtrNewtype a => a -> IO ()
touchManagedPtr a
self
CULong -> IO CULong
forall a. a -> IO a
forall (m :: * -> *) a. Monad m => a -> m a
return CULong
result
#if defined(ENABLE_OVERLOADING)
data DOMHTMLInputElementGetSizeMethodInfo
instance (signature ~ (m CULong), MonadIO m, IsDOMHTMLInputElement a) => O.OverloadedMethod DOMHTMLInputElementGetSizeMethodInfo a signature where
overloadedMethod = dOMHTMLInputElementGetSize
instance O.OverloadedMethodInfo DOMHTMLInputElementGetSizeMethodInfo a where
overloadedMethodInfo = P.Just (O.ResolvedSymbolInfo {
O.resolvedSymbolName = "GI.WebKit2WebExtension.Objects.DOMHTMLInputElement.dOMHTMLInputElementGetSize",
O.resolvedSymbolURL = "https://hackage.haskell.org/package/gi-webkit2webextension-4.0.28/docs/GI-WebKit2WebExtension-Objects-DOMHTMLInputElement.html#v:dOMHTMLInputElementGetSize"
})
#endif
foreign import ccall "webkit_dom_html_input_element_get_src" webkit_dom_html_input_element_get_src ::
Ptr DOMHTMLInputElement ->
IO CString
{-# DEPRECATED dOMHTMLInputElementGetSrc ["(Since version 2.22)","Use JavaScriptCore API instead"] #-}
dOMHTMLInputElementGetSrc ::
(B.CallStack.HasCallStack, MonadIO m, IsDOMHTMLInputElement a) =>
a
-> m T.Text
dOMHTMLInputElementGetSrc :: forall (m :: * -> *) a.
(HasCallStack, MonadIO m, IsDOMHTMLInputElement a) =>
a -> m Text
dOMHTMLInputElementGetSrc a
self = IO Text -> m Text
forall a. IO a -> m a
forall (m :: * -> *) a. MonadIO m => IO a -> m a
liftIO (IO Text -> m Text) -> IO Text -> m Text
forall a b. (a -> b) -> a -> b
$ do
Ptr DOMHTMLInputElement
self' <- a -> IO (Ptr DOMHTMLInputElement)
forall a b. (HasCallStack, ManagedPtrNewtype a) => a -> IO (Ptr b)
unsafeManagedPtrCastPtr a
self
CString
result <- Ptr DOMHTMLInputElement -> IO CString
webkit_dom_html_input_element_get_src Ptr DOMHTMLInputElement
self'
Text -> CString -> IO ()
forall a. HasCallStack => Text -> Ptr a -> IO ()
checkUnexpectedReturnNULL Text
"dOMHTMLInputElementGetSrc" CString
result
Text
result' <- HasCallStack => CString -> IO Text
CString -> IO Text
cstringToText CString
result
CString -> IO ()
forall a. Ptr a -> IO ()
freeMem CString
result
a -> IO ()
forall a. ManagedPtrNewtype a => a -> IO ()
touchManagedPtr a
self
Text -> IO Text
forall a. a -> IO a
forall (m :: * -> *) a. Monad m => a -> m a
return Text
result'
#if defined(ENABLE_OVERLOADING)
data DOMHTMLInputElementGetSrcMethodInfo
instance (signature ~ (m T.Text), MonadIO m, IsDOMHTMLInputElement a) => O.OverloadedMethod DOMHTMLInputElementGetSrcMethodInfo a signature where
overloadedMethod = dOMHTMLInputElementGetSrc
instance O.OverloadedMethodInfo DOMHTMLInputElementGetSrcMethodInfo a where
overloadedMethodInfo = P.Just (O.ResolvedSymbolInfo {
O.resolvedSymbolName = "GI.WebKit2WebExtension.Objects.DOMHTMLInputElement.dOMHTMLInputElementGetSrc",
O.resolvedSymbolURL = "https://hackage.haskell.org/package/gi-webkit2webextension-4.0.28/docs/GI-WebKit2WebExtension-Objects-DOMHTMLInputElement.html#v:dOMHTMLInputElementGetSrc"
})
#endif
foreign import ccall "webkit_dom_html_input_element_get_use_map" webkit_dom_html_input_element_get_use_map ::
Ptr DOMHTMLInputElement ->
IO CString
{-# DEPRECATED dOMHTMLInputElementGetUseMap ["(Since version 2.22)","Use JavaScriptCore API instead"] #-}
dOMHTMLInputElementGetUseMap ::
(B.CallStack.HasCallStack, MonadIO m, IsDOMHTMLInputElement a) =>
a
-> m T.Text
dOMHTMLInputElementGetUseMap :: forall (m :: * -> *) a.
(HasCallStack, MonadIO m, IsDOMHTMLInputElement a) =>
a -> m Text
dOMHTMLInputElementGetUseMap a
self = IO Text -> m Text
forall a. IO a -> m a
forall (m :: * -> *) a. MonadIO m => IO a -> m a
liftIO (IO Text -> m Text) -> IO Text -> m Text
forall a b. (a -> b) -> a -> b
$ do
Ptr DOMHTMLInputElement
self' <- a -> IO (Ptr DOMHTMLInputElement)
forall a b. (HasCallStack, ManagedPtrNewtype a) => a -> IO (Ptr b)
unsafeManagedPtrCastPtr a
self
CString
result <- Ptr DOMHTMLInputElement -> IO CString
webkit_dom_html_input_element_get_use_map Ptr DOMHTMLInputElement
self'
Text -> CString -> IO ()
forall a. HasCallStack => Text -> Ptr a -> IO ()
checkUnexpectedReturnNULL Text
"dOMHTMLInputElementGetUseMap" CString
result
Text
result' <- HasCallStack => CString -> IO Text
CString -> IO Text
cstringToText CString
result
CString -> IO ()
forall a. Ptr a -> IO ()
freeMem CString
result
a -> IO ()
forall a. ManagedPtrNewtype a => a -> IO ()
touchManagedPtr a
self
Text -> IO Text
forall a. a -> IO a
forall (m :: * -> *) a. Monad m => a -> m a
return Text
result'
#if defined(ENABLE_OVERLOADING)
data DOMHTMLInputElementGetUseMapMethodInfo
instance (signature ~ (m T.Text), MonadIO m, IsDOMHTMLInputElement a) => O.OverloadedMethod DOMHTMLInputElementGetUseMapMethodInfo a signature where
overloadedMethod = dOMHTMLInputElementGetUseMap
instance O.OverloadedMethodInfo DOMHTMLInputElementGetUseMapMethodInfo a where
overloadedMethodInfo = P.Just (O.ResolvedSymbolInfo {
O.resolvedSymbolName = "GI.WebKit2WebExtension.Objects.DOMHTMLInputElement.dOMHTMLInputElementGetUseMap",
O.resolvedSymbolURL = "https://hackage.haskell.org/package/gi-webkit2webextension-4.0.28/docs/GI-WebKit2WebExtension-Objects-DOMHTMLInputElement.html#v:dOMHTMLInputElementGetUseMap"
})
#endif
foreign import ccall "webkit_dom_html_input_element_get_value" webkit_dom_html_input_element_get_value ::
Ptr DOMHTMLInputElement ->
IO CString
{-# DEPRECATED dOMHTMLInputElementGetValue ["(Since version 2.22)","Use JavaScriptCore API instead"] #-}
dOMHTMLInputElementGetValue ::
(B.CallStack.HasCallStack, MonadIO m, IsDOMHTMLInputElement a) =>
a
-> m T.Text
dOMHTMLInputElementGetValue :: forall (m :: * -> *) a.
(HasCallStack, MonadIO m, IsDOMHTMLInputElement a) =>
a -> m Text
dOMHTMLInputElementGetValue a
self = IO Text -> m Text
forall a. IO a -> m a
forall (m :: * -> *) a. MonadIO m => IO a -> m a
liftIO (IO Text -> m Text) -> IO Text -> m Text
forall a b. (a -> b) -> a -> b
$ do
Ptr DOMHTMLInputElement
self' <- a -> IO (Ptr DOMHTMLInputElement)
forall a b. (HasCallStack, ManagedPtrNewtype a) => a -> IO (Ptr b)
unsafeManagedPtrCastPtr a
self
CString
result <- Ptr DOMHTMLInputElement -> IO CString
webkit_dom_html_input_element_get_value Ptr DOMHTMLInputElement
self'
Text -> CString -> IO ()
forall a. HasCallStack => Text -> Ptr a -> IO ()
checkUnexpectedReturnNULL Text
"dOMHTMLInputElementGetValue" CString
result
Text
result' <- HasCallStack => CString -> IO Text
CString -> IO Text
cstringToText CString
result
CString -> IO ()
forall a. Ptr a -> IO ()
freeMem CString
result
a -> IO ()
forall a. ManagedPtrNewtype a => a -> IO ()
touchManagedPtr a
self
Text -> IO Text
forall a. a -> IO a
forall (m :: * -> *) a. Monad m => a -> m a
return Text
result'
#if defined(ENABLE_OVERLOADING)
data DOMHTMLInputElementGetValueMethodInfo
instance (signature ~ (m T.Text), MonadIO m, IsDOMHTMLInputElement a) => O.OverloadedMethod DOMHTMLInputElementGetValueMethodInfo a signature where
overloadedMethod = dOMHTMLInputElementGetValue
instance O.OverloadedMethodInfo DOMHTMLInputElementGetValueMethodInfo a where
overloadedMethodInfo = P.Just (O.ResolvedSymbolInfo {
O.resolvedSymbolName = "GI.WebKit2WebExtension.Objects.DOMHTMLInputElement.dOMHTMLInputElementGetValue",
O.resolvedSymbolURL = "https://hackage.haskell.org/package/gi-webkit2webextension-4.0.28/docs/GI-WebKit2WebExtension-Objects-DOMHTMLInputElement.html#v:dOMHTMLInputElementGetValue"
})
#endif
foreign import ccall "webkit_dom_html_input_element_get_width" webkit_dom_html_input_element_get_width ::
Ptr DOMHTMLInputElement ->
IO CULong
{-# DEPRECATED dOMHTMLInputElementGetWidth ["(Since version 2.22)","Use JavaScriptCore API instead"] #-}
dOMHTMLInputElementGetWidth ::
(B.CallStack.HasCallStack, MonadIO m, IsDOMHTMLInputElement a) =>
a
-> m CULong
dOMHTMLInputElementGetWidth :: forall (m :: * -> *) a.
(HasCallStack, MonadIO m, IsDOMHTMLInputElement a) =>
a -> m CULong
dOMHTMLInputElementGetWidth a
self = IO CULong -> m CULong
forall a. IO a -> m a
forall (m :: * -> *) a. MonadIO m => IO a -> m a
liftIO (IO CULong -> m CULong) -> IO CULong -> m CULong
forall a b. (a -> b) -> a -> b
$ do
Ptr DOMHTMLInputElement
self' <- a -> IO (Ptr DOMHTMLInputElement)
forall a b. (HasCallStack, ManagedPtrNewtype a) => a -> IO (Ptr b)
unsafeManagedPtrCastPtr a
self
CULong
result <- Ptr DOMHTMLInputElement -> IO CULong
webkit_dom_html_input_element_get_width Ptr DOMHTMLInputElement
self'
a -> IO ()
forall a. ManagedPtrNewtype a => a -> IO ()
touchManagedPtr a
self
CULong -> IO CULong
forall a. a -> IO a
forall (m :: * -> *) a. Monad m => a -> m a
return CULong
result
#if defined(ENABLE_OVERLOADING)
data DOMHTMLInputElementGetWidthMethodInfo
instance (signature ~ (m CULong), MonadIO m, IsDOMHTMLInputElement a) => O.OverloadedMethod DOMHTMLInputElementGetWidthMethodInfo a signature where
overloadedMethod = dOMHTMLInputElementGetWidth
instance O.OverloadedMethodInfo DOMHTMLInputElementGetWidthMethodInfo a where
overloadedMethodInfo = P.Just (O.ResolvedSymbolInfo {
O.resolvedSymbolName = "GI.WebKit2WebExtension.Objects.DOMHTMLInputElement.dOMHTMLInputElementGetWidth",
O.resolvedSymbolURL = "https://hackage.haskell.org/package/gi-webkit2webextension-4.0.28/docs/GI-WebKit2WebExtension-Objects-DOMHTMLInputElement.html#v:dOMHTMLInputElementGetWidth"
})
#endif
foreign import ccall "webkit_dom_html_input_element_get_will_validate" webkit_dom_html_input_element_get_will_validate ::
Ptr DOMHTMLInputElement ->
IO CInt
{-# DEPRECATED dOMHTMLInputElementGetWillValidate ["(Since version 2.22)","Use JavaScriptCore API instead"] #-}
dOMHTMLInputElementGetWillValidate ::
(B.CallStack.HasCallStack, MonadIO m, IsDOMHTMLInputElement a) =>
a
-> m Bool
dOMHTMLInputElementGetWillValidate :: forall (m :: * -> *) a.
(HasCallStack, MonadIO m, IsDOMHTMLInputElement a) =>
a -> m Bool
dOMHTMLInputElementGetWillValidate a
self = IO Bool -> m Bool
forall a. IO a -> m a
forall (m :: * -> *) a. MonadIO m => IO a -> m a
liftIO (IO Bool -> m Bool) -> IO Bool -> m Bool
forall a b. (a -> b) -> a -> b
$ do
Ptr DOMHTMLInputElement
self' <- a -> IO (Ptr DOMHTMLInputElement)
forall a b. (HasCallStack, ManagedPtrNewtype a) => a -> IO (Ptr b)
unsafeManagedPtrCastPtr a
self
CInt
result <- Ptr DOMHTMLInputElement -> IO CInt
webkit_dom_html_input_element_get_will_validate Ptr DOMHTMLInputElement
self'
let result' :: Bool
result' = (CInt -> CInt -> Bool
forall a. Eq a => a -> a -> Bool
/= CInt
0) CInt
result
a -> IO ()
forall a. ManagedPtrNewtype a => a -> IO ()
touchManagedPtr a
self
Bool -> IO Bool
forall a. a -> IO a
forall (m :: * -> *) a. Monad m => a -> m a
return Bool
result'
#if defined(ENABLE_OVERLOADING)
data DOMHTMLInputElementGetWillValidateMethodInfo
instance (signature ~ (m Bool), MonadIO m, IsDOMHTMLInputElement a) => O.OverloadedMethod DOMHTMLInputElementGetWillValidateMethodInfo a signature where
overloadedMethod = dOMHTMLInputElementGetWillValidate
instance O.OverloadedMethodInfo DOMHTMLInputElementGetWillValidateMethodInfo a where
overloadedMethodInfo = P.Just (O.ResolvedSymbolInfo {
O.resolvedSymbolName = "GI.WebKit2WebExtension.Objects.DOMHTMLInputElement.dOMHTMLInputElementGetWillValidate",
O.resolvedSymbolURL = "https://hackage.haskell.org/package/gi-webkit2webextension-4.0.28/docs/GI-WebKit2WebExtension-Objects-DOMHTMLInputElement.html#v:dOMHTMLInputElementGetWillValidate"
})
#endif
foreign import ccall "webkit_dom_html_input_element_is_edited" webkit_dom_html_input_element_is_edited ::
Ptr DOMHTMLInputElement ->
IO CInt
{-# DEPRECATED dOMHTMLInputElementIsEdited ["(Since version 2.22)","Use 'GI.WebKit2WebExtension.Objects.DOMElement.dOMElementHtmlInputElementIsUserEdited' instead."] #-}
dOMHTMLInputElementIsEdited ::
(B.CallStack.HasCallStack, MonadIO m, IsDOMHTMLInputElement a) =>
a
-> m Bool
dOMHTMLInputElementIsEdited :: forall (m :: * -> *) a.
(HasCallStack, MonadIO m, IsDOMHTMLInputElement a) =>
a -> m Bool
dOMHTMLInputElementIsEdited a
input = IO Bool -> m Bool
forall a. IO a -> m a
forall (m :: * -> *) a. MonadIO m => IO a -> m a
liftIO (IO Bool -> m Bool) -> IO Bool -> m Bool
forall a b. (a -> b) -> a -> b
$ do
Ptr DOMHTMLInputElement
input' <- a -> IO (Ptr DOMHTMLInputElement)
forall a b. (HasCallStack, ManagedPtrNewtype a) => a -> IO (Ptr b)
unsafeManagedPtrCastPtr a
input
CInt
result <- Ptr DOMHTMLInputElement -> IO CInt
webkit_dom_html_input_element_is_edited Ptr DOMHTMLInputElement
input'
let result' :: Bool
result' = (CInt -> CInt -> Bool
forall a. Eq a => a -> a -> Bool
/= CInt
0) CInt
result
a -> IO ()
forall a. ManagedPtrNewtype a => a -> IO ()
touchManagedPtr a
input
Bool -> IO Bool
forall a. a -> IO a
forall (m :: * -> *) a. Monad m => a -> m a
return Bool
result'
#if defined(ENABLE_OVERLOADING)
data DOMHTMLInputElementIsEditedMethodInfo
instance (signature ~ (m Bool), MonadIO m, IsDOMHTMLInputElement a) => O.OverloadedMethod DOMHTMLInputElementIsEditedMethodInfo a signature where
overloadedMethod = dOMHTMLInputElementIsEdited
instance O.OverloadedMethodInfo DOMHTMLInputElementIsEditedMethodInfo a where
overloadedMethodInfo = P.Just (O.ResolvedSymbolInfo {
O.resolvedSymbolName = "GI.WebKit2WebExtension.Objects.DOMHTMLInputElement.dOMHTMLInputElementIsEdited",
O.resolvedSymbolURL = "https://hackage.haskell.org/package/gi-webkit2webextension-4.0.28/docs/GI-WebKit2WebExtension-Objects-DOMHTMLInputElement.html#v:dOMHTMLInputElementIsEdited"
})
#endif
foreign import ccall "webkit_dom_html_input_element_select" webkit_dom_html_input_element_select ::
Ptr DOMHTMLInputElement ->
IO ()
{-# DEPRECATED dOMHTMLInputElementSelect ["(Since version 2.22)","Use JavaScriptCore API instead"] #-}
dOMHTMLInputElementSelect ::
(B.CallStack.HasCallStack, MonadIO m, IsDOMHTMLInputElement a) =>
a
-> m ()
dOMHTMLInputElementSelect :: forall (m :: * -> *) a.
(HasCallStack, MonadIO m, IsDOMHTMLInputElement a) =>
a -> m ()
dOMHTMLInputElementSelect a
self = IO () -> m ()
forall a. IO a -> m a
forall (m :: * -> *) a. MonadIO m => IO a -> m a
liftIO (IO () -> m ()) -> IO () -> m ()
forall a b. (a -> b) -> a -> b
$ do
Ptr DOMHTMLInputElement
self' <- a -> IO (Ptr DOMHTMLInputElement)
forall a b. (HasCallStack, ManagedPtrNewtype a) => a -> IO (Ptr b)
unsafeManagedPtrCastPtr a
self
Ptr DOMHTMLInputElement -> IO ()
webkit_dom_html_input_element_select Ptr DOMHTMLInputElement
self'
a -> IO ()
forall a. ManagedPtrNewtype a => a -> IO ()
touchManagedPtr a
self
() -> IO ()
forall a. a -> IO a
forall (m :: * -> *) a. Monad m => a -> m a
return ()
#if defined(ENABLE_OVERLOADING)
data DOMHTMLInputElementSelectMethodInfo
instance (signature ~ (m ()), MonadIO m, IsDOMHTMLInputElement a) => O.OverloadedMethod DOMHTMLInputElementSelectMethodInfo a signature where
overloadedMethod = dOMHTMLInputElementSelect
instance O.OverloadedMethodInfo DOMHTMLInputElementSelectMethodInfo a where
overloadedMethodInfo = P.Just (O.ResolvedSymbolInfo {
O.resolvedSymbolName = "GI.WebKit2WebExtension.Objects.DOMHTMLInputElement.dOMHTMLInputElementSelect",
O.resolvedSymbolURL = "https://hackage.haskell.org/package/gi-webkit2webextension-4.0.28/docs/GI-WebKit2WebExtension-Objects-DOMHTMLInputElement.html#v:dOMHTMLInputElementSelect"
})
#endif
foreign import ccall "webkit_dom_html_input_element_set_accept" webkit_dom_html_input_element_set_accept ::
Ptr DOMHTMLInputElement ->
CString ->
IO ()
{-# DEPRECATED dOMHTMLInputElementSetAccept ["(Since version 2.22)","Use JavaScriptCore API instead"] #-}
dOMHTMLInputElementSetAccept ::
(B.CallStack.HasCallStack, MonadIO m, IsDOMHTMLInputElement a) =>
a
-> T.Text
-> m ()
dOMHTMLInputElementSetAccept :: forall (m :: * -> *) a.
(HasCallStack, MonadIO m, IsDOMHTMLInputElement a) =>
a -> Text -> m ()
dOMHTMLInputElementSetAccept a
self Text
value = IO () -> m ()
forall a. IO a -> m a
forall (m :: * -> *) a. MonadIO m => IO a -> m a
liftIO (IO () -> m ()) -> IO () -> m ()
forall a b. (a -> b) -> a -> b
$ do
Ptr DOMHTMLInputElement
self' <- a -> IO (Ptr DOMHTMLInputElement)
forall a b. (HasCallStack, ManagedPtrNewtype a) => a -> IO (Ptr b)
unsafeManagedPtrCastPtr a
self
CString
value' <- Text -> IO CString
textToCString Text
value
Ptr DOMHTMLInputElement -> CString -> IO ()
webkit_dom_html_input_element_set_accept Ptr DOMHTMLInputElement
self' CString
value'
a -> IO ()
forall a. ManagedPtrNewtype a => a -> IO ()
touchManagedPtr a
self
CString -> IO ()
forall a. Ptr a -> IO ()
freeMem CString
value'
() -> IO ()
forall a. a -> IO a
forall (m :: * -> *) a. Monad m => a -> m a
return ()
#if defined(ENABLE_OVERLOADING)
data DOMHTMLInputElementSetAcceptMethodInfo
instance (signature ~ (T.Text -> m ()), MonadIO m, IsDOMHTMLInputElement a) => O.OverloadedMethod DOMHTMLInputElementSetAcceptMethodInfo a signature where
overloadedMethod = dOMHTMLInputElementSetAccept
instance O.OverloadedMethodInfo DOMHTMLInputElementSetAcceptMethodInfo a where
overloadedMethodInfo = P.Just (O.ResolvedSymbolInfo {
O.resolvedSymbolName = "GI.WebKit2WebExtension.Objects.DOMHTMLInputElement.dOMHTMLInputElementSetAccept",
O.resolvedSymbolURL = "https://hackage.haskell.org/package/gi-webkit2webextension-4.0.28/docs/GI-WebKit2WebExtension-Objects-DOMHTMLInputElement.html#v:dOMHTMLInputElementSetAccept"
})
#endif
foreign import ccall "webkit_dom_html_input_element_set_align" webkit_dom_html_input_element_set_align ::
Ptr DOMHTMLInputElement ->
CString ->
IO ()
{-# DEPRECATED dOMHTMLInputElementSetAlign ["(Since version 2.22)","Use JavaScriptCore API instead"] #-}
dOMHTMLInputElementSetAlign ::
(B.CallStack.HasCallStack, MonadIO m, IsDOMHTMLInputElement a) =>
a
-> T.Text
-> m ()
dOMHTMLInputElementSetAlign :: forall (m :: * -> *) a.
(HasCallStack, MonadIO m, IsDOMHTMLInputElement a) =>
a -> Text -> m ()
dOMHTMLInputElementSetAlign a
self Text
value = IO () -> m ()
forall a. IO a -> m a
forall (m :: * -> *) a. MonadIO m => IO a -> m a
liftIO (IO () -> m ()) -> IO () -> m ()
forall a b. (a -> b) -> a -> b
$ do
Ptr DOMHTMLInputElement
self' <- a -> IO (Ptr DOMHTMLInputElement)
forall a b. (HasCallStack, ManagedPtrNewtype a) => a -> IO (Ptr b)
unsafeManagedPtrCastPtr a
self
CString
value' <- Text -> IO CString
textToCString Text
value
Ptr DOMHTMLInputElement -> CString -> IO ()
webkit_dom_html_input_element_set_align Ptr DOMHTMLInputElement
self' CString
value'
a -> IO ()
forall a. ManagedPtrNewtype a => a -> IO ()
touchManagedPtr a
self
CString -> IO ()
forall a. Ptr a -> IO ()
freeMem CString
value'
() -> IO ()
forall a. a -> IO a
forall (m :: * -> *) a. Monad m => a -> m a
return ()
#if defined(ENABLE_OVERLOADING)
data DOMHTMLInputElementSetAlignMethodInfo
instance (signature ~ (T.Text -> m ()), MonadIO m, IsDOMHTMLInputElement a) => O.OverloadedMethod DOMHTMLInputElementSetAlignMethodInfo a signature where
overloadedMethod = dOMHTMLInputElementSetAlign
instance O.OverloadedMethodInfo DOMHTMLInputElementSetAlignMethodInfo a where
overloadedMethodInfo = P.Just (O.ResolvedSymbolInfo {
O.resolvedSymbolName = "GI.WebKit2WebExtension.Objects.DOMHTMLInputElement.dOMHTMLInputElementSetAlign",
O.resolvedSymbolURL = "https://hackage.haskell.org/package/gi-webkit2webextension-4.0.28/docs/GI-WebKit2WebExtension-Objects-DOMHTMLInputElement.html#v:dOMHTMLInputElementSetAlign"
})
#endif
foreign import ccall "webkit_dom_html_input_element_set_alt" webkit_dom_html_input_element_set_alt ::
Ptr DOMHTMLInputElement ->
CString ->
IO ()
{-# DEPRECATED dOMHTMLInputElementSetAlt ["(Since version 2.22)","Use JavaScriptCore API instead"] #-}
dOMHTMLInputElementSetAlt ::
(B.CallStack.HasCallStack, MonadIO m, IsDOMHTMLInputElement a) =>
a
-> T.Text
-> m ()
dOMHTMLInputElementSetAlt :: forall (m :: * -> *) a.
(HasCallStack, MonadIO m, IsDOMHTMLInputElement a) =>
a -> Text -> m ()
dOMHTMLInputElementSetAlt a
self Text
value = IO () -> m ()
forall a. IO a -> m a
forall (m :: * -> *) a. MonadIO m => IO a -> m a
liftIO (IO () -> m ()) -> IO () -> m ()
forall a b. (a -> b) -> a -> b
$ do
Ptr DOMHTMLInputElement
self' <- a -> IO (Ptr DOMHTMLInputElement)
forall a b. (HasCallStack, ManagedPtrNewtype a) => a -> IO (Ptr b)
unsafeManagedPtrCastPtr a
self
CString
value' <- Text -> IO CString
textToCString Text
value
Ptr DOMHTMLInputElement -> CString -> IO ()
webkit_dom_html_input_element_set_alt Ptr DOMHTMLInputElement
self' CString
value'
a -> IO ()
forall a. ManagedPtrNewtype a => a -> IO ()
touchManagedPtr a
self
CString -> IO ()
forall a. Ptr a -> IO ()
freeMem CString
value'
() -> IO ()
forall a. a -> IO a
forall (m :: * -> *) a. Monad m => a -> m a
return ()
#if defined(ENABLE_OVERLOADING)
data DOMHTMLInputElementSetAltMethodInfo
instance (signature ~ (T.Text -> m ()), MonadIO m, IsDOMHTMLInputElement a) => O.OverloadedMethod DOMHTMLInputElementSetAltMethodInfo a signature where
overloadedMethod = dOMHTMLInputElementSetAlt
instance O.OverloadedMethodInfo DOMHTMLInputElementSetAltMethodInfo a where
overloadedMethodInfo = P.Just (O.ResolvedSymbolInfo {
O.resolvedSymbolName = "GI.WebKit2WebExtension.Objects.DOMHTMLInputElement.dOMHTMLInputElementSetAlt",
O.resolvedSymbolURL = "https://hackage.haskell.org/package/gi-webkit2webextension-4.0.28/docs/GI-WebKit2WebExtension-Objects-DOMHTMLInputElement.html#v:dOMHTMLInputElementSetAlt"
})
#endif
foreign import ccall "webkit_dom_html_input_element_set_auto_filled" webkit_dom_html_input_element_set_auto_filled ::
Ptr DOMHTMLInputElement ->
CInt ->
IO ()
{-# DEPRECATED dOMHTMLInputElementSetAutoFilled ["(Since version 2.22)","Use 'GI.WebKit2WebExtension.Objects.DOMElement.dOMElementHtmlInputElementSetAutoFilled' instead."] #-}
dOMHTMLInputElementSetAutoFilled ::
(B.CallStack.HasCallStack, MonadIO m, IsDOMHTMLInputElement a) =>
a
-> Bool
-> m ()
dOMHTMLInputElementSetAutoFilled :: forall (m :: * -> *) a.
(HasCallStack, MonadIO m, IsDOMHTMLInputElement a) =>
a -> Bool -> m ()
dOMHTMLInputElementSetAutoFilled a
self Bool
value = IO () -> m ()
forall a. IO a -> m a
forall (m :: * -> *) a. MonadIO m => IO a -> m a
liftIO (IO () -> m ()) -> IO () -> m ()
forall a b. (a -> b) -> a -> b
$ do
Ptr DOMHTMLInputElement
self' <- a -> IO (Ptr DOMHTMLInputElement)
forall a b. (HasCallStack, ManagedPtrNewtype a) => a -> IO (Ptr b)
unsafeManagedPtrCastPtr a
self
let value' :: CInt
value' = (Int -> CInt
forall a b. (Integral a, Num b) => a -> b
fromIntegral (Int -> CInt) -> (Bool -> Int) -> Bool -> CInt
forall b c a. (b -> c) -> (a -> b) -> a -> c
. Bool -> Int
forall a. Enum a => a -> Int
fromEnum) Bool
value
Ptr DOMHTMLInputElement -> CInt -> IO ()
webkit_dom_html_input_element_set_auto_filled Ptr DOMHTMLInputElement
self' CInt
value'
a -> IO ()
forall a. ManagedPtrNewtype a => a -> IO ()
touchManagedPtr a
self
() -> IO ()
forall a. a -> IO a
forall (m :: * -> *) a. Monad m => a -> m a
return ()
#if defined(ENABLE_OVERLOADING)
data DOMHTMLInputElementSetAutoFilledMethodInfo
instance (signature ~ (Bool -> m ()), MonadIO m, IsDOMHTMLInputElement a) => O.OverloadedMethod DOMHTMLInputElementSetAutoFilledMethodInfo a signature where
overloadedMethod = dOMHTMLInputElementSetAutoFilled
instance O.OverloadedMethodInfo DOMHTMLInputElementSetAutoFilledMethodInfo a where
overloadedMethodInfo = P.Just (O.ResolvedSymbolInfo {
O.resolvedSymbolName = "GI.WebKit2WebExtension.Objects.DOMHTMLInputElement.dOMHTMLInputElementSetAutoFilled",
O.resolvedSymbolURL = "https://hackage.haskell.org/package/gi-webkit2webextension-4.0.28/docs/GI-WebKit2WebExtension-Objects-DOMHTMLInputElement.html#v:dOMHTMLInputElementSetAutoFilled"
})
#endif
foreign import ccall "webkit_dom_html_input_element_set_autofocus" webkit_dom_html_input_element_set_autofocus ::
Ptr DOMHTMLInputElement ->
CInt ->
IO ()
{-# DEPRECATED dOMHTMLInputElementSetAutofocus ["(Since version 2.22)","Use JavaScriptCore API instead"] #-}
dOMHTMLInputElementSetAutofocus ::
(B.CallStack.HasCallStack, MonadIO m, IsDOMHTMLInputElement a) =>
a
-> Bool
-> m ()
dOMHTMLInputElementSetAutofocus :: forall (m :: * -> *) a.
(HasCallStack, MonadIO m, IsDOMHTMLInputElement a) =>
a -> Bool -> m ()
dOMHTMLInputElementSetAutofocus a
self Bool
value = IO () -> m ()
forall a. IO a -> m a
forall (m :: * -> *) a. MonadIO m => IO a -> m a
liftIO (IO () -> m ()) -> IO () -> m ()
forall a b. (a -> b) -> a -> b
$ do
Ptr DOMHTMLInputElement
self' <- a -> IO (Ptr DOMHTMLInputElement)
forall a b. (HasCallStack, ManagedPtrNewtype a) => a -> IO (Ptr b)
unsafeManagedPtrCastPtr a
self
let value' :: CInt
value' = (Int -> CInt
forall a b. (Integral a, Num b) => a -> b
fromIntegral (Int -> CInt) -> (Bool -> Int) -> Bool -> CInt
forall b c a. (b -> c) -> (a -> b) -> a -> c
. Bool -> Int
forall a. Enum a => a -> Int
fromEnum) Bool
value
Ptr DOMHTMLInputElement -> CInt -> IO ()
webkit_dom_html_input_element_set_autofocus Ptr DOMHTMLInputElement
self' CInt
value'
a -> IO ()
forall a. ManagedPtrNewtype a => a -> IO ()
touchManagedPtr a
self
() -> IO ()
forall a. a -> IO a
forall (m :: * -> *) a. Monad m => a -> m a
return ()
#if defined(ENABLE_OVERLOADING)
data DOMHTMLInputElementSetAutofocusMethodInfo
instance (signature ~ (Bool -> m ()), MonadIO m, IsDOMHTMLInputElement a) => O.OverloadedMethod DOMHTMLInputElementSetAutofocusMethodInfo a signature where
overloadedMethod = dOMHTMLInputElementSetAutofocus
instance O.OverloadedMethodInfo DOMHTMLInputElementSetAutofocusMethodInfo a where
overloadedMethodInfo = P.Just (O.ResolvedSymbolInfo {
O.resolvedSymbolName = "GI.WebKit2WebExtension.Objects.DOMHTMLInputElement.dOMHTMLInputElementSetAutofocus",
O.resolvedSymbolURL = "https://hackage.haskell.org/package/gi-webkit2webextension-4.0.28/docs/GI-WebKit2WebExtension-Objects-DOMHTMLInputElement.html#v:dOMHTMLInputElementSetAutofocus"
})
#endif
foreign import ccall "webkit_dom_html_input_element_set_capture_type" webkit_dom_html_input_element_set_capture_type ::
Ptr DOMHTMLInputElement ->
CString ->
IO ()
{-# DEPRECATED dOMHTMLInputElementSetCaptureType ["(Since version 2.22)","Use JavaScriptCore API instead"] #-}
dOMHTMLInputElementSetCaptureType ::
(B.CallStack.HasCallStack, MonadIO m, IsDOMHTMLInputElement a) =>
a
-> T.Text
-> m ()
dOMHTMLInputElementSetCaptureType :: forall (m :: * -> *) a.
(HasCallStack, MonadIO m, IsDOMHTMLInputElement a) =>
a -> Text -> m ()
dOMHTMLInputElementSetCaptureType a
self Text
value = IO () -> m ()
forall a. IO a -> m a
forall (m :: * -> *) a. MonadIO m => IO a -> m a
liftIO (IO () -> m ()) -> IO () -> m ()
forall a b. (a -> b) -> a -> b
$ do
Ptr DOMHTMLInputElement
self' <- a -> IO (Ptr DOMHTMLInputElement)
forall a b. (HasCallStack, ManagedPtrNewtype a) => a -> IO (Ptr b)
unsafeManagedPtrCastPtr a
self
CString
value' <- Text -> IO CString
textToCString Text
value
Ptr DOMHTMLInputElement -> CString -> IO ()
webkit_dom_html_input_element_set_capture_type Ptr DOMHTMLInputElement
self' CString
value'
a -> IO ()
forall a. ManagedPtrNewtype a => a -> IO ()
touchManagedPtr a
self
CString -> IO ()
forall a. Ptr a -> IO ()
freeMem CString
value'
() -> IO ()
forall a. a -> IO a
forall (m :: * -> *) a. Monad m => a -> m a
return ()
#if defined(ENABLE_OVERLOADING)
data DOMHTMLInputElementSetCaptureTypeMethodInfo
instance (signature ~ (T.Text -> m ()), MonadIO m, IsDOMHTMLInputElement a) => O.OverloadedMethod DOMHTMLInputElementSetCaptureTypeMethodInfo a signature where
overloadedMethod = dOMHTMLInputElementSetCaptureType
instance O.OverloadedMethodInfo DOMHTMLInputElementSetCaptureTypeMethodInfo a where
overloadedMethodInfo = P.Just (O.ResolvedSymbolInfo {
O.resolvedSymbolName = "GI.WebKit2WebExtension.Objects.DOMHTMLInputElement.dOMHTMLInputElementSetCaptureType",
O.resolvedSymbolURL = "https://hackage.haskell.org/package/gi-webkit2webextension-4.0.28/docs/GI-WebKit2WebExtension-Objects-DOMHTMLInputElement.html#v:dOMHTMLInputElementSetCaptureType"
})
#endif
foreign import ccall "webkit_dom_html_input_element_set_checked" webkit_dom_html_input_element_set_checked ::
Ptr DOMHTMLInputElement ->
CInt ->
IO ()
{-# DEPRECATED dOMHTMLInputElementSetChecked ["(Since version 2.22)","Use JavaScriptCore API instead"] #-}
dOMHTMLInputElementSetChecked ::
(B.CallStack.HasCallStack, MonadIO m, IsDOMHTMLInputElement a) =>
a
-> Bool
-> m ()
dOMHTMLInputElementSetChecked :: forall (m :: * -> *) a.
(HasCallStack, MonadIO m, IsDOMHTMLInputElement a) =>
a -> Bool -> m ()
dOMHTMLInputElementSetChecked a
self Bool
value = IO () -> m ()
forall a. IO a -> m a
forall (m :: * -> *) a. MonadIO m => IO a -> m a
liftIO (IO () -> m ()) -> IO () -> m ()
forall a b. (a -> b) -> a -> b
$ do
Ptr DOMHTMLInputElement
self' <- a -> IO (Ptr DOMHTMLInputElement)
forall a b. (HasCallStack, ManagedPtrNewtype a) => a -> IO (Ptr b)
unsafeManagedPtrCastPtr a
self
let value' :: CInt
value' = (Int -> CInt
forall a b. (Integral a, Num b) => a -> b
fromIntegral (Int -> CInt) -> (Bool -> Int) -> Bool -> CInt
forall b c a. (b -> c) -> (a -> b) -> a -> c
. Bool -> Int
forall a. Enum a => a -> Int
fromEnum) Bool
value
Ptr DOMHTMLInputElement -> CInt -> IO ()
webkit_dom_html_input_element_set_checked Ptr DOMHTMLInputElement
self' CInt
value'
a -> IO ()
forall a. ManagedPtrNewtype a => a -> IO ()
touchManagedPtr a
self
() -> IO ()
forall a. a -> IO a
forall (m :: * -> *) a. Monad m => a -> m a
return ()
#if defined(ENABLE_OVERLOADING)
data DOMHTMLInputElementSetCheckedMethodInfo
instance (signature ~ (Bool -> m ()), MonadIO m, IsDOMHTMLInputElement a) => O.OverloadedMethod DOMHTMLInputElementSetCheckedMethodInfo a signature where
overloadedMethod = dOMHTMLInputElementSetChecked
instance O.OverloadedMethodInfo DOMHTMLInputElementSetCheckedMethodInfo a where
overloadedMethodInfo = P.Just (O.ResolvedSymbolInfo {
O.resolvedSymbolName = "GI.WebKit2WebExtension.Objects.DOMHTMLInputElement.dOMHTMLInputElementSetChecked",
O.resolvedSymbolURL = "https://hackage.haskell.org/package/gi-webkit2webextension-4.0.28/docs/GI-WebKit2WebExtension-Objects-DOMHTMLInputElement.html#v:dOMHTMLInputElementSetChecked"
})
#endif
foreign import ccall "webkit_dom_html_input_element_set_default_checked" webkit_dom_html_input_element_set_default_checked ::
Ptr DOMHTMLInputElement ->
CInt ->
IO ()
{-# DEPRECATED dOMHTMLInputElementSetDefaultChecked ["(Since version 2.22)","Use JavaScriptCore API instead"] #-}
dOMHTMLInputElementSetDefaultChecked ::
(B.CallStack.HasCallStack, MonadIO m, IsDOMHTMLInputElement a) =>
a
-> Bool
-> m ()
dOMHTMLInputElementSetDefaultChecked :: forall (m :: * -> *) a.
(HasCallStack, MonadIO m, IsDOMHTMLInputElement a) =>
a -> Bool -> m ()
dOMHTMLInputElementSetDefaultChecked a
self Bool
value = IO () -> m ()
forall a. IO a -> m a
forall (m :: * -> *) a. MonadIO m => IO a -> m a
liftIO (IO () -> m ()) -> IO () -> m ()
forall a b. (a -> b) -> a -> b
$ do
Ptr DOMHTMLInputElement
self' <- a -> IO (Ptr DOMHTMLInputElement)
forall a b. (HasCallStack, ManagedPtrNewtype a) => a -> IO (Ptr b)
unsafeManagedPtrCastPtr a
self
let value' :: CInt
value' = (Int -> CInt
forall a b. (Integral a, Num b) => a -> b
fromIntegral (Int -> CInt) -> (Bool -> Int) -> Bool -> CInt
forall b c a. (b -> c) -> (a -> b) -> a -> c
. Bool -> Int
forall a. Enum a => a -> Int
fromEnum) Bool
value
Ptr DOMHTMLInputElement -> CInt -> IO ()
webkit_dom_html_input_element_set_default_checked Ptr DOMHTMLInputElement
self' CInt
value'
a -> IO ()
forall a. ManagedPtrNewtype a => a -> IO ()
touchManagedPtr a
self
() -> IO ()
forall a. a -> IO a
forall (m :: * -> *) a. Monad m => a -> m a
return ()
#if defined(ENABLE_OVERLOADING)
data DOMHTMLInputElementSetDefaultCheckedMethodInfo
instance (signature ~ (Bool -> m ()), MonadIO m, IsDOMHTMLInputElement a) => O.OverloadedMethod DOMHTMLInputElementSetDefaultCheckedMethodInfo a signature where
overloadedMethod = dOMHTMLInputElementSetDefaultChecked
instance O.OverloadedMethodInfo DOMHTMLInputElementSetDefaultCheckedMethodInfo a where
overloadedMethodInfo = P.Just (O.ResolvedSymbolInfo {
O.resolvedSymbolName = "GI.WebKit2WebExtension.Objects.DOMHTMLInputElement.dOMHTMLInputElementSetDefaultChecked",
O.resolvedSymbolURL = "https://hackage.haskell.org/package/gi-webkit2webextension-4.0.28/docs/GI-WebKit2WebExtension-Objects-DOMHTMLInputElement.html#v:dOMHTMLInputElementSetDefaultChecked"
})
#endif
foreign import ccall "webkit_dom_html_input_element_set_default_value" webkit_dom_html_input_element_set_default_value ::
Ptr DOMHTMLInputElement ->
CString ->
IO ()
{-# DEPRECATED dOMHTMLInputElementSetDefaultValue ["(Since version 2.22)","Use JavaScriptCore API instead"] #-}
dOMHTMLInputElementSetDefaultValue ::
(B.CallStack.HasCallStack, MonadIO m, IsDOMHTMLInputElement a) =>
a
-> T.Text
-> m ()
dOMHTMLInputElementSetDefaultValue :: forall (m :: * -> *) a.
(HasCallStack, MonadIO m, IsDOMHTMLInputElement a) =>
a -> Text -> m ()
dOMHTMLInputElementSetDefaultValue a
self Text
value = IO () -> m ()
forall a. IO a -> m a
forall (m :: * -> *) a. MonadIO m => IO a -> m a
liftIO (IO () -> m ()) -> IO () -> m ()
forall a b. (a -> b) -> a -> b
$ do
Ptr DOMHTMLInputElement
self' <- a -> IO (Ptr DOMHTMLInputElement)
forall a b. (HasCallStack, ManagedPtrNewtype a) => a -> IO (Ptr b)
unsafeManagedPtrCastPtr a
self
CString
value' <- Text -> IO CString
textToCString Text
value
Ptr DOMHTMLInputElement -> CString -> IO ()
webkit_dom_html_input_element_set_default_value Ptr DOMHTMLInputElement
self' CString
value'
a -> IO ()
forall a. ManagedPtrNewtype a => a -> IO ()
touchManagedPtr a
self
CString -> IO ()
forall a. Ptr a -> IO ()
freeMem CString
value'
() -> IO ()
forall a. a -> IO a
forall (m :: * -> *) a. Monad m => a -> m a
return ()
#if defined(ENABLE_OVERLOADING)
data DOMHTMLInputElementSetDefaultValueMethodInfo
instance (signature ~ (T.Text -> m ()), MonadIO m, IsDOMHTMLInputElement a) => O.OverloadedMethod DOMHTMLInputElementSetDefaultValueMethodInfo a signature where
overloadedMethod = dOMHTMLInputElementSetDefaultValue
instance O.OverloadedMethodInfo DOMHTMLInputElementSetDefaultValueMethodInfo a where
overloadedMethodInfo = P.Just (O.ResolvedSymbolInfo {
O.resolvedSymbolName = "GI.WebKit2WebExtension.Objects.DOMHTMLInputElement.dOMHTMLInputElementSetDefaultValue",
O.resolvedSymbolURL = "https://hackage.haskell.org/package/gi-webkit2webextension-4.0.28/docs/GI-WebKit2WebExtension-Objects-DOMHTMLInputElement.html#v:dOMHTMLInputElementSetDefaultValue"
})
#endif
foreign import ccall "webkit_dom_html_input_element_set_disabled" webkit_dom_html_input_element_set_disabled ::
Ptr DOMHTMLInputElement ->
CInt ->
IO ()
{-# DEPRECATED dOMHTMLInputElementSetDisabled ["(Since version 2.22)","Use JavaScriptCore API instead"] #-}
dOMHTMLInputElementSetDisabled ::
(B.CallStack.HasCallStack, MonadIO m, IsDOMHTMLInputElement a) =>
a
-> Bool
-> m ()
dOMHTMLInputElementSetDisabled :: forall (m :: * -> *) a.
(HasCallStack, MonadIO m, IsDOMHTMLInputElement a) =>
a -> Bool -> m ()
dOMHTMLInputElementSetDisabled a
self Bool
value = IO () -> m ()
forall a. IO a -> m a
forall (m :: * -> *) a. MonadIO m => IO a -> m a
liftIO (IO () -> m ()) -> IO () -> m ()
forall a b. (a -> b) -> a -> b
$ do
Ptr DOMHTMLInputElement
self' <- a -> IO (Ptr DOMHTMLInputElement)
forall a b. (HasCallStack, ManagedPtrNewtype a) => a -> IO (Ptr b)
unsafeManagedPtrCastPtr a
self
let value' :: CInt
value' = (Int -> CInt
forall a b. (Integral a, Num b) => a -> b
fromIntegral (Int -> CInt) -> (Bool -> Int) -> Bool -> CInt
forall b c a. (b -> c) -> (a -> b) -> a -> c
. Bool -> Int
forall a. Enum a => a -> Int
fromEnum) Bool
value
Ptr DOMHTMLInputElement -> CInt -> IO ()
webkit_dom_html_input_element_set_disabled Ptr DOMHTMLInputElement
self' CInt
value'
a -> IO ()
forall a. ManagedPtrNewtype a => a -> IO ()
touchManagedPtr a
self
() -> IO ()
forall a. a -> IO a
forall (m :: * -> *) a. Monad m => a -> m a
return ()
#if defined(ENABLE_OVERLOADING)
data DOMHTMLInputElementSetDisabledMethodInfo
instance (signature ~ (Bool -> m ()), MonadIO m, IsDOMHTMLInputElement a) => O.OverloadedMethod DOMHTMLInputElementSetDisabledMethodInfo a signature where
overloadedMethod = dOMHTMLInputElementSetDisabled
instance O.OverloadedMethodInfo DOMHTMLInputElementSetDisabledMethodInfo a where
overloadedMethodInfo = P.Just (O.ResolvedSymbolInfo {
O.resolvedSymbolName = "GI.WebKit2WebExtension.Objects.DOMHTMLInputElement.dOMHTMLInputElementSetDisabled",
O.resolvedSymbolURL = "https://hackage.haskell.org/package/gi-webkit2webextension-4.0.28/docs/GI-WebKit2WebExtension-Objects-DOMHTMLInputElement.html#v:dOMHTMLInputElementSetDisabled"
})
#endif
foreign import ccall "webkit_dom_html_input_element_set_editing_value" webkit_dom_html_input_element_set_editing_value ::
Ptr DOMHTMLInputElement ->
CString ->
IO ()
{-# DEPRECATED dOMHTMLInputElementSetEditingValue ["(Since version 2.22)","Use 'GI.WebKit2WebExtension.Objects.DOMElement.dOMElementHtmlInputElementSetEditingValue' instead."] #-}
dOMHTMLInputElementSetEditingValue ::
(B.CallStack.HasCallStack, MonadIO m, IsDOMHTMLInputElement a) =>
a
-> T.Text
-> m ()
dOMHTMLInputElementSetEditingValue :: forall (m :: * -> *) a.
(HasCallStack, MonadIO m, IsDOMHTMLInputElement a) =>
a -> Text -> m ()
dOMHTMLInputElementSetEditingValue a
self Text
value = IO () -> m ()
forall a. IO a -> m a
forall (m :: * -> *) a. MonadIO m => IO a -> m a
liftIO (IO () -> m ()) -> IO () -> m ()
forall a b. (a -> b) -> a -> b
$ do
Ptr DOMHTMLInputElement
self' <- a -> IO (Ptr DOMHTMLInputElement)
forall a b. (HasCallStack, ManagedPtrNewtype a) => a -> IO (Ptr b)
unsafeManagedPtrCastPtr a
self
CString
value' <- Text -> IO CString
textToCString Text
value
Ptr DOMHTMLInputElement -> CString -> IO ()
webkit_dom_html_input_element_set_editing_value Ptr DOMHTMLInputElement
self' CString
value'
a -> IO ()
forall a. ManagedPtrNewtype a => a -> IO ()
touchManagedPtr a
self
CString -> IO ()
forall a. Ptr a -> IO ()
freeMem CString
value'
() -> IO ()
forall a. a -> IO a
forall (m :: * -> *) a. Monad m => a -> m a
return ()
#if defined(ENABLE_OVERLOADING)
data DOMHTMLInputElementSetEditingValueMethodInfo
instance (signature ~ (T.Text -> m ()), MonadIO m, IsDOMHTMLInputElement a) => O.OverloadedMethod DOMHTMLInputElementSetEditingValueMethodInfo a signature where
overloadedMethod = dOMHTMLInputElementSetEditingValue
instance O.OverloadedMethodInfo DOMHTMLInputElementSetEditingValueMethodInfo a where
overloadedMethodInfo = P.Just (O.ResolvedSymbolInfo {
O.resolvedSymbolName = "GI.WebKit2WebExtension.Objects.DOMHTMLInputElement.dOMHTMLInputElementSetEditingValue",
O.resolvedSymbolURL = "https://hackage.haskell.org/package/gi-webkit2webextension-4.0.28/docs/GI-WebKit2WebExtension-Objects-DOMHTMLInputElement.html#v:dOMHTMLInputElementSetEditingValue"
})
#endif
foreign import ccall "webkit_dom_html_input_element_set_files" webkit_dom_html_input_element_set_files ::
Ptr DOMHTMLInputElement ->
Ptr WebKit2WebExtension.DOMFileList.DOMFileList ->
IO ()
{-# DEPRECATED dOMHTMLInputElementSetFiles ["(Since version 2.22)","Use JavaScriptCore API instead"] #-}
dOMHTMLInputElementSetFiles ::
(B.CallStack.HasCallStack, MonadIO m, IsDOMHTMLInputElement a, WebKit2WebExtension.DOMFileList.IsDOMFileList b) =>
a
-> b
-> m ()
dOMHTMLInputElementSetFiles :: forall (m :: * -> *) a b.
(HasCallStack, MonadIO m, IsDOMHTMLInputElement a,
IsDOMFileList b) =>
a -> b -> m ()
dOMHTMLInputElementSetFiles a
self b
value = IO () -> m ()
forall a. IO a -> m a
forall (m :: * -> *) a. MonadIO m => IO a -> m a
liftIO (IO () -> m ()) -> IO () -> m ()
forall a b. (a -> b) -> a -> b
$ do
Ptr DOMHTMLInputElement
self' <- a -> IO (Ptr DOMHTMLInputElement)
forall a b. (HasCallStack, ManagedPtrNewtype a) => a -> IO (Ptr b)
unsafeManagedPtrCastPtr a
self
Ptr DOMFileList
value' <- b -> IO (Ptr DOMFileList)
forall a b. (HasCallStack, ManagedPtrNewtype a) => a -> IO (Ptr b)
unsafeManagedPtrCastPtr b
value
Ptr DOMHTMLInputElement -> Ptr DOMFileList -> IO ()
webkit_dom_html_input_element_set_files Ptr DOMHTMLInputElement
self' Ptr DOMFileList
value'
a -> IO ()
forall a. ManagedPtrNewtype a => a -> IO ()
touchManagedPtr a
self
b -> IO ()
forall a. ManagedPtrNewtype a => a -> IO ()
touchManagedPtr b
value
() -> IO ()
forall a. a -> IO a
forall (m :: * -> *) a. Monad m => a -> m a
return ()
#if defined(ENABLE_OVERLOADING)
data DOMHTMLInputElementSetFilesMethodInfo
instance (signature ~ (b -> m ()), MonadIO m, IsDOMHTMLInputElement a, WebKit2WebExtension.DOMFileList.IsDOMFileList b) => O.OverloadedMethod DOMHTMLInputElementSetFilesMethodInfo a signature where
overloadedMethod = dOMHTMLInputElementSetFiles
instance O.OverloadedMethodInfo DOMHTMLInputElementSetFilesMethodInfo a where
overloadedMethodInfo = P.Just (O.ResolvedSymbolInfo {
O.resolvedSymbolName = "GI.WebKit2WebExtension.Objects.DOMHTMLInputElement.dOMHTMLInputElementSetFiles",
O.resolvedSymbolURL = "https://hackage.haskell.org/package/gi-webkit2webextension-4.0.28/docs/GI-WebKit2WebExtension-Objects-DOMHTMLInputElement.html#v:dOMHTMLInputElementSetFiles"
})
#endif
foreign import ccall "webkit_dom_html_input_element_set_height" webkit_dom_html_input_element_set_height ::
Ptr DOMHTMLInputElement ->
CULong ->
IO ()
{-# DEPRECATED dOMHTMLInputElementSetHeight ["(Since version 2.22)","Use JavaScriptCore API instead"] #-}
dOMHTMLInputElementSetHeight ::
(B.CallStack.HasCallStack, MonadIO m, IsDOMHTMLInputElement a) =>
a
-> CULong
-> m ()
dOMHTMLInputElementSetHeight :: forall (m :: * -> *) a.
(HasCallStack, MonadIO m, IsDOMHTMLInputElement a) =>
a -> CULong -> m ()
dOMHTMLInputElementSetHeight a
self CULong
value = IO () -> m ()
forall a. IO a -> m a
forall (m :: * -> *) a. MonadIO m => IO a -> m a
liftIO (IO () -> m ()) -> IO () -> m ()
forall a b. (a -> b) -> a -> b
$ do
Ptr DOMHTMLInputElement
self' <- a -> IO (Ptr DOMHTMLInputElement)
forall a b. (HasCallStack, ManagedPtrNewtype a) => a -> IO (Ptr b)
unsafeManagedPtrCastPtr a
self
Ptr DOMHTMLInputElement -> CULong -> IO ()
webkit_dom_html_input_element_set_height Ptr DOMHTMLInputElement
self' CULong
value
a -> IO ()
forall a. ManagedPtrNewtype a => a -> IO ()
touchManagedPtr a
self
() -> IO ()
forall a. a -> IO a
forall (m :: * -> *) a. Monad m => a -> m a
return ()
#if defined(ENABLE_OVERLOADING)
data DOMHTMLInputElementSetHeightMethodInfo
instance (signature ~ (CULong -> m ()), MonadIO m, IsDOMHTMLInputElement a) => O.OverloadedMethod DOMHTMLInputElementSetHeightMethodInfo a signature where
overloadedMethod = dOMHTMLInputElementSetHeight
instance O.OverloadedMethodInfo DOMHTMLInputElementSetHeightMethodInfo a where
overloadedMethodInfo = P.Just (O.ResolvedSymbolInfo {
O.resolvedSymbolName = "GI.WebKit2WebExtension.Objects.DOMHTMLInputElement.dOMHTMLInputElementSetHeight",
O.resolvedSymbolURL = "https://hackage.haskell.org/package/gi-webkit2webextension-4.0.28/docs/GI-WebKit2WebExtension-Objects-DOMHTMLInputElement.html#v:dOMHTMLInputElementSetHeight"
})
#endif
foreign import ccall "webkit_dom_html_input_element_set_indeterminate" webkit_dom_html_input_element_set_indeterminate ::
Ptr DOMHTMLInputElement ->
CInt ->
IO ()
{-# DEPRECATED dOMHTMLInputElementSetIndeterminate ["(Since version 2.22)","Use JavaScriptCore API instead"] #-}
dOMHTMLInputElementSetIndeterminate ::
(B.CallStack.HasCallStack, MonadIO m, IsDOMHTMLInputElement a) =>
a
-> Bool
-> m ()
dOMHTMLInputElementSetIndeterminate :: forall (m :: * -> *) a.
(HasCallStack, MonadIO m, IsDOMHTMLInputElement a) =>
a -> Bool -> m ()
dOMHTMLInputElementSetIndeterminate a
self Bool
value = IO () -> m ()
forall a. IO a -> m a
forall (m :: * -> *) a. MonadIO m => IO a -> m a
liftIO (IO () -> m ()) -> IO () -> m ()
forall a b. (a -> b) -> a -> b
$ do
Ptr DOMHTMLInputElement
self' <- a -> IO (Ptr DOMHTMLInputElement)
forall a b. (HasCallStack, ManagedPtrNewtype a) => a -> IO (Ptr b)
unsafeManagedPtrCastPtr a
self
let value' :: CInt
value' = (Int -> CInt
forall a b. (Integral a, Num b) => a -> b
fromIntegral (Int -> CInt) -> (Bool -> Int) -> Bool -> CInt
forall b c a. (b -> c) -> (a -> b) -> a -> c
. Bool -> Int
forall a. Enum a => a -> Int
fromEnum) Bool
value
Ptr DOMHTMLInputElement -> CInt -> IO ()
webkit_dom_html_input_element_set_indeterminate Ptr DOMHTMLInputElement
self' CInt
value'
a -> IO ()
forall a. ManagedPtrNewtype a => a -> IO ()
touchManagedPtr a
self
() -> IO ()
forall a. a -> IO a
forall (m :: * -> *) a. Monad m => a -> m a
return ()
#if defined(ENABLE_OVERLOADING)
data DOMHTMLInputElementSetIndeterminateMethodInfo
instance (signature ~ (Bool -> m ()), MonadIO m, IsDOMHTMLInputElement a) => O.OverloadedMethod DOMHTMLInputElementSetIndeterminateMethodInfo a signature where
overloadedMethod = dOMHTMLInputElementSetIndeterminate
instance O.OverloadedMethodInfo DOMHTMLInputElementSetIndeterminateMethodInfo a where
overloadedMethodInfo = P.Just (O.ResolvedSymbolInfo {
O.resolvedSymbolName = "GI.WebKit2WebExtension.Objects.DOMHTMLInputElement.dOMHTMLInputElementSetIndeterminate",
O.resolvedSymbolURL = "https://hackage.haskell.org/package/gi-webkit2webextension-4.0.28/docs/GI-WebKit2WebExtension-Objects-DOMHTMLInputElement.html#v:dOMHTMLInputElementSetIndeterminate"
})
#endif
foreign import ccall "webkit_dom_html_input_element_set_input_type" webkit_dom_html_input_element_set_input_type ::
Ptr DOMHTMLInputElement ->
CString ->
IO ()
{-# DEPRECATED dOMHTMLInputElementSetInputType ["(Since version 2.22)","Use JavaScriptCore API instead"] #-}
dOMHTMLInputElementSetInputType ::
(B.CallStack.HasCallStack, MonadIO m, IsDOMHTMLInputElement a) =>
a
-> T.Text
-> m ()
dOMHTMLInputElementSetInputType :: forall (m :: * -> *) a.
(HasCallStack, MonadIO m, IsDOMHTMLInputElement a) =>
a -> Text -> m ()
dOMHTMLInputElementSetInputType a
self Text
value = IO () -> m ()
forall a. IO a -> m a
forall (m :: * -> *) a. MonadIO m => IO a -> m a
liftIO (IO () -> m ()) -> IO () -> m ()
forall a b. (a -> b) -> a -> b
$ do
Ptr DOMHTMLInputElement
self' <- a -> IO (Ptr DOMHTMLInputElement)
forall a b. (HasCallStack, ManagedPtrNewtype a) => a -> IO (Ptr b)
unsafeManagedPtrCastPtr a
self
CString
value' <- Text -> IO CString
textToCString Text
value
Ptr DOMHTMLInputElement -> CString -> IO ()
webkit_dom_html_input_element_set_input_type Ptr DOMHTMLInputElement
self' CString
value'
a -> IO ()
forall a. ManagedPtrNewtype a => a -> IO ()
touchManagedPtr a
self
CString -> IO ()
forall a. Ptr a -> IO ()
freeMem CString
value'
() -> IO ()
forall a. a -> IO a
forall (m :: * -> *) a. Monad m => a -> m a
return ()
#if defined(ENABLE_OVERLOADING)
data DOMHTMLInputElementSetInputTypeMethodInfo
instance (signature ~ (T.Text -> m ()), MonadIO m, IsDOMHTMLInputElement a) => O.OverloadedMethod DOMHTMLInputElementSetInputTypeMethodInfo a signature where
overloadedMethod = dOMHTMLInputElementSetInputType
instance O.OverloadedMethodInfo DOMHTMLInputElementSetInputTypeMethodInfo a where
overloadedMethodInfo = P.Just (O.ResolvedSymbolInfo {
O.resolvedSymbolName = "GI.WebKit2WebExtension.Objects.DOMHTMLInputElement.dOMHTMLInputElementSetInputType",
O.resolvedSymbolURL = "https://hackage.haskell.org/package/gi-webkit2webextension-4.0.28/docs/GI-WebKit2WebExtension-Objects-DOMHTMLInputElement.html#v:dOMHTMLInputElementSetInputType"
})
#endif
foreign import ccall "webkit_dom_html_input_element_set_max_length" webkit_dom_html_input_element_set_max_length ::
Ptr DOMHTMLInputElement ->
CLong ->
Ptr (Ptr GError) ->
IO ()
{-# DEPRECATED dOMHTMLInputElementSetMaxLength ["(Since version 2.22)","Use JavaScriptCore API instead"] #-}
dOMHTMLInputElementSetMaxLength ::
(B.CallStack.HasCallStack, MonadIO m, IsDOMHTMLInputElement a) =>
a
-> CLong
-> m ()
dOMHTMLInputElementSetMaxLength :: forall (m :: * -> *) a.
(HasCallStack, MonadIO m, IsDOMHTMLInputElement a) =>
a -> CLong -> m ()
dOMHTMLInputElementSetMaxLength a
self CLong
value = IO () -> m ()
forall a. IO a -> m a
forall (m :: * -> *) a. MonadIO m => IO a -> m a
liftIO (IO () -> m ()) -> IO () -> m ()
forall a b. (a -> b) -> a -> b
$ do
Ptr DOMHTMLInputElement
self' <- a -> IO (Ptr DOMHTMLInputElement)
forall a b. (HasCallStack, ManagedPtrNewtype a) => a -> IO (Ptr b)
unsafeManagedPtrCastPtr a
self
IO () -> IO () -> IO ()
forall a b. IO a -> IO b -> IO a
onException (do
(Ptr (Ptr GError) -> IO ()) -> IO ()
forall a. (Ptr (Ptr GError) -> IO a) -> IO a
propagateGError ((Ptr (Ptr GError) -> IO ()) -> IO ())
-> (Ptr (Ptr GError) -> IO ()) -> IO ()
forall a b. (a -> b) -> a -> b
$ Ptr DOMHTMLInputElement -> CLong -> Ptr (Ptr GError) -> IO ()
webkit_dom_html_input_element_set_max_length Ptr DOMHTMLInputElement
self' CLong
value
a -> IO ()
forall a. ManagedPtrNewtype a => a -> IO ()
touchManagedPtr a
self
() -> IO ()
forall a. a -> IO a
forall (m :: * -> *) a. Monad m => a -> m a
return ()
) (do
() -> IO ()
forall a. a -> IO a
forall (m :: * -> *) a. Monad m => a -> m a
return ()
)
#if defined(ENABLE_OVERLOADING)
data DOMHTMLInputElementSetMaxLengthMethodInfo
instance (signature ~ (CLong -> m ()), MonadIO m, IsDOMHTMLInputElement a) => O.OverloadedMethod DOMHTMLInputElementSetMaxLengthMethodInfo a signature where
overloadedMethod = dOMHTMLInputElementSetMaxLength
instance O.OverloadedMethodInfo DOMHTMLInputElementSetMaxLengthMethodInfo a where
overloadedMethodInfo = P.Just (O.ResolvedSymbolInfo {
O.resolvedSymbolName = "GI.WebKit2WebExtension.Objects.DOMHTMLInputElement.dOMHTMLInputElementSetMaxLength",
O.resolvedSymbolURL = "https://hackage.haskell.org/package/gi-webkit2webextension-4.0.28/docs/GI-WebKit2WebExtension-Objects-DOMHTMLInputElement.html#v:dOMHTMLInputElementSetMaxLength"
})
#endif
foreign import ccall "webkit_dom_html_input_element_set_multiple" webkit_dom_html_input_element_set_multiple ::
Ptr DOMHTMLInputElement ->
CInt ->
IO ()
{-# DEPRECATED dOMHTMLInputElementSetMultiple ["(Since version 2.22)","Use JavaScriptCore API instead"] #-}
dOMHTMLInputElementSetMultiple ::
(B.CallStack.HasCallStack, MonadIO m, IsDOMHTMLInputElement a) =>
a
-> Bool
-> m ()
dOMHTMLInputElementSetMultiple :: forall (m :: * -> *) a.
(HasCallStack, MonadIO m, IsDOMHTMLInputElement a) =>
a -> Bool -> m ()
dOMHTMLInputElementSetMultiple a
self Bool
value = IO () -> m ()
forall a. IO a -> m a
forall (m :: * -> *) a. MonadIO m => IO a -> m a
liftIO (IO () -> m ()) -> IO () -> m ()
forall a b. (a -> b) -> a -> b
$ do
Ptr DOMHTMLInputElement
self' <- a -> IO (Ptr DOMHTMLInputElement)
forall a b. (HasCallStack, ManagedPtrNewtype a) => a -> IO (Ptr b)
unsafeManagedPtrCastPtr a
self
let value' :: CInt
value' = (Int -> CInt
forall a b. (Integral a, Num b) => a -> b
fromIntegral (Int -> CInt) -> (Bool -> Int) -> Bool -> CInt
forall b c a. (b -> c) -> (a -> b) -> a -> c
. Bool -> Int
forall a. Enum a => a -> Int
fromEnum) Bool
value
Ptr DOMHTMLInputElement -> CInt -> IO ()
webkit_dom_html_input_element_set_multiple Ptr DOMHTMLInputElement
self' CInt
value'
a -> IO ()
forall a. ManagedPtrNewtype a => a -> IO ()
touchManagedPtr a
self
() -> IO ()
forall a. a -> IO a
forall (m :: * -> *) a. Monad m => a -> m a
return ()
#if defined(ENABLE_OVERLOADING)
data DOMHTMLInputElementSetMultipleMethodInfo
instance (signature ~ (Bool -> m ()), MonadIO m, IsDOMHTMLInputElement a) => O.OverloadedMethod DOMHTMLInputElementSetMultipleMethodInfo a signature where
overloadedMethod = dOMHTMLInputElementSetMultiple
instance O.OverloadedMethodInfo DOMHTMLInputElementSetMultipleMethodInfo a where
overloadedMethodInfo = P.Just (O.ResolvedSymbolInfo {
O.resolvedSymbolName = "GI.WebKit2WebExtension.Objects.DOMHTMLInputElement.dOMHTMLInputElementSetMultiple",
O.resolvedSymbolURL = "https://hackage.haskell.org/package/gi-webkit2webextension-4.0.28/docs/GI-WebKit2WebExtension-Objects-DOMHTMLInputElement.html#v:dOMHTMLInputElementSetMultiple"
})
#endif
foreign import ccall "webkit_dom_html_input_element_set_name" webkit_dom_html_input_element_set_name ::
Ptr DOMHTMLInputElement ->
CString ->
IO ()
{-# DEPRECATED dOMHTMLInputElementSetName ["(Since version 2.22)","Use JavaScriptCore API instead"] #-}
dOMHTMLInputElementSetName ::
(B.CallStack.HasCallStack, MonadIO m, IsDOMHTMLInputElement a) =>
a
-> T.Text
-> m ()
dOMHTMLInputElementSetName :: forall (m :: * -> *) a.
(HasCallStack, MonadIO m, IsDOMHTMLInputElement a) =>
a -> Text -> m ()
dOMHTMLInputElementSetName a
self Text
value = IO () -> m ()
forall a. IO a -> m a
forall (m :: * -> *) a. MonadIO m => IO a -> m a
liftIO (IO () -> m ()) -> IO () -> m ()
forall a b. (a -> b) -> a -> b
$ do
Ptr DOMHTMLInputElement
self' <- a -> IO (Ptr DOMHTMLInputElement)
forall a b. (HasCallStack, ManagedPtrNewtype a) => a -> IO (Ptr b)
unsafeManagedPtrCastPtr a
self
CString
value' <- Text -> IO CString
textToCString Text
value
Ptr DOMHTMLInputElement -> CString -> IO ()
webkit_dom_html_input_element_set_name Ptr DOMHTMLInputElement
self' CString
value'
a -> IO ()
forall a. ManagedPtrNewtype a => a -> IO ()
touchManagedPtr a
self
CString -> IO ()
forall a. Ptr a -> IO ()
freeMem CString
value'
() -> IO ()
forall a. a -> IO a
forall (m :: * -> *) a. Monad m => a -> m a
return ()
#if defined(ENABLE_OVERLOADING)
data DOMHTMLInputElementSetNameMethodInfo
instance (signature ~ (T.Text -> m ()), MonadIO m, IsDOMHTMLInputElement a) => O.OverloadedMethod DOMHTMLInputElementSetNameMethodInfo a signature where
overloadedMethod = dOMHTMLInputElementSetName
instance O.OverloadedMethodInfo DOMHTMLInputElementSetNameMethodInfo a where
overloadedMethodInfo = P.Just (O.ResolvedSymbolInfo {
O.resolvedSymbolName = "GI.WebKit2WebExtension.Objects.DOMHTMLInputElement.dOMHTMLInputElementSetName",
O.resolvedSymbolURL = "https://hackage.haskell.org/package/gi-webkit2webextension-4.0.28/docs/GI-WebKit2WebExtension-Objects-DOMHTMLInputElement.html#v:dOMHTMLInputElementSetName"
})
#endif
foreign import ccall "webkit_dom_html_input_element_set_read_only" webkit_dom_html_input_element_set_read_only ::
Ptr DOMHTMLInputElement ->
CInt ->
IO ()
{-# DEPRECATED dOMHTMLInputElementSetReadOnly ["(Since version 2.22)","Use JavaScriptCore API instead"] #-}
dOMHTMLInputElementSetReadOnly ::
(B.CallStack.HasCallStack, MonadIO m, IsDOMHTMLInputElement a) =>
a
-> Bool
-> m ()
dOMHTMLInputElementSetReadOnly :: forall (m :: * -> *) a.
(HasCallStack, MonadIO m, IsDOMHTMLInputElement a) =>
a -> Bool -> m ()
dOMHTMLInputElementSetReadOnly a
self Bool
value = IO () -> m ()
forall a. IO a -> m a
forall (m :: * -> *) a. MonadIO m => IO a -> m a
liftIO (IO () -> m ()) -> IO () -> m ()
forall a b. (a -> b) -> a -> b
$ do
Ptr DOMHTMLInputElement
self' <- a -> IO (Ptr DOMHTMLInputElement)
forall a b. (HasCallStack, ManagedPtrNewtype a) => a -> IO (Ptr b)
unsafeManagedPtrCastPtr a
self
let value' :: CInt
value' = (Int -> CInt
forall a b. (Integral a, Num b) => a -> b
fromIntegral (Int -> CInt) -> (Bool -> Int) -> Bool -> CInt
forall b c a. (b -> c) -> (a -> b) -> a -> c
. Bool -> Int
forall a. Enum a => a -> Int
fromEnum) Bool
value
Ptr DOMHTMLInputElement -> CInt -> IO ()
webkit_dom_html_input_element_set_read_only Ptr DOMHTMLInputElement
self' CInt
value'
a -> IO ()
forall a. ManagedPtrNewtype a => a -> IO ()
touchManagedPtr a
self
() -> IO ()
forall a. a -> IO a
forall (m :: * -> *) a. Monad m => a -> m a
return ()
#if defined(ENABLE_OVERLOADING)
data DOMHTMLInputElementSetReadOnlyMethodInfo
instance (signature ~ (Bool -> m ()), MonadIO m, IsDOMHTMLInputElement a) => O.OverloadedMethod DOMHTMLInputElementSetReadOnlyMethodInfo a signature where
overloadedMethod = dOMHTMLInputElementSetReadOnly
instance O.OverloadedMethodInfo DOMHTMLInputElementSetReadOnlyMethodInfo a where
overloadedMethodInfo = P.Just (O.ResolvedSymbolInfo {
O.resolvedSymbolName = "GI.WebKit2WebExtension.Objects.DOMHTMLInputElement.dOMHTMLInputElementSetReadOnly",
O.resolvedSymbolURL = "https://hackage.haskell.org/package/gi-webkit2webextension-4.0.28/docs/GI-WebKit2WebExtension-Objects-DOMHTMLInputElement.html#v:dOMHTMLInputElementSetReadOnly"
})
#endif
foreign import ccall "webkit_dom_html_input_element_set_size" webkit_dom_html_input_element_set_size ::
Ptr DOMHTMLInputElement ->
CULong ->
Ptr (Ptr GError) ->
IO ()
{-# DEPRECATED dOMHTMLInputElementSetSize ["(Since version 2.22)","Use JavaScriptCore API instead"] #-}
dOMHTMLInputElementSetSize ::
(B.CallStack.HasCallStack, MonadIO m, IsDOMHTMLInputElement a) =>
a
-> CULong
-> m ()
dOMHTMLInputElementSetSize :: forall (m :: * -> *) a.
(HasCallStack, MonadIO m, IsDOMHTMLInputElement a) =>
a -> CULong -> m ()
dOMHTMLInputElementSetSize a
self CULong
value = IO () -> m ()
forall a. IO a -> m a
forall (m :: * -> *) a. MonadIO m => IO a -> m a
liftIO (IO () -> m ()) -> IO () -> m ()
forall a b. (a -> b) -> a -> b
$ do
Ptr DOMHTMLInputElement
self' <- a -> IO (Ptr DOMHTMLInputElement)
forall a b. (HasCallStack, ManagedPtrNewtype a) => a -> IO (Ptr b)
unsafeManagedPtrCastPtr a
self
IO () -> IO () -> IO ()
forall a b. IO a -> IO b -> IO a
onException (do
(Ptr (Ptr GError) -> IO ()) -> IO ()
forall a. (Ptr (Ptr GError) -> IO a) -> IO a
propagateGError ((Ptr (Ptr GError) -> IO ()) -> IO ())
-> (Ptr (Ptr GError) -> IO ()) -> IO ()
forall a b. (a -> b) -> a -> b
$ Ptr DOMHTMLInputElement -> CULong -> Ptr (Ptr GError) -> IO ()
webkit_dom_html_input_element_set_size Ptr DOMHTMLInputElement
self' CULong
value
a -> IO ()
forall a. ManagedPtrNewtype a => a -> IO ()
touchManagedPtr a
self
() -> IO ()
forall a. a -> IO a
forall (m :: * -> *) a. Monad m => a -> m a
return ()
) (do
() -> IO ()
forall a. a -> IO a
forall (m :: * -> *) a. Monad m => a -> m a
return ()
)
#if defined(ENABLE_OVERLOADING)
data DOMHTMLInputElementSetSizeMethodInfo
instance (signature ~ (CULong -> m ()), MonadIO m, IsDOMHTMLInputElement a) => O.OverloadedMethod DOMHTMLInputElementSetSizeMethodInfo a signature where
overloadedMethod = dOMHTMLInputElementSetSize
instance O.OverloadedMethodInfo DOMHTMLInputElementSetSizeMethodInfo a where
overloadedMethodInfo = P.Just (O.ResolvedSymbolInfo {
O.resolvedSymbolName = "GI.WebKit2WebExtension.Objects.DOMHTMLInputElement.dOMHTMLInputElementSetSize",
O.resolvedSymbolURL = "https://hackage.haskell.org/package/gi-webkit2webextension-4.0.28/docs/GI-WebKit2WebExtension-Objects-DOMHTMLInputElement.html#v:dOMHTMLInputElementSetSize"
})
#endif
foreign import ccall "webkit_dom_html_input_element_set_src" webkit_dom_html_input_element_set_src ::
Ptr DOMHTMLInputElement ->
CString ->
IO ()
{-# DEPRECATED dOMHTMLInputElementSetSrc ["(Since version 2.22)","Use JavaScriptCore API instead"] #-}
dOMHTMLInputElementSetSrc ::
(B.CallStack.HasCallStack, MonadIO m, IsDOMHTMLInputElement a) =>
a
-> T.Text
-> m ()
dOMHTMLInputElementSetSrc :: forall (m :: * -> *) a.
(HasCallStack, MonadIO m, IsDOMHTMLInputElement a) =>
a -> Text -> m ()
dOMHTMLInputElementSetSrc a
self Text
value = IO () -> m ()
forall a. IO a -> m a
forall (m :: * -> *) a. MonadIO m => IO a -> m a
liftIO (IO () -> m ()) -> IO () -> m ()
forall a b. (a -> b) -> a -> b
$ do
Ptr DOMHTMLInputElement
self' <- a -> IO (Ptr DOMHTMLInputElement)
forall a b. (HasCallStack, ManagedPtrNewtype a) => a -> IO (Ptr b)
unsafeManagedPtrCastPtr a
self
CString
value' <- Text -> IO CString
textToCString Text
value
Ptr DOMHTMLInputElement -> CString -> IO ()
webkit_dom_html_input_element_set_src Ptr DOMHTMLInputElement
self' CString
value'
a -> IO ()
forall a. ManagedPtrNewtype a => a -> IO ()
touchManagedPtr a
self
CString -> IO ()
forall a. Ptr a -> IO ()
freeMem CString
value'
() -> IO ()
forall a. a -> IO a
forall (m :: * -> *) a. Monad m => a -> m a
return ()
#if defined(ENABLE_OVERLOADING)
data DOMHTMLInputElementSetSrcMethodInfo
instance (signature ~ (T.Text -> m ()), MonadIO m, IsDOMHTMLInputElement a) => O.OverloadedMethod DOMHTMLInputElementSetSrcMethodInfo a signature where
overloadedMethod = dOMHTMLInputElementSetSrc
instance O.OverloadedMethodInfo DOMHTMLInputElementSetSrcMethodInfo a where
overloadedMethodInfo = P.Just (O.ResolvedSymbolInfo {
O.resolvedSymbolName = "GI.WebKit2WebExtension.Objects.DOMHTMLInputElement.dOMHTMLInputElementSetSrc",
O.resolvedSymbolURL = "https://hackage.haskell.org/package/gi-webkit2webextension-4.0.28/docs/GI-WebKit2WebExtension-Objects-DOMHTMLInputElement.html#v:dOMHTMLInputElementSetSrc"
})
#endif
foreign import ccall "webkit_dom_html_input_element_set_use_map" webkit_dom_html_input_element_set_use_map ::
Ptr DOMHTMLInputElement ->
CString ->
IO ()
{-# DEPRECATED dOMHTMLInputElementSetUseMap ["(Since version 2.22)","Use JavaScriptCore API instead"] #-}
dOMHTMLInputElementSetUseMap ::
(B.CallStack.HasCallStack, MonadIO m, IsDOMHTMLInputElement a) =>
a
-> T.Text
-> m ()
dOMHTMLInputElementSetUseMap :: forall (m :: * -> *) a.
(HasCallStack, MonadIO m, IsDOMHTMLInputElement a) =>
a -> Text -> m ()
dOMHTMLInputElementSetUseMap a
self Text
value = IO () -> m ()
forall a. IO a -> m a
forall (m :: * -> *) a. MonadIO m => IO a -> m a
liftIO (IO () -> m ()) -> IO () -> m ()
forall a b. (a -> b) -> a -> b
$ do
Ptr DOMHTMLInputElement
self' <- a -> IO (Ptr DOMHTMLInputElement)
forall a b. (HasCallStack, ManagedPtrNewtype a) => a -> IO (Ptr b)
unsafeManagedPtrCastPtr a
self
CString
value' <- Text -> IO CString
textToCString Text
value
Ptr DOMHTMLInputElement -> CString -> IO ()
webkit_dom_html_input_element_set_use_map Ptr DOMHTMLInputElement
self' CString
value'
a -> IO ()
forall a. ManagedPtrNewtype a => a -> IO ()
touchManagedPtr a
self
CString -> IO ()
forall a. Ptr a -> IO ()
freeMem CString
value'
() -> IO ()
forall a. a -> IO a
forall (m :: * -> *) a. Monad m => a -> m a
return ()
#if defined(ENABLE_OVERLOADING)
data DOMHTMLInputElementSetUseMapMethodInfo
instance (signature ~ (T.Text -> m ()), MonadIO m, IsDOMHTMLInputElement a) => O.OverloadedMethod DOMHTMLInputElementSetUseMapMethodInfo a signature where
overloadedMethod = dOMHTMLInputElementSetUseMap
instance O.OverloadedMethodInfo DOMHTMLInputElementSetUseMapMethodInfo a where
overloadedMethodInfo = P.Just (O.ResolvedSymbolInfo {
O.resolvedSymbolName = "GI.WebKit2WebExtension.Objects.DOMHTMLInputElement.dOMHTMLInputElementSetUseMap",
O.resolvedSymbolURL = "https://hackage.haskell.org/package/gi-webkit2webextension-4.0.28/docs/GI-WebKit2WebExtension-Objects-DOMHTMLInputElement.html#v:dOMHTMLInputElementSetUseMap"
})
#endif
foreign import ccall "webkit_dom_html_input_element_set_value" webkit_dom_html_input_element_set_value ::
Ptr DOMHTMLInputElement ->
CString ->
IO ()
{-# DEPRECATED dOMHTMLInputElementSetValue ["(Since version 2.22)","Use JavaScriptCore API instead"] #-}
dOMHTMLInputElementSetValue ::
(B.CallStack.HasCallStack, MonadIO m, IsDOMHTMLInputElement a) =>
a
-> T.Text
-> m ()
dOMHTMLInputElementSetValue :: forall (m :: * -> *) a.
(HasCallStack, MonadIO m, IsDOMHTMLInputElement a) =>
a -> Text -> m ()
dOMHTMLInputElementSetValue a
self Text
value = IO () -> m ()
forall a. IO a -> m a
forall (m :: * -> *) a. MonadIO m => IO a -> m a
liftIO (IO () -> m ()) -> IO () -> m ()
forall a b. (a -> b) -> a -> b
$ do
Ptr DOMHTMLInputElement
self' <- a -> IO (Ptr DOMHTMLInputElement)
forall a b. (HasCallStack, ManagedPtrNewtype a) => a -> IO (Ptr b)
unsafeManagedPtrCastPtr a
self
CString
value' <- Text -> IO CString
textToCString Text
value
Ptr DOMHTMLInputElement -> CString -> IO ()
webkit_dom_html_input_element_set_value Ptr DOMHTMLInputElement
self' CString
value'
a -> IO ()
forall a. ManagedPtrNewtype a => a -> IO ()
touchManagedPtr a
self
CString -> IO ()
forall a. Ptr a -> IO ()
freeMem CString
value'
() -> IO ()
forall a. a -> IO a
forall (m :: * -> *) a. Monad m => a -> m a
return ()
#if defined(ENABLE_OVERLOADING)
data DOMHTMLInputElementSetValueMethodInfo
instance (signature ~ (T.Text -> m ()), MonadIO m, IsDOMHTMLInputElement a) => O.OverloadedMethod DOMHTMLInputElementSetValueMethodInfo a signature where
overloadedMethod = dOMHTMLInputElementSetValue
instance O.OverloadedMethodInfo DOMHTMLInputElementSetValueMethodInfo a where
overloadedMethodInfo = P.Just (O.ResolvedSymbolInfo {
O.resolvedSymbolName = "GI.WebKit2WebExtension.Objects.DOMHTMLInputElement.dOMHTMLInputElementSetValue",
O.resolvedSymbolURL = "https://hackage.haskell.org/package/gi-webkit2webextension-4.0.28/docs/GI-WebKit2WebExtension-Objects-DOMHTMLInputElement.html#v:dOMHTMLInputElementSetValue"
})
#endif
foreign import ccall "webkit_dom_html_input_element_set_width" webkit_dom_html_input_element_set_width ::
Ptr DOMHTMLInputElement ->
CULong ->
IO ()
{-# DEPRECATED dOMHTMLInputElementSetWidth ["(Since version 2.22)","Use JavaScriptCore API instead"] #-}
dOMHTMLInputElementSetWidth ::
(B.CallStack.HasCallStack, MonadIO m, IsDOMHTMLInputElement a) =>
a
-> CULong
-> m ()
dOMHTMLInputElementSetWidth :: forall (m :: * -> *) a.
(HasCallStack, MonadIO m, IsDOMHTMLInputElement a) =>
a -> CULong -> m ()
dOMHTMLInputElementSetWidth a
self CULong
value = IO () -> m ()
forall a. IO a -> m a
forall (m :: * -> *) a. MonadIO m => IO a -> m a
liftIO (IO () -> m ()) -> IO () -> m ()
forall a b. (a -> b) -> a -> b
$ do
Ptr DOMHTMLInputElement
self' <- a -> IO (Ptr DOMHTMLInputElement)
forall a b. (HasCallStack, ManagedPtrNewtype a) => a -> IO (Ptr b)
unsafeManagedPtrCastPtr a
self
Ptr DOMHTMLInputElement -> CULong -> IO ()
webkit_dom_html_input_element_set_width Ptr DOMHTMLInputElement
self' CULong
value
a -> IO ()
forall a. ManagedPtrNewtype a => a -> IO ()
touchManagedPtr a
self
() -> IO ()
forall a. a -> IO a
forall (m :: * -> *) a. Monad m => a -> m a
return ()
#if defined(ENABLE_OVERLOADING)
data DOMHTMLInputElementSetWidthMethodInfo
instance (signature ~ (CULong -> m ()), MonadIO m, IsDOMHTMLInputElement a) => O.OverloadedMethod DOMHTMLInputElementSetWidthMethodInfo a signature where
overloadedMethod = dOMHTMLInputElementSetWidth
instance O.OverloadedMethodInfo DOMHTMLInputElementSetWidthMethodInfo a where
overloadedMethodInfo = P.Just (O.ResolvedSymbolInfo {
O.resolvedSymbolName = "GI.WebKit2WebExtension.Objects.DOMHTMLInputElement.dOMHTMLInputElementSetWidth",
O.resolvedSymbolURL = "https://hackage.haskell.org/package/gi-webkit2webextension-4.0.28/docs/GI-WebKit2WebExtension-Objects-DOMHTMLInputElement.html#v:dOMHTMLInputElementSetWidth"
})
#endif