diff --git a/src/Graphics/Classes/Drawable.hs b/src/Graphics/Classes/Drawable.hs index f634754..0da34fc 100644 --- a/src/Graphics/Classes/Drawable.hs +++ b/src/Graphics/Classes/Drawable.hs @@ -13,6 +13,6 @@ class Drawable a where -- -- | List type for resulting vertices and indices -- type VertexList a :: * -> * - -- | converter function - -- toVertices :: a -> ((VertexList a) Word, (VertexList a) Vertex) + -- | Function returning a tuple of Vectors of draw order indices and the + -- appropriate vertices. toVertices :: a -> (V.Vector Word, V.Vector Vertex)