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