Implement custom poking for vertices--speed regression?

src/Shader/Data.hs

@@ -56,7 +56,7 @@ and a list of attribute pointer sizes.
 Vertex attributes are interleaved within the vbo. -}
 data VBO = VBO
     { _vbo      :: BufferObject
-    , _vboPointer :: Ptr Float
+    , _vboPtr :: Ptr Float
     , _vboAttribSizes :: [Int]  -- ^ It is not clear to me if this is necessary to store or not
     , _vboStride :: Int
     }