Add picture shader container datatype

src/Shader/Compile.hs

@@ -151,6 +151,7 @@ setupVBO sizes = do
         { _vbo = vboName
         , _vboPointer = thePtr
         , _vboAttribSizes = sizes
+        , _vboStride = sum sizes
         }
   where
     strd = sum sizes
@@ -173,6 +174,7 @@ setupVBOSized sizes ndraw = do
         { _vbo = vboName
         , _vboPointer = thePtr
         , _vboAttribSizes = sizes
+        , _vboStride = sum sizes
         }
   where
     strd = sum sizes