ghcjs-dom-javascript-0.10.0.0: src/GHCJS/DOM/JSFFI/Generated/FontFaceDescriptors.hs

{-# LANGUAGE PatternSynonyms #-}
{-# LANGUAGE ForeignFunctionInterface, JavaScriptFFI #-}
{-# LANGUAGE ImplicitParams, ConstraintKinds, KindSignatures #-}
{-# OPTIONS_GHC -fno-warn-unused-imports #-}
-- | Generated by dom-gen from css-font-loading-3 (webref). Do not edit.
module GHCJS.DOM.JSFFI.Generated.FontFaceDescriptors
       (js_newFontFaceDescriptors, js_setStyle, js_getStyle, js_setWeight, js_getWeight, js_setStretch, js_getStretch, js_setUnicodeRange, js_getUnicodeRange, js_setFeatureSettings, js_getFeatureSettings, js_setVariationSettings, js_getVariationSettings, js_setDisplay, js_getDisplay, js_setAscentOverride, js_getAscentOverride, js_setDescentOverride, js_getDescentOverride, js_setLineGapOverride, js_getLineGapOverride, newFontFaceDescriptors, setStyle, getStyle, getStyleUnsafe, getStyleUnchecked, setWeight, getWeight, getWeightUnsafe, getWeightUnchecked, setStretch, getStretch, getStretchUnsafe, getStretchUnchecked, setUnicodeRange, getUnicodeRange, getUnicodeRangeUnsafe, getUnicodeRangeUnchecked, setFeatureSettings, getFeatureSettings, getFeatureSettingsUnsafe, getFeatureSettingsUnchecked, setVariationSettings, getVariationSettings, getVariationSettingsUnsafe, getVariationSettingsUnchecked, setDisplay, getDisplay, getDisplayUnsafe, getDisplayUnchecked, setAscentOverride, getAscentOverride, getAscentOverrideUnsafe, getAscentOverrideUnchecked, setDescentOverride, getDescentOverride, getDescentOverrideUnsafe, getDescentOverrideUnchecked, setLineGapOverride, getLineGapOverride, getLineGapOverrideUnsafe, getLineGapOverrideUnchecked, FontFaceDescriptors(..), gTypeFontFaceDescriptors)
       where
import Prelude ((.), (==), (>>=), (<$>), (++), Bool(..), Maybe(..), IO, Int, Word, Double, Float)
import qualified Prelude as P
import Control.Monad (void)
import GHCJS.Types (JSVal, JSString)
import GHCJS.Foreign (jsUndefined, jsNull)
import GHCJS.DOM.Types
import qualified GHCJS.DOM.Types as Types
import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName, unsafeEventNameAsync)
import GHCJS.DOM.JSFFI.Generated.Enums

foreign import javascript safe "(() => { return ({}); })"
        js_newFontFaceDescriptors :: IO FontFaceDescriptors
-- | <https://drafts.csswg.org/css-font-loading-3/#dictdef-fontfacedescriptors FontFaceDescriptors specification>
newFontFaceDescriptors :: (MonadDOM m) => m FontFaceDescriptors
newFontFaceDescriptors = liftDOM ((js_newFontFaceDescriptors))

foreign import javascript safe "(($1, $2) => { $1[\"style\"] = $2; })"
        js_setStyle :: FontFaceDescriptors -> JSString -> IO ()
-- | <https://drafts.csswg.org/css-font-loading-3/#dom-fontfacedescriptors-style FontFaceDescriptors.style specification>
setStyle :: (MonadDOM m, ToJSString val) => FontFaceDescriptors -> val -> m ()
setStyle self val = liftDOM (void ((js_setStyle (self) (toJSString val))))

foreign import javascript unsafe "(($1) => { return $1[\"style\"]; })"
        js_getStyle :: FontFaceDescriptors -> IO JSVal
-- | <https://drafts.csswg.org/css-font-loading-3/#dom-fontfacedescriptors-style FontFaceDescriptors.style specification>
getStyle :: (MonadDOM m, FromJSString result) => FontFaceDescriptors -> m (Maybe result)
getStyle self = liftDOM (((fromMaybeJSString . Nullable) <$> (js_getStyle (self))))

-- | <https://drafts.csswg.org/css-font-loading-3/#dom-fontfacedescriptors-style FontFaceDescriptors.style specification>
getStyleUnsafe :: (MonadDOM m, HasCallStack, FromJSString result) => FontFaceDescriptors -> m result
getStyleUnsafe self = liftDOM ((((fromMaybeJSString . Nullable) <$> (js_getStyle (self))) >>= P.maybe (P.error "Nothing to return") P.return))

-- | <https://drafts.csswg.org/css-font-loading-3/#dom-fontfacedescriptors-style FontFaceDescriptors.style specification>
getStyleUnchecked :: (MonadDOM m, FromJSString result) => FontFaceDescriptors -> m result
getStyleUnchecked self = liftDOM ((pFromJSVal <$> (js_getStyle (self))))

foreign import javascript safe "(($1, $2) => { $1[\"weight\"] = $2; })"
        js_setWeight :: FontFaceDescriptors -> JSString -> IO ()
-- | <https://drafts.csswg.org/css-font-loading-3/#dom-fontfacedescriptors-weight FontFaceDescriptors.weight specification>
setWeight :: (MonadDOM m, ToJSString val) => FontFaceDescriptors -> val -> m ()
setWeight self val = liftDOM (void ((js_setWeight (self) (toJSString val))))

foreign import javascript unsafe "(($1) => { return $1[\"weight\"]; })"
        js_getWeight :: FontFaceDescriptors -> IO JSVal
-- | <https://drafts.csswg.org/css-font-loading-3/#dom-fontfacedescriptors-weight FontFaceDescriptors.weight specification>
getWeight :: (MonadDOM m, FromJSString result) => FontFaceDescriptors -> m (Maybe result)
getWeight self = liftDOM (((fromMaybeJSString . Nullable) <$> (js_getWeight (self))))

-- | <https://drafts.csswg.org/css-font-loading-3/#dom-fontfacedescriptors-weight FontFaceDescriptors.weight specification>
getWeightUnsafe :: (MonadDOM m, HasCallStack, FromJSString result) => FontFaceDescriptors -> m result
getWeightUnsafe self = liftDOM ((((fromMaybeJSString . Nullable) <$> (js_getWeight (self))) >>= P.maybe (P.error "Nothing to return") P.return))

-- | <https://drafts.csswg.org/css-font-loading-3/#dom-fontfacedescriptors-weight FontFaceDescriptors.weight specification>
getWeightUnchecked :: (MonadDOM m, FromJSString result) => FontFaceDescriptors -> m result
getWeightUnchecked self = liftDOM ((pFromJSVal <$> (js_getWeight (self))))

foreign import javascript safe "(($1, $2) => { $1[\"stretch\"] = $2; })"
        js_setStretch :: FontFaceDescriptors -> JSString -> IO ()
-- | <https://drafts.csswg.org/css-font-loading-3/#dom-fontfacedescriptors-stretch FontFaceDescriptors.stretch specification>
setStretch :: (MonadDOM m, ToJSString val) => FontFaceDescriptors -> val -> m ()
setStretch self val = liftDOM (void ((js_setStretch (self) (toJSString val))))

foreign import javascript unsafe "(($1) => { return $1[\"stretch\"]; })"
        js_getStretch :: FontFaceDescriptors -> IO JSVal
-- | <https://drafts.csswg.org/css-font-loading-3/#dom-fontfacedescriptors-stretch FontFaceDescriptors.stretch specification>
getStretch :: (MonadDOM m, FromJSString result) => FontFaceDescriptors -> m (Maybe result)
getStretch self = liftDOM (((fromMaybeJSString . Nullable) <$> (js_getStretch (self))))

-- | <https://drafts.csswg.org/css-font-loading-3/#dom-fontfacedescriptors-stretch FontFaceDescriptors.stretch specification>
getStretchUnsafe :: (MonadDOM m, HasCallStack, FromJSString result) => FontFaceDescriptors -> m result
getStretchUnsafe self = liftDOM ((((fromMaybeJSString . Nullable) <$> (js_getStretch (self))) >>= P.maybe (P.error "Nothing to return") P.return))

-- | <https://drafts.csswg.org/css-font-loading-3/#dom-fontfacedescriptors-stretch FontFaceDescriptors.stretch specification>
getStretchUnchecked :: (MonadDOM m, FromJSString result) => FontFaceDescriptors -> m result
getStretchUnchecked self = liftDOM ((pFromJSVal <$> (js_getStretch (self))))

foreign import javascript safe "(($1, $2) => { $1[\"unicodeRange\"] = $2; })"
        js_setUnicodeRange :: FontFaceDescriptors -> JSString -> IO ()
-- | <https://drafts.csswg.org/css-font-loading-3/#dom-fontfacedescriptors-unicoderange FontFaceDescriptors.unicodeRange specification>
setUnicodeRange :: (MonadDOM m, ToJSString val) => FontFaceDescriptors -> val -> m ()
setUnicodeRange self val = liftDOM (void ((js_setUnicodeRange (self) (toJSString val))))

foreign import javascript unsafe "(($1) => { return $1[\"unicodeRange\"]; })"
        js_getUnicodeRange :: FontFaceDescriptors -> IO JSVal
-- | <https://drafts.csswg.org/css-font-loading-3/#dom-fontfacedescriptors-unicoderange FontFaceDescriptors.unicodeRange specification>
getUnicodeRange :: (MonadDOM m, FromJSString result) => FontFaceDescriptors -> m (Maybe result)
getUnicodeRange self = liftDOM (((fromMaybeJSString . Nullable) <$> (js_getUnicodeRange (self))))

-- | <https://drafts.csswg.org/css-font-loading-3/#dom-fontfacedescriptors-unicoderange FontFaceDescriptors.unicodeRange specification>
getUnicodeRangeUnsafe :: (MonadDOM m, HasCallStack, FromJSString result) => FontFaceDescriptors -> m result
getUnicodeRangeUnsafe self = liftDOM ((((fromMaybeJSString . Nullable) <$> (js_getUnicodeRange (self))) >>= P.maybe (P.error "Nothing to return") P.return))

-- | <https://drafts.csswg.org/css-font-loading-3/#dom-fontfacedescriptors-unicoderange FontFaceDescriptors.unicodeRange specification>
getUnicodeRangeUnchecked :: (MonadDOM m, FromJSString result) => FontFaceDescriptors -> m result
getUnicodeRangeUnchecked self = liftDOM ((pFromJSVal <$> (js_getUnicodeRange (self))))

foreign import javascript safe "(($1, $2) => { $1[\"featureSettings\"] = $2; })"
        js_setFeatureSettings :: FontFaceDescriptors -> JSString -> IO ()
-- | <https://drafts.csswg.org/css-font-loading-3/#dom-fontfacedescriptors-featuresettings FontFaceDescriptors.featureSettings specification>
setFeatureSettings :: (MonadDOM m, ToJSString val) => FontFaceDescriptors -> val -> m ()
setFeatureSettings self val = liftDOM (void ((js_setFeatureSettings (self) (toJSString val))))

foreign import javascript unsafe "(($1) => { return $1[\"featureSettings\"]; })"
        js_getFeatureSettings :: FontFaceDescriptors -> IO JSVal
-- | <https://drafts.csswg.org/css-font-loading-3/#dom-fontfacedescriptors-featuresettings FontFaceDescriptors.featureSettings specification>
getFeatureSettings :: (MonadDOM m, FromJSString result) => FontFaceDescriptors -> m (Maybe result)
getFeatureSettings self = liftDOM (((fromMaybeJSString . Nullable) <$> (js_getFeatureSettings (self))))

-- | <https://drafts.csswg.org/css-font-loading-3/#dom-fontfacedescriptors-featuresettings FontFaceDescriptors.featureSettings specification>
getFeatureSettingsUnsafe :: (MonadDOM m, HasCallStack, FromJSString result) => FontFaceDescriptors -> m result
getFeatureSettingsUnsafe self = liftDOM ((((fromMaybeJSString . Nullable) <$> (js_getFeatureSettings (self))) >>= P.maybe (P.error "Nothing to return") P.return))

-- | <https://drafts.csswg.org/css-font-loading-3/#dom-fontfacedescriptors-featuresettings FontFaceDescriptors.featureSettings specification>
getFeatureSettingsUnchecked :: (MonadDOM m, FromJSString result) => FontFaceDescriptors -> m result
getFeatureSettingsUnchecked self = liftDOM ((pFromJSVal <$> (js_getFeatureSettings (self))))

foreign import javascript safe "(($1, $2) => { $1[\"variationSettings\"] = $2; })"
        js_setVariationSettings :: FontFaceDescriptors -> JSString -> IO ()
-- | <https://drafts.csswg.org/css-font-loading-3/#dom-fontfacedescriptors-variationsettings FontFaceDescriptors.variationSettings specification>
setVariationSettings :: (MonadDOM m, ToJSString val) => FontFaceDescriptors -> val -> m ()
setVariationSettings self val = liftDOM (void ((js_setVariationSettings (self) (toJSString val))))

foreign import javascript unsafe "(($1) => { return $1[\"variationSettings\"]; })"
        js_getVariationSettings :: FontFaceDescriptors -> IO JSVal
-- | <https://drafts.csswg.org/css-font-loading-3/#dom-fontfacedescriptors-variationsettings FontFaceDescriptors.variationSettings specification>
getVariationSettings :: (MonadDOM m, FromJSString result) => FontFaceDescriptors -> m (Maybe result)
getVariationSettings self = liftDOM (((fromMaybeJSString . Nullable) <$> (js_getVariationSettings (self))))

-- | <https://drafts.csswg.org/css-font-loading-3/#dom-fontfacedescriptors-variationsettings FontFaceDescriptors.variationSettings specification>
getVariationSettingsUnsafe :: (MonadDOM m, HasCallStack, FromJSString result) => FontFaceDescriptors -> m result
getVariationSettingsUnsafe self = liftDOM ((((fromMaybeJSString . Nullable) <$> (js_getVariationSettings (self))) >>= P.maybe (P.error "Nothing to return") P.return))

-- | <https://drafts.csswg.org/css-font-loading-3/#dom-fontfacedescriptors-variationsettings FontFaceDescriptors.variationSettings specification>
getVariationSettingsUnchecked :: (MonadDOM m, FromJSString result) => FontFaceDescriptors -> m result
getVariationSettingsUnchecked self = liftDOM ((pFromJSVal <$> (js_getVariationSettings (self))))

foreign import javascript safe "(($1, $2) => { $1[\"display\"] = $2; })"
        js_setDisplay :: FontFaceDescriptors -> JSString -> IO ()
-- | <https://drafts.csswg.org/css-font-loading-3/#dom-fontfacedescriptors-display FontFaceDescriptors.display specification>
setDisplay :: (MonadDOM m, ToJSString val) => FontFaceDescriptors -> val -> m ()
setDisplay self val = liftDOM (void ((js_setDisplay (self) (toJSString val))))

foreign import javascript unsafe "(($1) => { return $1[\"display\"]; })"
        js_getDisplay :: FontFaceDescriptors -> IO JSVal
-- | <https://drafts.csswg.org/css-font-loading-3/#dom-fontfacedescriptors-display FontFaceDescriptors.display specification>
getDisplay :: (MonadDOM m, FromJSString result) => FontFaceDescriptors -> m (Maybe result)
getDisplay self = liftDOM (((fromMaybeJSString . Nullable) <$> (js_getDisplay (self))))

-- | <https://drafts.csswg.org/css-font-loading-3/#dom-fontfacedescriptors-display FontFaceDescriptors.display specification>
getDisplayUnsafe :: (MonadDOM m, HasCallStack, FromJSString result) => FontFaceDescriptors -> m result
getDisplayUnsafe self = liftDOM ((((fromMaybeJSString . Nullable) <$> (js_getDisplay (self))) >>= P.maybe (P.error "Nothing to return") P.return))

-- | <https://drafts.csswg.org/css-font-loading-3/#dom-fontfacedescriptors-display FontFaceDescriptors.display specification>
getDisplayUnchecked :: (MonadDOM m, FromJSString result) => FontFaceDescriptors -> m result
getDisplayUnchecked self = liftDOM ((pFromJSVal <$> (js_getDisplay (self))))

foreign import javascript safe "(($1, $2) => { $1[\"ascentOverride\"] = $2; })"
        js_setAscentOverride :: FontFaceDescriptors -> JSString -> IO ()
-- | <https://drafts.csswg.org/css-font-loading-3/#dom-fontfacedescriptors-ascentoverride FontFaceDescriptors.ascentOverride specification>
setAscentOverride :: (MonadDOM m, ToJSString val) => FontFaceDescriptors -> val -> m ()
setAscentOverride self val = liftDOM (void ((js_setAscentOverride (self) (toJSString val))))

foreign import javascript unsafe "(($1) => { return $1[\"ascentOverride\"]; })"
        js_getAscentOverride :: FontFaceDescriptors -> IO JSVal
-- | <https://drafts.csswg.org/css-font-loading-3/#dom-fontfacedescriptors-ascentoverride FontFaceDescriptors.ascentOverride specification>
getAscentOverride :: (MonadDOM m, FromJSString result) => FontFaceDescriptors -> m (Maybe result)
getAscentOverride self = liftDOM (((fromMaybeJSString . Nullable) <$> (js_getAscentOverride (self))))

-- | <https://drafts.csswg.org/css-font-loading-3/#dom-fontfacedescriptors-ascentoverride FontFaceDescriptors.ascentOverride specification>
getAscentOverrideUnsafe :: (MonadDOM m, HasCallStack, FromJSString result) => FontFaceDescriptors -> m result
getAscentOverrideUnsafe self = liftDOM ((((fromMaybeJSString . Nullable) <$> (js_getAscentOverride (self))) >>= P.maybe (P.error "Nothing to return") P.return))

-- | <https://drafts.csswg.org/css-font-loading-3/#dom-fontfacedescriptors-ascentoverride FontFaceDescriptors.ascentOverride specification>
getAscentOverrideUnchecked :: (MonadDOM m, FromJSString result) => FontFaceDescriptors -> m result
getAscentOverrideUnchecked self = liftDOM ((pFromJSVal <$> (js_getAscentOverride (self))))

foreign import javascript safe "(($1, $2) => { $1[\"descentOverride\"] = $2; })"
        js_setDescentOverride :: FontFaceDescriptors -> JSString -> IO ()
-- | <https://drafts.csswg.org/css-font-loading-3/#dom-fontfacedescriptors-descentoverride FontFaceDescriptors.descentOverride specification>
setDescentOverride :: (MonadDOM m, ToJSString val) => FontFaceDescriptors -> val -> m ()
setDescentOverride self val = liftDOM (void ((js_setDescentOverride (self) (toJSString val))))

foreign import javascript unsafe "(($1) => { return $1[\"descentOverride\"]; })"
        js_getDescentOverride :: FontFaceDescriptors -> IO JSVal
-- | <https://drafts.csswg.org/css-font-loading-3/#dom-fontfacedescriptors-descentoverride FontFaceDescriptors.descentOverride specification>
getDescentOverride :: (MonadDOM m, FromJSString result) => FontFaceDescriptors -> m (Maybe result)
getDescentOverride self = liftDOM (((fromMaybeJSString . Nullable) <$> (js_getDescentOverride (self))))

-- | <https://drafts.csswg.org/css-font-loading-3/#dom-fontfacedescriptors-descentoverride FontFaceDescriptors.descentOverride specification>
getDescentOverrideUnsafe :: (MonadDOM m, HasCallStack, FromJSString result) => FontFaceDescriptors -> m result
getDescentOverrideUnsafe self = liftDOM ((((fromMaybeJSString . Nullable) <$> (js_getDescentOverride (self))) >>= P.maybe (P.error "Nothing to return") P.return))

-- | <https://drafts.csswg.org/css-font-loading-3/#dom-fontfacedescriptors-descentoverride FontFaceDescriptors.descentOverride specification>
getDescentOverrideUnchecked :: (MonadDOM m, FromJSString result) => FontFaceDescriptors -> m result
getDescentOverrideUnchecked self = liftDOM ((pFromJSVal <$> (js_getDescentOverride (self))))

foreign import javascript safe "(($1, $2) => { $1[\"lineGapOverride\"] = $2; })"
        js_setLineGapOverride :: FontFaceDescriptors -> JSString -> IO ()
-- | <https://drafts.csswg.org/css-font-loading-3/#dom-fontfacedescriptors-linegapoverride FontFaceDescriptors.lineGapOverride specification>
setLineGapOverride :: (MonadDOM m, ToJSString val) => FontFaceDescriptors -> val -> m ()
setLineGapOverride self val = liftDOM (void ((js_setLineGapOverride (self) (toJSString val))))

foreign import javascript unsafe "(($1) => { return $1[\"lineGapOverride\"]; })"
        js_getLineGapOverride :: FontFaceDescriptors -> IO JSVal
-- | <https://drafts.csswg.org/css-font-loading-3/#dom-fontfacedescriptors-linegapoverride FontFaceDescriptors.lineGapOverride specification>
getLineGapOverride :: (MonadDOM m, FromJSString result) => FontFaceDescriptors -> m (Maybe result)
getLineGapOverride self = liftDOM (((fromMaybeJSString . Nullable) <$> (js_getLineGapOverride (self))))

-- | <https://drafts.csswg.org/css-font-loading-3/#dom-fontfacedescriptors-linegapoverride FontFaceDescriptors.lineGapOverride specification>
getLineGapOverrideUnsafe :: (MonadDOM m, HasCallStack, FromJSString result) => FontFaceDescriptors -> m result
getLineGapOverrideUnsafe self = liftDOM ((((fromMaybeJSString . Nullable) <$> (js_getLineGapOverride (self))) >>= P.maybe (P.error "Nothing to return") P.return))

-- | <https://drafts.csswg.org/css-font-loading-3/#dom-fontfacedescriptors-linegapoverride FontFaceDescriptors.lineGapOverride specification>
getLineGapOverrideUnchecked :: (MonadDOM m, FromJSString result) => FontFaceDescriptors -> m result
getLineGapOverrideUnchecked self = liftDOM ((pFromJSVal <$> (js_getLineGapOverride (self))))