Add initial prototype.

3-mid/opengl/source/platform/glx/private/thin/glx-bufferswapcomplete.ads

@@ -0,0 +1,32 @@
+package glx.BufferSwapComplete
+is
+   type Item is
+      record
+         the_Type   : aliased C.int;
+         Serial     : aliased C.unsigned_long;
+         send_Event : aliased Bool;
+         Display    :         System.Address;
+         Drawable   : aliased glx.Drawable;
+         Event_type : aliased C.int;
+         UST        : aliased Integer_64;
+         MSC        : aliased Integer_64;
+         SBC        : aliased Integer_64;
+      end record;
+
+   type Items is array (C.size_t range <>) of aliased BufferSwapComplete.item;
+
+
+   type Pointer  is access all BufferSwapComplete.item;
+   type Pointers is array (C.size_t range <>) of aliased BufferSwapComplete.Pointer;
+
+   type Pointer_Pointer is access all BufferSwapComplete.Pointer;
+
+   function Construct return BufferSwapComplete.item;
+
+
+
+private
+
+   pragma Import (C, Construct, "Ada_new_GLXBufferSwapComplete");
+
+end glx.BufferSwapComplete;