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

{-# LANGUAGE PatternSynonyms #-}
{-# LANGUAGE ForeignFunctionInterface, JavaScriptFFI #-}
{-# LANGUAGE ImplicitParams, ConstraintKinds, KindSignatures #-}
{-# OPTIONS_GHC -fno-warn-unused-imports #-}
-- | Generated by dom-gen from geometry-1 (webref). Do not edit.
module GHCJS.DOM.JSFFI.Generated.DOMPoint
       (js_newDOMPoint, js_newDOMPoint', js_fromPoint, js_setX, js_getX, js_setY, js_getY, js_setZ, js_getZ, js_setW, js_getW, newDOMPoint, newDOMPoint', fromPoint, fromPoint_, setX, getX, setY, getY, setZ, getZ, setW, getW, DOMPoint(..), gTypeDOMPoint)
       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 "(($1) => { return new globalThis[\"DOMPoint\"]($1); })"
        js_newDOMPoint :: JSVal -> IO DOMPoint
-- | <https://developer.mozilla.org/docs/Web/API/DOMPoint/DOMPoint MDN DOMPoint. documentation>
newDOMPoint :: (MonadDOM m) => Maybe Double -> m DOMPoint
newDOMPoint x = liftDOM (((P.maybe (P.return jsUndefined) toJSVal x) >>= \a1' -> js_newDOMPoint a1'))

foreign import javascript safe "(($1, $2, $3, $4) => { return new globalThis[\"DOMPoint\"]($1, $2, $3, $4); })"
        js_newDOMPoint' :: JSVal -> JSVal -> JSVal -> JSVal -> IO DOMPoint
-- | <https://developer.mozilla.org/docs/Web/API/DOMPoint/DOMPoint MDN DOMPoint. documentation>
newDOMPoint' :: (MonadDOM m) => Maybe Double -> Maybe Double -> Maybe Double -> Maybe Double -> m DOMPoint
newDOMPoint' x y z w = liftDOM (((P.maybe (P.return jsUndefined) toJSVal x) >>= \a1' -> (P.maybe (P.return jsUndefined) toJSVal y) >>= \a2' -> (P.maybe (P.return jsUndefined) toJSVal z) >>= \a3' -> (P.maybe (P.return jsUndefined) toJSVal w) >>= \a4' -> js_newDOMPoint' a1' a2' a3' a4'))

foreign import javascript safe "(($1) => { return globalThis[\"DOMPoint\"][\"fromPoint\"]($1); })"
        js_fromPoint :: JSVal -> IO DOMPoint
-- | <https://developer.mozilla.org/docs/Web/API/DOMPoint/fromPoint_static MDN DOMPoint.fromPoint documentation>
fromPoint :: (MonadDOM m) => Maybe DOMPointInit -> m DOMPoint
fromPoint other = liftDOM (((P.maybe (P.return jsUndefined) toJSVal other) >>= \a1' -> js_fromPoint a1'))

-- | <https://developer.mozilla.org/docs/Web/API/DOMPoint/fromPoint_static MDN DOMPoint.fromPoint documentation>
fromPoint_ :: (MonadDOM m) => Maybe DOMPointInit -> m ()
fromPoint_ other = liftDOM (void (((P.maybe (P.return jsUndefined) toJSVal other) >>= \a1' -> js_fromPoint a1')))

foreign import javascript safe "(($1, $2) => { $1[\"x\"] = $2; })"
        js_setX :: DOMPoint -> Double -> IO ()
-- | <https://developer.mozilla.org/docs/Web/API/DOMPoint/x MDN DOMPoint.x documentation>
setX :: (MonadDOM m) => DOMPoint -> Double -> m ()
setX self val = liftDOM (void ((js_setX (self) (val))))

foreign import javascript unsafe "(($1) => { return $1[\"x\"]; })"
        js_getX :: DOMPoint -> IO Double
-- | <https://developer.mozilla.org/docs/Web/API/DOMPoint/x MDN DOMPoint.x documentation>
getX :: (MonadDOM m) => DOMPoint -> m Double
getX self = liftDOM ((js_getX (self)))

foreign import javascript safe "(($1, $2) => { $1[\"y\"] = $2; })"
        js_setY :: DOMPoint -> Double -> IO ()
-- | <https://developer.mozilla.org/docs/Web/API/DOMPoint/y MDN DOMPoint.y documentation>
setY :: (MonadDOM m) => DOMPoint -> Double -> m ()
setY self val = liftDOM (void ((js_setY (self) (val))))

foreign import javascript unsafe "(($1) => { return $1[\"y\"]; })"
        js_getY :: DOMPoint -> IO Double
-- | <https://developer.mozilla.org/docs/Web/API/DOMPoint/y MDN DOMPoint.y documentation>
getY :: (MonadDOM m) => DOMPoint -> m Double
getY self = liftDOM ((js_getY (self)))

foreign import javascript safe "(($1, $2) => { $1[\"z\"] = $2; })"
        js_setZ :: DOMPoint -> Double -> IO ()
-- | <https://developer.mozilla.org/docs/Web/API/DOMPoint/z MDN DOMPoint.z documentation>
setZ :: (MonadDOM m) => DOMPoint -> Double -> m ()
setZ self val = liftDOM (void ((js_setZ (self) (val))))

foreign import javascript unsafe "(($1) => { return $1[\"z\"]; })"
        js_getZ :: DOMPoint -> IO Double
-- | <https://developer.mozilla.org/docs/Web/API/DOMPoint/z MDN DOMPoint.z documentation>
getZ :: (MonadDOM m) => DOMPoint -> m Double
getZ self = liftDOM ((js_getZ (self)))

foreign import javascript safe "(($1, $2) => { $1[\"w\"] = $2; })"
        js_setW :: DOMPoint -> Double -> IO ()
-- | <https://developer.mozilla.org/docs/Web/API/DOMPoint/w MDN DOMPoint.w documentation>
setW :: (MonadDOM m) => DOMPoint -> Double -> m ()
setW self val = liftDOM (void ((js_setW (self) (val))))

foreign import javascript unsafe "(($1) => { return $1[\"w\"]; })"
        js_getW :: DOMPoint -> IO Double
-- | <https://developer.mozilla.org/docs/Web/API/DOMPoint/w MDN DOMPoint.w documentation>
getW :: (MonadDOM m) => DOMPoint -> m Double
getW self = liftDOM ((js_getW (self)))