jsaddle-dom-0.1.0.1: src/Language/Javascript/JSaddle/DOM/Generated/PerformanceEntry.hs
{-# LANGUAGE PatternSynonyms #-}
module Language.Javascript.JSaddle.DOM.Generated.PerformanceEntry
(getName, getEntryType, getStartTime, getDuration,
PerformanceEntry, castToPerformanceEntry, gTypePerformanceEntry,
IsPerformanceEntry, toPerformanceEntry)
where
import Prelude ((.), (==), (>>=), return, IO, Int, Float, Double, Bool(..), Maybe, maybe, fromIntegral, round, realToFrac, fmap, Show, Read, Eq, Ord, Maybe(..))
import Data.Typeable (Typeable)
import Language.Javascript.JSaddle (JSM(..), JSVal(..), JSString, strictEqual, toJSVal, valToStr, valToNumber, valToBool, js, jss, jsf, jsg, function, new, array)
import Data.Int (Int64)
import Data.Word (Word, Word64)
import Language.Javascript.JSaddle.DOM.Types
import Control.Applicative ((<$>))
import Control.Monad (void)
import Control.Lens.Operators ((^.))
import Language.Javascript.JSaddle.DOM.EventTargetClosures (EventName, unsafeEventName)
import Language.Javascript.JSaddle.DOM.Enums
-- | <https://developer.mozilla.org/en-US/docs/Web/API/PerformanceEntry.name Mozilla PerformanceEntry.name documentation>
getName ::
(MonadDOM m, IsPerformanceEntry self, FromJSString result) =>
self -> m result
getName self
= liftDOM
(((toPerformanceEntry self) ^. js "name") >>= fromJSValUnchecked)
-- | <https://developer.mozilla.org/en-US/docs/Web/API/PerformanceEntry.entryType Mozilla PerformanceEntry.entryType documentation>
getEntryType ::
(MonadDOM m, IsPerformanceEntry self, FromJSString result) =>
self -> m result
getEntryType self
= liftDOM
(((toPerformanceEntry self) ^. js "entryType") >>=
fromJSValUnchecked)
-- | <https://developer.mozilla.org/en-US/docs/Web/API/PerformanceEntry.startTime Mozilla PerformanceEntry.startTime documentation>
getStartTime ::
(MonadDOM m, IsPerformanceEntry self) => self -> m Double
getStartTime self
= liftDOM
(((toPerformanceEntry self) ^. js "startTime") >>= valToNumber)
-- | <https://developer.mozilla.org/en-US/docs/Web/API/PerformanceEntry.duration Mozilla PerformanceEntry.duration documentation>
getDuration ::
(MonadDOM m, IsPerformanceEntry self) => self -> m Double
getDuration self
= liftDOM
(((toPerformanceEntry self) ^. js "duration") >>= valToNumber)