opengl.demos: Update code to use new openGL updates.
This commit is contained in:
@@ -1,10 +1,12 @@
|
||||
with
|
||||
openGL.Model.Terrain,
|
||||
openGL.IO,
|
||||
openGL.texture_Set,
|
||||
|
||||
ada.unchecked_Deallocation,
|
||||
ada.unchecked_Conversion;
|
||||
|
||||
|
||||
package body openGL.Terrain
|
||||
is
|
||||
type Heightmap_view is access all height_Map;
|
||||
@@ -121,6 +123,7 @@ is
|
||||
Col => Col,
|
||||
Heights => the_Region.all'Access,
|
||||
color_Map => texture_File,
|
||||
texture_Details => texture_Set.to_Details ([1 => texture_File]),
|
||||
Tiling => Tiling);
|
||||
|
||||
the_height_Extents : constant Vector_2 := height_Extent (the_Region.all);
|
||||
|
||||
Reference in New Issue
Block a user