Work on VertexAttribute usage

src/Preload/Render.hs

@@ -69,7 +69,7 @@ preloadRender = do
     -- setup shape geometry/cap VBO and two VAOs
     putStrLn "Setup shape VBO, VAO, EBO"
     shVBO <- setupVBO nShapeVerxComp
-    shPosVAO <- setupVAOUsingVBO [4] shVBO
+    shPosVAO <- setupVAOUsingVBO [VertexAttribute 4 GL_FLOAT GL_FALSE 0] shVBO
     shEBO <- setupEBO shPosVAO
     -- note the shape shader vao is distinct from the position vao, but they
     -- share an EBO
@@ -78,7 +78,7 @@ preloadRender = do
 
     --setup silhouette edge VAO
     putStrLn "Setup silhouette VAO, EBO"
-    shedgevao <- setupVAOUsingVBO [4] shVBO
+    shedgevao <- setupVAOUsingVBO [VertexAttribute 4 GL_FLOAT GL_FALSE 0] shVBO
     shedgeebo <- setupEBO shedgevao
 
     putStrLn "Setup wall/windows VBO, VAO, EBO, shader"