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