module GHCJS.DOM.JSFFI.Generated.ValidityState
(js_getValueMissing, getValueMissing, js_getTypeMismatch,
getTypeMismatch, js_getPatternMismatch, getPatternMismatch,
js_getTooLong, getTooLong, js_getRangeUnderflow, getRangeUnderflow,
js_getRangeOverflow, getRangeOverflow, js_getStepMismatch,
getStepMismatch, js_getBadInput, getBadInput, js_getCustomError,
getCustomError, js_getValid, getValid, ValidityState(..),
gTypeValidityState)
where
import Prelude ((.), (==), (>>=), return, IO, Int, Float, Double, Bool(..), Maybe, maybe, fromIntegral, round, fmap, Show, Read, Eq, Ord)
import qualified Prelude (error)
import Data.Typeable (Typeable)
import GHCJS.Types (JSVal(..), JSString)
import GHCJS.Foreign (jsNull)
import GHCJS.Foreign.Callback (syncCallback, asyncCallback, syncCallback1, asyncCallback1, syncCallback2, asyncCallback2, OnBlocked(..))
import GHCJS.Marshal (ToJSVal(..), FromJSVal(..))
import GHCJS.Marshal.Pure (PToJSVal(..), PFromJSVal(..))
import Control.Monad (void)
import Control.Monad.IO.Class (MonadIO(..))
import Data.Int (Int64)
import Data.Word (Word, Word64)
import Data.Maybe (fromJust)
import GHCJS.DOM.Types
import Control.Applicative ((<$>))
import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName)
import GHCJS.DOM.JSFFI.Generated.Enums
foreign import javascript unsafe "($1[\"valueMissing\"] ? 1 : 0)"
js_getValueMissing :: ValidityState -> IO Bool
getValueMissing :: (MonadIO m) => ValidityState -> m Bool
getValueMissing self = liftIO (js_getValueMissing (self))
foreign import javascript unsafe "($1[\"typeMismatch\"] ? 1 : 0)"
js_getTypeMismatch :: ValidityState -> IO Bool
getTypeMismatch :: (MonadIO m) => ValidityState -> m Bool
getTypeMismatch self = liftIO (js_getTypeMismatch (self))
foreign import javascript unsafe
"($1[\"patternMismatch\"] ? 1 : 0)" js_getPatternMismatch ::
ValidityState -> IO Bool
getPatternMismatch :: (MonadIO m) => ValidityState -> m Bool
getPatternMismatch self = liftIO (js_getPatternMismatch (self))
foreign import javascript unsafe "($1[\"tooLong\"] ? 1 : 0)"
js_getTooLong :: ValidityState -> IO Bool
getTooLong :: (MonadIO m) => ValidityState -> m Bool
getTooLong self = liftIO (js_getTooLong (self))
foreign import javascript unsafe "($1[\"rangeUnderflow\"] ? 1 : 0)"
js_getRangeUnderflow :: ValidityState -> IO Bool
getRangeUnderflow :: (MonadIO m) => ValidityState -> m Bool
getRangeUnderflow self = liftIO (js_getRangeUnderflow (self))
foreign import javascript unsafe "($1[\"rangeOverflow\"] ? 1 : 0)"
js_getRangeOverflow :: ValidityState -> IO Bool
getRangeOverflow :: (MonadIO m) => ValidityState -> m Bool
getRangeOverflow self = liftIO (js_getRangeOverflow (self))
foreign import javascript unsafe "($1[\"stepMismatch\"] ? 1 : 0)"
js_getStepMismatch :: ValidityState -> IO Bool
getStepMismatch :: (MonadIO m) => ValidityState -> m Bool
getStepMismatch self = liftIO (js_getStepMismatch (self))
foreign import javascript unsafe "($1[\"badInput\"] ? 1 : 0)"
js_getBadInput :: ValidityState -> IO Bool
getBadInput :: (MonadIO m) => ValidityState -> m Bool
getBadInput self = liftIO (js_getBadInput (self))
foreign import javascript unsafe "($1[\"customError\"] ? 1 : 0)"
js_getCustomError :: ValidityState -> IO Bool
getCustomError :: (MonadIO m) => ValidityState -> m Bool
getCustomError self = liftIO (js_getCustomError (self))
foreign import javascript unsafe "($1[\"valid\"] ? 1 : 0)"
js_getValid :: ValidityState -> IO Bool
getValid :: (MonadIO m) => ValidityState -> m Bool
getValid self = liftIO (js_getValid (self))