opengl: Cosmetics.

3-mid/opengl/source/lean/geometry/opengl-geometry-colored_textured.ads

@@ -9,7 +9,7 @@ with
 
 package openGL.Geometry.colored_textured
 --
---  Supports per-vertex site, color and texture.
+--  Supports 'per-vertex' site, color and texture.
 --
 is
    type Item is new openGL.Geometry.item with private;

3-mid/opengl/source/lean/geometry/opengl-geometry-lit_colored_textured.ads

@@ -8,7 +8,7 @@ with
 
 package openGL.Geometry.lit_colored_textured
 --
---  Supports per-vertex site color, texture and lighting.
+--  Supports 'per-vertex' site, color, texture and lighting.
 --
 is
    type Item is new openGL.Geometry.item with private;

3-mid/opengl/source/lean/geometry/opengl-geometry-lit_colored_textured_skinned.ads

@@ -11,7 +11,7 @@ with
 
 package openGL.Geometry.lit_colored_textured_skinned
 --
---  Supports per-vertex site color, texture, lighting and skinning.
+--  Supports 'per-vertex' site, color, texture, lighting and skinning.
 --
 is
    type Item is new openGL.Geometry.item with private;
@@ -36,6 +36,7 @@ is
          bone_Ids     : Vector_4;
          bone_Weights : Vector_4;
       end record;
+
    pragma Convention (C, Vertex);
 
    type Vertex_array is array (long_Index_t range <>) of aliased Vertex;

3-mid/opengl/source/lean/geometry/opengl-geometry-lit_textured.ads

@@ -8,7 +8,7 @@ with
 
 package openGL.Geometry.lit_textured
 --
---  Supports per-vertex site texture and lighting.
+--  Supports 'per-vertex' site, texture and lighting.
 --
 is
    type Item is new openGL.Geometry.item with private;

3-mid/opengl/source/lean/geometry/opengl-geometry-lit_textured_skinned.ads

@@ -9,11 +9,12 @@ with
 
 package openGL.Geometry.lit_textured_skinned
 --
---  Supports per-vertex site, texture, lighting and skinning.
+--  Supports 'per-vertex' site, texture, lighting and skinning.
 --
 is
    type Item is new openGL.Geometry.item with private;
 
+
    function new_Geometry return access Geometry.lit_textured_skinned.item'Class;
 
    procedure define_Program;
@@ -33,6 +34,7 @@ is
          bone_Ids     : Vector_4;
          bone_Weights : Vector_4;
       end record;
+
    pragma Convention (C, Vertex);
 
    type Vertex_array is array (long_Index_t range <>) of aliased Vertex;

3-mid/opengl/source/lean/geometry/opengl-geometry-textured.ads

@@ -9,12 +9,13 @@ with
 
 package openGL.Geometry.textured
 --
---  Supports per-vertex site and texture.
+--  Supports 'per-vertex' site and texture.
 --
 is
    type Item is new openGL.Geometry.item with private;
    type View is access all Item'Class;
 
+
    function new_Geometry return View;