IDBKeyRange.hs

{-# LANGUAGE PatternSynonyms #-}
{-# LANGUAGE ImplicitParams, ConstraintKinds, KindSignatures #-}
{-# OPTIONS_GHC -fno-warn-unused-imports #-}
-- | Generated by dom-gen from IndexedDB-3 (webref). Do not edit.
module JSDOM.Generated.IDBKeyRange
       (includes, includes_, bound, bound_, lowerBound, lowerBound_, only, only_, upperBound, upperBound_, getLower, getUpper, getLowerOpen, getUpperOpen, IDBKeyRange(..), gTypeIDBKeyRange)
       where
import Prelude ((.), (==), (>>=), (<$>), (++), Bool(..), Maybe(..), IO, Int, Word, Double, Float)
import qualified Prelude as P
import Control.Monad (void)
import Control.Lens.Operators ((^.))
import Language.Javascript.JSaddle (JSM, JSVal, JSString, toJSVal, valToBool, valToNumber, js, jss, jsf, jsg, new, function, asyncFunction, jsUndefined, jsNull)
import JSDOM.Types
import qualified JSDOM.Types as Types
import JSDOM.EventTargetClosures (EventName, unsafeEventName, unsafeEventNameAsync)
import JSDOM.Generated.Enums

-- | <https://developer.mozilla.org/docs/Web/API/IDBKeyRange/includes MDN IDBKeyRange.includes documentation>
includes :: (MonadDOM m) => IDBKeyRange -> JSVal -> m Bool
includes self key = liftDOM (((self ^. jsf "includes" [toJSVal key]) >>= valToBool))

-- | <https://developer.mozilla.org/docs/Web/API/IDBKeyRange/includes MDN IDBKeyRange.includes documentation>
includes_ :: (MonadDOM m) => IDBKeyRange -> JSVal -> m ()
includes_ self key = liftDOM (void (self ^. jsf "includes" [toJSVal key]))

-- | <https://developer.mozilla.org/docs/Web/API/IDBKeyRange/bound_static MDN IDBKeyRange.bound documentation>
bound :: (MonadDOM m) => JSVal -> JSVal -> Maybe Bool -> Maybe Bool -> m IDBKeyRange
bound lower upper lowerOpen upperOpen = liftDOM ((((jsg "IDBKeyRange") ^. jsf "bound" [toJSVal lower, toJSVal upper, P.maybe (P.return jsUndefined) toJSVal lowerOpen, P.maybe (P.return jsUndefined) toJSVal upperOpen]) >>= fromJSValUnchecked))

-- | <https://developer.mozilla.org/docs/Web/API/IDBKeyRange/bound_static MDN IDBKeyRange.bound documentation>
bound_ :: (MonadDOM m) => JSVal -> JSVal -> Maybe Bool -> Maybe Bool -> m ()
bound_ lower upper lowerOpen upperOpen = liftDOM (void ((jsg "IDBKeyRange") ^. jsf "bound" [toJSVal lower, toJSVal upper, P.maybe (P.return jsUndefined) toJSVal lowerOpen, P.maybe (P.return jsUndefined) toJSVal upperOpen]))

-- | <https://developer.mozilla.org/docs/Web/API/IDBKeyRange/lowerBound_static MDN IDBKeyRange.lowerBound documentation>
lowerBound :: (MonadDOM m) => JSVal -> Maybe Bool -> m IDBKeyRange
lowerBound lower open = liftDOM ((((jsg "IDBKeyRange") ^. jsf "lowerBound" [toJSVal lower, P.maybe (P.return jsUndefined) toJSVal open]) >>= fromJSValUnchecked))

-- | <https://developer.mozilla.org/docs/Web/API/IDBKeyRange/lowerBound_static MDN IDBKeyRange.lowerBound documentation>
lowerBound_ :: (MonadDOM m) => JSVal -> Maybe Bool -> m ()
lowerBound_ lower open = liftDOM (void ((jsg "IDBKeyRange") ^. jsf "lowerBound" [toJSVal lower, P.maybe (P.return jsUndefined) toJSVal open]))

-- | <https://developer.mozilla.org/docs/Web/API/IDBKeyRange/only_static MDN IDBKeyRange.only documentation>
only :: (MonadDOM m) => JSVal -> m IDBKeyRange
only value = liftDOM ((((jsg "IDBKeyRange") ^. jsf "only" [toJSVal value]) >>= fromJSValUnchecked))

-- | <https://developer.mozilla.org/docs/Web/API/IDBKeyRange/only_static MDN IDBKeyRange.only documentation>
only_ :: (MonadDOM m) => JSVal -> m ()
only_ value = liftDOM (void ((jsg "IDBKeyRange") ^. jsf "only" [toJSVal value]))

-- | <https://developer.mozilla.org/docs/Web/API/IDBKeyRange/upperBound_static MDN IDBKeyRange.upperBound documentation>
upperBound :: (MonadDOM m) => JSVal -> Maybe Bool -> m IDBKeyRange
upperBound upper open = liftDOM ((((jsg "IDBKeyRange") ^. jsf "upperBound" [toJSVal upper, P.maybe (P.return jsUndefined) toJSVal open]) >>= fromJSValUnchecked))

-- | <https://developer.mozilla.org/docs/Web/API/IDBKeyRange/upperBound_static MDN IDBKeyRange.upperBound documentation>
upperBound_ :: (MonadDOM m) => JSVal -> Maybe Bool -> m ()
upperBound_ upper open = liftDOM (void ((jsg "IDBKeyRange") ^. jsf "upperBound" [toJSVal upper, P.maybe (P.return jsUndefined) toJSVal open]))

-- | <https://developer.mozilla.org/docs/Web/API/IDBKeyRange/lower MDN IDBKeyRange.lower documentation>
getLower :: (MonadDOM m) => IDBKeyRange -> m JSVal
getLower self = liftDOM (self ^. js "lower")

-- | <https://developer.mozilla.org/docs/Web/API/IDBKeyRange/upper MDN IDBKeyRange.upper documentation>
getUpper :: (MonadDOM m) => IDBKeyRange -> m JSVal
getUpper self = liftDOM (self ^. js "upper")

-- | <https://developer.mozilla.org/docs/Web/API/IDBKeyRange/lowerOpen MDN IDBKeyRange.lowerOpen documentation>
getLowerOpen :: (MonadDOM m) => IDBKeyRange -> m Bool
getLowerOpen self = liftDOM (((self ^. js "lowerOpen") >>= valToBool))

-- | <https://developer.mozilla.org/docs/Web/API/IDBKeyRange/upperOpen MDN IDBKeyRange.upperOpen documentation>
getUpperOpen :: (MonadDOM m) => IDBKeyRange -> m Bool
getUpperOpen self = liftDOM (((self ^. js "upperOpen") >>= valToBool))