{-# LANGUAGE OverloadedStrings #-}
{-# LANGUAGE GeneralizedNewtypeDeriving #-}
module THREE.DefaultLoadingManager
(
DefaultLoadingManager (..)
, THREE.DefaultLoadingManager.new
) where
import Miso
import qualified THREE.Internal as THREE
newtype DefaultLoadingManager
= DefaultLoadingManager
{ DefaultLoadingManager -> JSVal
unDefaultLoadingManagerCamera :: JSVal
} deriving (DefaultLoadingManager -> IO Object
(DefaultLoadingManager -> IO Object)
-> ToObject DefaultLoadingManager
forall a. (a -> IO Object) -> ToObject a
$ctoObject :: DefaultLoadingManager -> IO Object
toObject :: DefaultLoadingManager -> IO Object
ToObject)
new :: THREE.Three DefaultLoadingManager
new :: Three DefaultLoadingManager
new = (JSVal -> DefaultLoadingManager)
-> MisoString -> [MisoString] -> Three DefaultLoadingManager
forall args con.
ToArgs args =>
(JSVal -> con) -> MisoString -> args -> Three con
THREE.new JSVal -> DefaultLoadingManager
DefaultLoadingManager MisoString
"DefaultLoadingManager" ([] :: [MisoString])