array-objects get initialized

- initialized array-objects
- still need to be rendered and collected to a VertexBufferObject

refs #482 @2h
This commit is contained in:
Stefan Dresselhaus
2014-05-13 15:04:20 +02:00
parent 4d31866256
commit b5a4d03f8c
3 changed files with 26 additions and 7 deletions

View File

@ -138,8 +138,3 @@ genColorData :: Int -- ^ Amount
-> [Int8] -- ^ [r,g,b,a], [r,g,b] - whatever should be repeatet.
-> [Int8]
genColorData n c = take (length c*n) (cycle c)
-- from GLUtil
-- |Allocate and fill a 'BufferObject' from a list of 'Storable's.
makeBuffer :: Storable a => BufferTarget -> [a] -> IO BufferObject
makeBuffer target elems = makeBufferLen target (length elems) elems