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