module GHCJS.DOM.JSFFI.Generated.CSSKeyframesRule
(js_insertRule, insertRule, js_appendRule, appendRule,
js_deleteRule, deleteRule, js_findRule, findRule, findRule_,
findRuleUnsafe, findRuleUnchecked, js__get, _get, _get_,
_getUnsafe, _getUnchecked, js_setName, setName, js_getName,
getName, getNameUnsafe, getNameUnchecked, js_getCssRules,
getCssRules, getCssRulesUnsafe, getCssRulesUnchecked,
CSSKeyframesRule(..), gTypeCSSKeyframesRule)
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[\"insertRule\"]($2)"
js_insertRule :: CSSKeyframesRule -> JSString -> IO ()
insertRule ::
(MonadIO m, ToJSString rule) => CSSKeyframesRule -> rule -> m ()
insertRule self rule
= liftIO (js_insertRule (self) (toJSString rule))
foreign import javascript unsafe "$1[\"appendRule\"]($2)"
js_appendRule :: CSSKeyframesRule -> JSString -> IO ()
appendRule ::
(MonadIO m, ToJSString rule) => CSSKeyframesRule -> rule -> m ()
appendRule self rule
= liftIO (js_appendRule (self) (toJSString rule))
foreign import javascript unsafe "$1[\"deleteRule\"]($2)"
js_deleteRule :: CSSKeyframesRule -> JSString -> IO ()
deleteRule ::
(MonadIO m, ToJSString key) => CSSKeyframesRule -> key -> m ()
deleteRule self key
= liftIO (js_deleteRule (self) (toJSString key))
foreign import javascript unsafe "$1[\"findRule\"]($2)" js_findRule
:: CSSKeyframesRule -> JSString -> IO (Nullable CSSKeyframeRule)
findRule ::
(MonadIO m, ToJSString key) =>
CSSKeyframesRule -> key -> m (Maybe CSSKeyframeRule)
findRule self key
= liftIO
(nullableToMaybe <$> (js_findRule (self) (toJSString key)))
findRule_ ::
(MonadIO m, ToJSString key) => CSSKeyframesRule -> key -> m ()
findRule_ self key
= liftIO (void (js_findRule (self) (toJSString key)))
findRuleUnsafe ::
(MonadIO m, ToJSString key, HasCallStack) =>
CSSKeyframesRule -> key -> m CSSKeyframeRule
findRuleUnsafe self key
= liftIO
((nullableToMaybe <$> (js_findRule (self) (toJSString key))) >>=
maybe (Prelude.error "Nothing to return") return)
findRuleUnchecked ::
(MonadIO m, ToJSString key) =>
CSSKeyframesRule -> key -> m CSSKeyframeRule
findRuleUnchecked self key
= liftIO
(fromJust . nullableToMaybe <$>
(js_findRule (self) (toJSString key)))
foreign import javascript unsafe "$1[\"_get\"]($2)" js__get ::
CSSKeyframesRule -> Word -> IO (Nullable CSSKeyframeRule)
_get ::
(MonadIO m) =>
CSSKeyframesRule -> Word -> m (Maybe CSSKeyframeRule)
_get self index
= liftIO (nullableToMaybe <$> (js__get (self) index))
_get_ :: (MonadIO m) => CSSKeyframesRule -> Word -> m ()
_get_ self index = liftIO (void (js__get (self) index))
_getUnsafe ::
(MonadIO m, HasCallStack) =>
CSSKeyframesRule -> Word -> m CSSKeyframeRule
_getUnsafe self index
= liftIO
((nullableToMaybe <$> (js__get (self) index)) >>=
maybe (Prelude.error "Nothing to return") return)
_getUnchecked ::
(MonadIO m) => CSSKeyframesRule -> Word -> m CSSKeyframeRule
_getUnchecked self index
= liftIO (fromJust . nullableToMaybe <$> (js__get (self) index))
foreign import javascript unsafe "$1[\"name\"] = $2;" js_setName ::
CSSKeyframesRule -> Nullable JSString -> IO ()
setName ::
(MonadIO m, ToJSString val) =>
CSSKeyframesRule -> Maybe val -> m ()
setName self val = liftIO (js_setName (self) (toMaybeJSString val))
foreign import javascript unsafe "$1[\"name\"]" js_getName ::
CSSKeyframesRule -> IO (Nullable JSString)
getName ::
(MonadIO m, FromJSString result) =>
CSSKeyframesRule -> m (Maybe result)
getName self = liftIO (fromMaybeJSString <$> (js_getName (self)))
getNameUnsafe ::
(MonadIO m, HasCallStack, FromJSString result) =>
CSSKeyframesRule -> m result
getNameUnsafe self
= liftIO
((fromMaybeJSString <$> (js_getName (self))) >>=
maybe (Prelude.error "Nothing to return") return)
getNameUnchecked ::
(MonadIO m, FromJSString result) => CSSKeyframesRule -> m result
getNameUnchecked self
= liftIO (fromJust . fromMaybeJSString <$> (js_getName (self)))
foreign import javascript unsafe "$1[\"cssRules\"]" js_getCssRules
:: CSSKeyframesRule -> IO (Nullable CSSRuleList)
getCssRules ::
(MonadIO m) => CSSKeyframesRule -> m (Maybe CSSRuleList)
getCssRules self
= liftIO (nullableToMaybe <$> (js_getCssRules (self)))
getCssRulesUnsafe ::
(MonadIO m, HasCallStack) => CSSKeyframesRule -> m CSSRuleList
getCssRulesUnsafe self
= liftIO
((nullableToMaybe <$> (js_getCssRules (self))) >>=
maybe (Prelude.error "Nothing to return") return)
getCssRulesUnchecked ::
(MonadIO m) => CSSKeyframesRule -> m CSSRuleList
getCssRulesUnchecked self
= liftIO (fromJust . nullableToMaybe <$> (js_getCssRules (self)))