Add initial prototype.

2022-07-31 17:34:54 +10:00
commit 54a53b2ac0
1421 changed files with 358874 additions and 0 deletions
--- a/3-mid/opengl/source/platform/egl/private/opengl-display-privvy.adb
+++ b/3-mid/opengl/source/platform/egl/private/opengl-display-privvy.adb
@@ -0,0 +1,12 @@
+package body opengl.Display.privvy
+is
+
+   function to_eGL (Self : in Display.item'Class) return eGL.EGLDisplay
+   is
+   begin
+      return Self.Thin;
+   end to_eGL;
+
+end opengl.Display.privvy;
+
+