cleanup & debug-output

This commit is contained in:
Nicole Dresselhaus 2014-06-01 23:13:28 +02:00
parent fc72fd8095
commit eaeae7d4e2
No known key found for this signature in database
GPG Key ID: BC16D887851A1A80

View File

@ -218,8 +218,9 @@ parseIQM a =
-- Fill Vertex-Arrays with data of Offsets -- Fill Vertex-Arrays with data of Offsets
let va = vertexArrays raw let va = vertexArrays raw
va' <- mapM (readInVAO f) va va' <- mapM (readInVAO f) va
vbo <- sequence $ map toVBOfromVAO va vbo <- mapM toVBOfromVAO va
withVAO vao $ createVAO (zip va' vbo) withVAO vao $ createVAO (zip va' vbo)
print raw
return $ raw return $ raw
{ vertexArrays = va' { vertexArrays = va'
, vertexBufferObjects = vbo , vertexBufferObjects = vbo