module GI.WebKit.Objects.DOMValidityState
(
DOMValidityState(..) ,
IsDOMValidityState ,
toDOMValidityState ,
noDOMValidityState ,
DOMValidityStateGetBadInputMethodInfo ,
dOMValidityStateGetBadInput ,
DOMValidityStateGetCustomErrorMethodInfo,
dOMValidityStateGetCustomError ,
DOMValidityStateGetPatternMismatchMethodInfo,
dOMValidityStateGetPatternMismatch ,
DOMValidityStateGetRangeOverflowMethodInfo,
dOMValidityStateGetRangeOverflow ,
DOMValidityStateGetRangeUnderflowMethodInfo,
dOMValidityStateGetRangeUnderflow ,
DOMValidityStateGetStepMismatchMethodInfo,
dOMValidityStateGetStepMismatch ,
DOMValidityStateGetTooLongMethodInfo ,
dOMValidityStateGetTooLong ,
DOMValidityStateGetTypeMismatchMethodInfo,
dOMValidityStateGetTypeMismatch ,
DOMValidityStateGetValidMethodInfo ,
dOMValidityStateGetValid ,
DOMValidityStateGetValueMissingMethodInfo,
dOMValidityStateGetValueMissing ,
DOMValidityStateBadInputPropertyInfo ,
dOMValidityStateBadInput ,
getDOMValidityStateBadInput ,
DOMValidityStateCustomErrorPropertyInfo ,
dOMValidityStateCustomError ,
getDOMValidityStateCustomError ,
DOMValidityStatePatternMismatchPropertyInfo,
dOMValidityStatePatternMismatch ,
getDOMValidityStatePatternMismatch ,
DOMValidityStateRangeOverflowPropertyInfo,
dOMValidityStateRangeOverflow ,
getDOMValidityStateRangeOverflow ,
DOMValidityStateRangeUnderflowPropertyInfo,
dOMValidityStateRangeUnderflow ,
getDOMValidityStateRangeUnderflow ,
DOMValidityStateStepMismatchPropertyInfo,
dOMValidityStateStepMismatch ,
getDOMValidityStateStepMismatch ,
DOMValidityStateTooLongPropertyInfo ,
dOMValidityStateTooLong ,
getDOMValidityStateTooLong ,
DOMValidityStateTypeMismatchPropertyInfo,
dOMValidityStateTypeMismatch ,
getDOMValidityStateTypeMismatch ,
DOMValidityStateValidPropertyInfo ,
dOMValidityStateValid ,
getDOMValidityStateValid ,
DOMValidityStateValueMissingPropertyInfo,
dOMValidityStateValueMissing ,
getDOMValidityStateValueMissing ,
) 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.ManagedPtr as B.ManagedPtr
import qualified Data.GI.Base.GError as B.GError
import qualified Data.GI.Base.GVariant as B.GVariant
import qualified Data.GI.Base.GParamSpec as B.GParamSpec
import qualified Data.GI.Base.CallStack as B.CallStack
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 GI.GObject.Objects.Object as GObject.Object
import qualified GI.WebKit.Objects.DOMObject as WebKit.DOMObject
newtype DOMValidityState = DOMValidityState (ManagedPtr DOMValidityState)
foreign import ccall "webkit_dom_validity_state_get_type"
c_webkit_dom_validity_state_get_type :: IO GType
instance GObject DOMValidityState where
gobjectType _ = c_webkit_dom_validity_state_get_type
class GObject o => IsDOMValidityState o
#if MIN_VERSION_base(4,9,0)
instance (GObject a, O.UnknownAncestorError DOMValidityState a) =>
IsDOMValidityState a
#endif
instance IsDOMValidityState DOMValidityState
instance WebKit.DOMObject.IsDOMObject DOMValidityState
instance GObject.Object.IsObject DOMValidityState
toDOMValidityState :: IsDOMValidityState o => o -> IO DOMValidityState
toDOMValidityState = unsafeCastTo DOMValidityState
noDOMValidityState :: Maybe DOMValidityState
noDOMValidityState = Nothing
type family ResolveDOMValidityStateMethod (t :: Symbol) (o :: *) :: * where
ResolveDOMValidityStateMethod "bindProperty" o = GObject.Object.ObjectBindPropertyMethodInfo
ResolveDOMValidityStateMethod "bindPropertyFull" o = GObject.Object.ObjectBindPropertyFullMethodInfo
ResolveDOMValidityStateMethod "forceFloating" o = GObject.Object.ObjectForceFloatingMethodInfo
ResolveDOMValidityStateMethod "freezeNotify" o = GObject.Object.ObjectFreezeNotifyMethodInfo
ResolveDOMValidityStateMethod "isFloating" o = GObject.Object.ObjectIsFloatingMethodInfo
ResolveDOMValidityStateMethod "notify" o = GObject.Object.ObjectNotifyMethodInfo
ResolveDOMValidityStateMethod "notifyByPspec" o = GObject.Object.ObjectNotifyByPspecMethodInfo
ResolveDOMValidityStateMethod "ref" o = GObject.Object.ObjectRefMethodInfo
ResolveDOMValidityStateMethod "refSink" o = GObject.Object.ObjectRefSinkMethodInfo
ResolveDOMValidityStateMethod "replaceData" o = GObject.Object.ObjectReplaceDataMethodInfo
ResolveDOMValidityStateMethod "replaceQdata" o = GObject.Object.ObjectReplaceQdataMethodInfo
ResolveDOMValidityStateMethod "runDispose" o = GObject.Object.ObjectRunDisposeMethodInfo
ResolveDOMValidityStateMethod "stealData" o = GObject.Object.ObjectStealDataMethodInfo
ResolveDOMValidityStateMethod "stealQdata" o = GObject.Object.ObjectStealQdataMethodInfo
ResolveDOMValidityStateMethod "thawNotify" o = GObject.Object.ObjectThawNotifyMethodInfo
ResolveDOMValidityStateMethod "unref" o = GObject.Object.ObjectUnrefMethodInfo
ResolveDOMValidityStateMethod "watchClosure" o = GObject.Object.ObjectWatchClosureMethodInfo
ResolveDOMValidityStateMethod "getBadInput" o = DOMValidityStateGetBadInputMethodInfo
ResolveDOMValidityStateMethod "getCustomError" o = DOMValidityStateGetCustomErrorMethodInfo
ResolveDOMValidityStateMethod "getData" o = GObject.Object.ObjectGetDataMethodInfo
ResolveDOMValidityStateMethod "getPatternMismatch" o = DOMValidityStateGetPatternMismatchMethodInfo
ResolveDOMValidityStateMethod "getProperty" o = GObject.Object.ObjectGetPropertyMethodInfo
ResolveDOMValidityStateMethod "getQdata" o = GObject.Object.ObjectGetQdataMethodInfo
ResolveDOMValidityStateMethod "getRangeOverflow" o = DOMValidityStateGetRangeOverflowMethodInfo
ResolveDOMValidityStateMethod "getRangeUnderflow" o = DOMValidityStateGetRangeUnderflowMethodInfo
ResolveDOMValidityStateMethod "getStepMismatch" o = DOMValidityStateGetStepMismatchMethodInfo
ResolveDOMValidityStateMethod "getTooLong" o = DOMValidityStateGetTooLongMethodInfo
ResolveDOMValidityStateMethod "getTypeMismatch" o = DOMValidityStateGetTypeMismatchMethodInfo
ResolveDOMValidityStateMethod "getValid" o = DOMValidityStateGetValidMethodInfo
ResolveDOMValidityStateMethod "getValueMissing" o = DOMValidityStateGetValueMissingMethodInfo
ResolveDOMValidityStateMethod "setData" o = GObject.Object.ObjectSetDataMethodInfo
ResolveDOMValidityStateMethod "setProperty" o = GObject.Object.ObjectSetPropertyMethodInfo
ResolveDOMValidityStateMethod l o = O.MethodResolutionFailed l o
instance (info ~ ResolveDOMValidityStateMethod t DOMValidityState, O.MethodInfo info DOMValidityState p) => O.IsLabelProxy t (DOMValidityState -> p) where
fromLabelProxy _ = O.overloadedMethod (O.MethodProxy :: O.MethodProxy info)
#if MIN_VERSION_base(4,9,0)
instance (info ~ ResolveDOMValidityStateMethod t DOMValidityState, O.MethodInfo info DOMValidityState p) => O.IsLabel t (DOMValidityState -> p) where
fromLabel _ = O.overloadedMethod (O.MethodProxy :: O.MethodProxy info)
#endif
getDOMValidityStateBadInput :: (MonadIO m, IsDOMValidityState o) => o -> m Bool
getDOMValidityStateBadInput obj = liftIO $ getObjectPropertyBool obj "bad-input"
data DOMValidityStateBadInputPropertyInfo
instance AttrInfo DOMValidityStateBadInputPropertyInfo where
type AttrAllowedOps DOMValidityStateBadInputPropertyInfo = '[ 'AttrGet]
type AttrSetTypeConstraint DOMValidityStateBadInputPropertyInfo = (~) ()
type AttrBaseTypeConstraint DOMValidityStateBadInputPropertyInfo = IsDOMValidityState
type AttrGetType DOMValidityStateBadInputPropertyInfo = Bool
type AttrLabel DOMValidityStateBadInputPropertyInfo = "bad-input"
type AttrOrigin DOMValidityStateBadInputPropertyInfo = DOMValidityState
attrGet _ = getDOMValidityStateBadInput
attrSet _ = undefined
attrConstruct _ = undefined
attrClear _ = undefined
getDOMValidityStateCustomError :: (MonadIO m, IsDOMValidityState o) => o -> m Bool
getDOMValidityStateCustomError obj = liftIO $ getObjectPropertyBool obj "custom-error"
data DOMValidityStateCustomErrorPropertyInfo
instance AttrInfo DOMValidityStateCustomErrorPropertyInfo where
type AttrAllowedOps DOMValidityStateCustomErrorPropertyInfo = '[ 'AttrGet]
type AttrSetTypeConstraint DOMValidityStateCustomErrorPropertyInfo = (~) ()
type AttrBaseTypeConstraint DOMValidityStateCustomErrorPropertyInfo = IsDOMValidityState
type AttrGetType DOMValidityStateCustomErrorPropertyInfo = Bool
type AttrLabel DOMValidityStateCustomErrorPropertyInfo = "custom-error"
type AttrOrigin DOMValidityStateCustomErrorPropertyInfo = DOMValidityState
attrGet _ = getDOMValidityStateCustomError
attrSet _ = undefined
attrConstruct _ = undefined
attrClear _ = undefined
getDOMValidityStatePatternMismatch :: (MonadIO m, IsDOMValidityState o) => o -> m Bool
getDOMValidityStatePatternMismatch obj = liftIO $ getObjectPropertyBool obj "pattern-mismatch"
data DOMValidityStatePatternMismatchPropertyInfo
instance AttrInfo DOMValidityStatePatternMismatchPropertyInfo where
type AttrAllowedOps DOMValidityStatePatternMismatchPropertyInfo = '[ 'AttrGet]
type AttrSetTypeConstraint DOMValidityStatePatternMismatchPropertyInfo = (~) ()
type AttrBaseTypeConstraint DOMValidityStatePatternMismatchPropertyInfo = IsDOMValidityState
type AttrGetType DOMValidityStatePatternMismatchPropertyInfo = Bool
type AttrLabel DOMValidityStatePatternMismatchPropertyInfo = "pattern-mismatch"
type AttrOrigin DOMValidityStatePatternMismatchPropertyInfo = DOMValidityState
attrGet _ = getDOMValidityStatePatternMismatch
attrSet _ = undefined
attrConstruct _ = undefined
attrClear _ = undefined
getDOMValidityStateRangeOverflow :: (MonadIO m, IsDOMValidityState o) => o -> m Bool
getDOMValidityStateRangeOverflow obj = liftIO $ getObjectPropertyBool obj "range-overflow"
data DOMValidityStateRangeOverflowPropertyInfo
instance AttrInfo DOMValidityStateRangeOverflowPropertyInfo where
type AttrAllowedOps DOMValidityStateRangeOverflowPropertyInfo = '[ 'AttrGet]
type AttrSetTypeConstraint DOMValidityStateRangeOverflowPropertyInfo = (~) ()
type AttrBaseTypeConstraint DOMValidityStateRangeOverflowPropertyInfo = IsDOMValidityState
type AttrGetType DOMValidityStateRangeOverflowPropertyInfo = Bool
type AttrLabel DOMValidityStateRangeOverflowPropertyInfo = "range-overflow"
type AttrOrigin DOMValidityStateRangeOverflowPropertyInfo = DOMValidityState
attrGet _ = getDOMValidityStateRangeOverflow
attrSet _ = undefined
attrConstruct _ = undefined
attrClear _ = undefined
getDOMValidityStateRangeUnderflow :: (MonadIO m, IsDOMValidityState o) => o -> m Bool
getDOMValidityStateRangeUnderflow obj = liftIO $ getObjectPropertyBool obj "range-underflow"
data DOMValidityStateRangeUnderflowPropertyInfo
instance AttrInfo DOMValidityStateRangeUnderflowPropertyInfo where
type AttrAllowedOps DOMValidityStateRangeUnderflowPropertyInfo = '[ 'AttrGet]
type AttrSetTypeConstraint DOMValidityStateRangeUnderflowPropertyInfo = (~) ()
type AttrBaseTypeConstraint DOMValidityStateRangeUnderflowPropertyInfo = IsDOMValidityState
type AttrGetType DOMValidityStateRangeUnderflowPropertyInfo = Bool
type AttrLabel DOMValidityStateRangeUnderflowPropertyInfo = "range-underflow"
type AttrOrigin DOMValidityStateRangeUnderflowPropertyInfo = DOMValidityState
attrGet _ = getDOMValidityStateRangeUnderflow
attrSet _ = undefined
attrConstruct _ = undefined
attrClear _ = undefined
getDOMValidityStateStepMismatch :: (MonadIO m, IsDOMValidityState o) => o -> m Bool
getDOMValidityStateStepMismatch obj = liftIO $ getObjectPropertyBool obj "step-mismatch"
data DOMValidityStateStepMismatchPropertyInfo
instance AttrInfo DOMValidityStateStepMismatchPropertyInfo where
type AttrAllowedOps DOMValidityStateStepMismatchPropertyInfo = '[ 'AttrGet]
type AttrSetTypeConstraint DOMValidityStateStepMismatchPropertyInfo = (~) ()
type AttrBaseTypeConstraint DOMValidityStateStepMismatchPropertyInfo = IsDOMValidityState
type AttrGetType DOMValidityStateStepMismatchPropertyInfo = Bool
type AttrLabel DOMValidityStateStepMismatchPropertyInfo = "step-mismatch"
type AttrOrigin DOMValidityStateStepMismatchPropertyInfo = DOMValidityState
attrGet _ = getDOMValidityStateStepMismatch
attrSet _ = undefined
attrConstruct _ = undefined
attrClear _ = undefined
getDOMValidityStateTooLong :: (MonadIO m, IsDOMValidityState o) => o -> m Bool
getDOMValidityStateTooLong obj = liftIO $ getObjectPropertyBool obj "too-long"
data DOMValidityStateTooLongPropertyInfo
instance AttrInfo DOMValidityStateTooLongPropertyInfo where
type AttrAllowedOps DOMValidityStateTooLongPropertyInfo = '[ 'AttrGet]
type AttrSetTypeConstraint DOMValidityStateTooLongPropertyInfo = (~) ()
type AttrBaseTypeConstraint DOMValidityStateTooLongPropertyInfo = IsDOMValidityState
type AttrGetType DOMValidityStateTooLongPropertyInfo = Bool
type AttrLabel DOMValidityStateTooLongPropertyInfo = "too-long"
type AttrOrigin DOMValidityStateTooLongPropertyInfo = DOMValidityState
attrGet _ = getDOMValidityStateTooLong
attrSet _ = undefined
attrConstruct _ = undefined
attrClear _ = undefined
getDOMValidityStateTypeMismatch :: (MonadIO m, IsDOMValidityState o) => o -> m Bool
getDOMValidityStateTypeMismatch obj = liftIO $ getObjectPropertyBool obj "type-mismatch"
data DOMValidityStateTypeMismatchPropertyInfo
instance AttrInfo DOMValidityStateTypeMismatchPropertyInfo where
type AttrAllowedOps DOMValidityStateTypeMismatchPropertyInfo = '[ 'AttrGet]
type AttrSetTypeConstraint DOMValidityStateTypeMismatchPropertyInfo = (~) ()
type AttrBaseTypeConstraint DOMValidityStateTypeMismatchPropertyInfo = IsDOMValidityState
type AttrGetType DOMValidityStateTypeMismatchPropertyInfo = Bool
type AttrLabel DOMValidityStateTypeMismatchPropertyInfo = "type-mismatch"
type AttrOrigin DOMValidityStateTypeMismatchPropertyInfo = DOMValidityState
attrGet _ = getDOMValidityStateTypeMismatch
attrSet _ = undefined
attrConstruct _ = undefined
attrClear _ = undefined
getDOMValidityStateValid :: (MonadIO m, IsDOMValidityState o) => o -> m Bool
getDOMValidityStateValid obj = liftIO $ getObjectPropertyBool obj "valid"
data DOMValidityStateValidPropertyInfo
instance AttrInfo DOMValidityStateValidPropertyInfo where
type AttrAllowedOps DOMValidityStateValidPropertyInfo = '[ 'AttrGet]
type AttrSetTypeConstraint DOMValidityStateValidPropertyInfo = (~) ()
type AttrBaseTypeConstraint DOMValidityStateValidPropertyInfo = IsDOMValidityState
type AttrGetType DOMValidityStateValidPropertyInfo = Bool
type AttrLabel DOMValidityStateValidPropertyInfo = "valid"
type AttrOrigin DOMValidityStateValidPropertyInfo = DOMValidityState
attrGet _ = getDOMValidityStateValid
attrSet _ = undefined
attrConstruct _ = undefined
attrClear _ = undefined
getDOMValidityStateValueMissing :: (MonadIO m, IsDOMValidityState o) => o -> m Bool
getDOMValidityStateValueMissing obj = liftIO $ getObjectPropertyBool obj "value-missing"
data DOMValidityStateValueMissingPropertyInfo
instance AttrInfo DOMValidityStateValueMissingPropertyInfo where
type AttrAllowedOps DOMValidityStateValueMissingPropertyInfo = '[ 'AttrGet]
type AttrSetTypeConstraint DOMValidityStateValueMissingPropertyInfo = (~) ()
type AttrBaseTypeConstraint DOMValidityStateValueMissingPropertyInfo = IsDOMValidityState
type AttrGetType DOMValidityStateValueMissingPropertyInfo = Bool
type AttrLabel DOMValidityStateValueMissingPropertyInfo = "value-missing"
type AttrOrigin DOMValidityStateValueMissingPropertyInfo = DOMValidityState
attrGet _ = getDOMValidityStateValueMissing
attrSet _ = undefined
attrConstruct _ = undefined
attrClear _ = undefined
instance O.HasAttributeList DOMValidityState
type instance O.AttributeList DOMValidityState = DOMValidityStateAttributeList
type DOMValidityStateAttributeList = ('[ '("badInput", DOMValidityStateBadInputPropertyInfo), '("coreObject", WebKit.DOMObject.DOMObjectCoreObjectPropertyInfo), '("customError", DOMValidityStateCustomErrorPropertyInfo), '("patternMismatch", DOMValidityStatePatternMismatchPropertyInfo), '("rangeOverflow", DOMValidityStateRangeOverflowPropertyInfo), '("rangeUnderflow", DOMValidityStateRangeUnderflowPropertyInfo), '("stepMismatch", DOMValidityStateStepMismatchPropertyInfo), '("tooLong", DOMValidityStateTooLongPropertyInfo), '("typeMismatch", DOMValidityStateTypeMismatchPropertyInfo), '("valid", DOMValidityStateValidPropertyInfo), '("valueMissing", DOMValidityStateValueMissingPropertyInfo)] :: [(Symbol, *)])
dOMValidityStateBadInput :: AttrLabelProxy "badInput"
dOMValidityStateBadInput = AttrLabelProxy
dOMValidityStateCustomError :: AttrLabelProxy "customError"
dOMValidityStateCustomError = AttrLabelProxy
dOMValidityStatePatternMismatch :: AttrLabelProxy "patternMismatch"
dOMValidityStatePatternMismatch = AttrLabelProxy
dOMValidityStateRangeOverflow :: AttrLabelProxy "rangeOverflow"
dOMValidityStateRangeOverflow = AttrLabelProxy
dOMValidityStateRangeUnderflow :: AttrLabelProxy "rangeUnderflow"
dOMValidityStateRangeUnderflow = AttrLabelProxy
dOMValidityStateStepMismatch :: AttrLabelProxy "stepMismatch"
dOMValidityStateStepMismatch = AttrLabelProxy
dOMValidityStateTooLong :: AttrLabelProxy "tooLong"
dOMValidityStateTooLong = AttrLabelProxy
dOMValidityStateTypeMismatch :: AttrLabelProxy "typeMismatch"
dOMValidityStateTypeMismatch = AttrLabelProxy
dOMValidityStateValid :: AttrLabelProxy "valid"
dOMValidityStateValid = AttrLabelProxy
dOMValidityStateValueMissing :: AttrLabelProxy "valueMissing"
dOMValidityStateValueMissing = AttrLabelProxy
type instance O.SignalList DOMValidityState = DOMValidityStateSignalList
type DOMValidityStateSignalList = ('[ '("notify", GObject.Object.ObjectNotifySignalInfo)] :: [(Symbol, *)])
foreign import ccall "webkit_dom_validity_state_get_bad_input" webkit_dom_validity_state_get_bad_input ::
Ptr DOMValidityState ->
IO CInt
dOMValidityStateGetBadInput ::
(B.CallStack.HasCallStack, MonadIO m, IsDOMValidityState a) =>
a
-> m Bool
dOMValidityStateGetBadInput self = liftIO $ do
self' <- unsafeManagedPtrCastPtr self
result <- webkit_dom_validity_state_get_bad_input self'
let result' = (/= 0) result
touchManagedPtr self
return result'
data DOMValidityStateGetBadInputMethodInfo
instance (signature ~ (m Bool), MonadIO m, IsDOMValidityState a) => O.MethodInfo DOMValidityStateGetBadInputMethodInfo a signature where
overloadedMethod _ = dOMValidityStateGetBadInput
foreign import ccall "webkit_dom_validity_state_get_custom_error" webkit_dom_validity_state_get_custom_error ::
Ptr DOMValidityState ->
IO CInt
dOMValidityStateGetCustomError ::
(B.CallStack.HasCallStack, MonadIO m, IsDOMValidityState a) =>
a
-> m Bool
dOMValidityStateGetCustomError self = liftIO $ do
self' <- unsafeManagedPtrCastPtr self
result <- webkit_dom_validity_state_get_custom_error self'
let result' = (/= 0) result
touchManagedPtr self
return result'
data DOMValidityStateGetCustomErrorMethodInfo
instance (signature ~ (m Bool), MonadIO m, IsDOMValidityState a) => O.MethodInfo DOMValidityStateGetCustomErrorMethodInfo a signature where
overloadedMethod _ = dOMValidityStateGetCustomError
foreign import ccall "webkit_dom_validity_state_get_pattern_mismatch" webkit_dom_validity_state_get_pattern_mismatch ::
Ptr DOMValidityState ->
IO CInt
dOMValidityStateGetPatternMismatch ::
(B.CallStack.HasCallStack, MonadIO m, IsDOMValidityState a) =>
a
-> m Bool
dOMValidityStateGetPatternMismatch self = liftIO $ do
self' <- unsafeManagedPtrCastPtr self
result <- webkit_dom_validity_state_get_pattern_mismatch self'
let result' = (/= 0) result
touchManagedPtr self
return result'
data DOMValidityStateGetPatternMismatchMethodInfo
instance (signature ~ (m Bool), MonadIO m, IsDOMValidityState a) => O.MethodInfo DOMValidityStateGetPatternMismatchMethodInfo a signature where
overloadedMethod _ = dOMValidityStateGetPatternMismatch
foreign import ccall "webkit_dom_validity_state_get_range_overflow" webkit_dom_validity_state_get_range_overflow ::
Ptr DOMValidityState ->
IO CInt
dOMValidityStateGetRangeOverflow ::
(B.CallStack.HasCallStack, MonadIO m, IsDOMValidityState a) =>
a
-> m Bool
dOMValidityStateGetRangeOverflow self = liftIO $ do
self' <- unsafeManagedPtrCastPtr self
result <- webkit_dom_validity_state_get_range_overflow self'
let result' = (/= 0) result
touchManagedPtr self
return result'
data DOMValidityStateGetRangeOverflowMethodInfo
instance (signature ~ (m Bool), MonadIO m, IsDOMValidityState a) => O.MethodInfo DOMValidityStateGetRangeOverflowMethodInfo a signature where
overloadedMethod _ = dOMValidityStateGetRangeOverflow
foreign import ccall "webkit_dom_validity_state_get_range_underflow" webkit_dom_validity_state_get_range_underflow ::
Ptr DOMValidityState ->
IO CInt
dOMValidityStateGetRangeUnderflow ::
(B.CallStack.HasCallStack, MonadIO m, IsDOMValidityState a) =>
a
-> m Bool
dOMValidityStateGetRangeUnderflow self = liftIO $ do
self' <- unsafeManagedPtrCastPtr self
result <- webkit_dom_validity_state_get_range_underflow self'
let result' = (/= 0) result
touchManagedPtr self
return result'
data DOMValidityStateGetRangeUnderflowMethodInfo
instance (signature ~ (m Bool), MonadIO m, IsDOMValidityState a) => O.MethodInfo DOMValidityStateGetRangeUnderflowMethodInfo a signature where
overloadedMethod _ = dOMValidityStateGetRangeUnderflow
foreign import ccall "webkit_dom_validity_state_get_step_mismatch" webkit_dom_validity_state_get_step_mismatch ::
Ptr DOMValidityState ->
IO CInt
dOMValidityStateGetStepMismatch ::
(B.CallStack.HasCallStack, MonadIO m, IsDOMValidityState a) =>
a
-> m Bool
dOMValidityStateGetStepMismatch self = liftIO $ do
self' <- unsafeManagedPtrCastPtr self
result <- webkit_dom_validity_state_get_step_mismatch self'
let result' = (/= 0) result
touchManagedPtr self
return result'
data DOMValidityStateGetStepMismatchMethodInfo
instance (signature ~ (m Bool), MonadIO m, IsDOMValidityState a) => O.MethodInfo DOMValidityStateGetStepMismatchMethodInfo a signature where
overloadedMethod _ = dOMValidityStateGetStepMismatch
foreign import ccall "webkit_dom_validity_state_get_too_long" webkit_dom_validity_state_get_too_long ::
Ptr DOMValidityState ->
IO CInt
dOMValidityStateGetTooLong ::
(B.CallStack.HasCallStack, MonadIO m, IsDOMValidityState a) =>
a
-> m Bool
dOMValidityStateGetTooLong self = liftIO $ do
self' <- unsafeManagedPtrCastPtr self
result <- webkit_dom_validity_state_get_too_long self'
let result' = (/= 0) result
touchManagedPtr self
return result'
data DOMValidityStateGetTooLongMethodInfo
instance (signature ~ (m Bool), MonadIO m, IsDOMValidityState a) => O.MethodInfo DOMValidityStateGetTooLongMethodInfo a signature where
overloadedMethod _ = dOMValidityStateGetTooLong
foreign import ccall "webkit_dom_validity_state_get_type_mismatch" webkit_dom_validity_state_get_type_mismatch ::
Ptr DOMValidityState ->
IO CInt
dOMValidityStateGetTypeMismatch ::
(B.CallStack.HasCallStack, MonadIO m, IsDOMValidityState a) =>
a
-> m Bool
dOMValidityStateGetTypeMismatch self = liftIO $ do
self' <- unsafeManagedPtrCastPtr self
result <- webkit_dom_validity_state_get_type_mismatch self'
let result' = (/= 0) result
touchManagedPtr self
return result'
data DOMValidityStateGetTypeMismatchMethodInfo
instance (signature ~ (m Bool), MonadIO m, IsDOMValidityState a) => O.MethodInfo DOMValidityStateGetTypeMismatchMethodInfo a signature where
overloadedMethod _ = dOMValidityStateGetTypeMismatch
foreign import ccall "webkit_dom_validity_state_get_valid" webkit_dom_validity_state_get_valid ::
Ptr DOMValidityState ->
IO CInt
dOMValidityStateGetValid ::
(B.CallStack.HasCallStack, MonadIO m, IsDOMValidityState a) =>
a
-> m Bool
dOMValidityStateGetValid self = liftIO $ do
self' <- unsafeManagedPtrCastPtr self
result <- webkit_dom_validity_state_get_valid self'
let result' = (/= 0) result
touchManagedPtr self
return result'
data DOMValidityStateGetValidMethodInfo
instance (signature ~ (m Bool), MonadIO m, IsDOMValidityState a) => O.MethodInfo DOMValidityStateGetValidMethodInfo a signature where
overloadedMethod _ = dOMValidityStateGetValid
foreign import ccall "webkit_dom_validity_state_get_value_missing" webkit_dom_validity_state_get_value_missing ::
Ptr DOMValidityState ->
IO CInt
dOMValidityStateGetValueMissing ::
(B.CallStack.HasCallStack, MonadIO m, IsDOMValidityState a) =>
a
-> m Bool
dOMValidityStateGetValueMissing self = liftIO $ do
self' <- unsafeManagedPtrCastPtr self
result <- webkit_dom_validity_state_get_value_missing self'
let result' = (/= 0) result
touchManagedPtr self
return result'
data DOMValidityStateGetValueMissingMethodInfo
instance (signature ~ (m Bool), MonadIO m, IsDOMValidityState a) => O.MethodInfo DOMValidityStateGetValueMissingMethodInfo a signature where
overloadedMethod _ = dOMValidityStateGetValueMissing