-----------------------------------------------------------------------------
{-# LANGUAGE OverloadedStrings #-}
{-# LANGUAGE GeneralizedNewtypeDeriving #-}
-----------------------------------------------------------------------------
module THREE.Cache
  ( -- * Types
    Cache (..)
    -- * Methods
  , THREE.Cache.new
    -- * Properties
  ) where
-----------------------------------------------------------------------------
import           Miso
-----------------------------------------------------------------------------
import qualified THREE.Internal as THREE
-----------------------------------------------------------------------------
-- | https://threejs.org/docs/#api/en/scenes/Cache
newtype Cache
  = Cache
  { Cache -> JSVal
unCacheCamera :: JSVal
  } deriving (Cache -> IO Object
(Cache -> IO Object) -> ToObject Cache
forall a. (a -> IO Object) -> ToObject a
$ctoObject :: Cache -> IO Object
toObject :: Cache -> IO Object
ToObject)
-----------------------------------------------------------------------------
-- | https://threejs.org/docs/#api/en/cameras/Cache
new :: THREE.Three Cache
new :: Three Cache
new = (JSVal -> Cache) -> MisoString -> () -> Three Cache
forall args con.
ToArgs args =>
(JSVal -> con) -> MisoString -> args -> Three con
THREE.new JSVal -> Cache
Cache MisoString
"Cache" ()
-----------------------------------------------------------------------------