From 0b86daff6bc58119f2b0ad5324fd18857dfdb3c5 Mon Sep 17 00:00:00 2001
From: Jed Barber <jjbarber@y7mail.com>
Date: Tue, 2 Jan 2018 21:05:54 +1100
Subject: Update from before Christmas

---
 src/wayland.adb | 57 +++++++++++++++++++++++++++++++++++++++++++++++++++++++++
 1 file changed, 57 insertions(+)
 create mode 100644 src/wayland.adb

(limited to 'src/wayland.adb')

diff --git a/src/wayland.adb b/src/wayland.adb
new file mode 100644
index 0000000..db232c6
--- /dev/null
+++ b/src/wayland.adb
@@ -0,0 +1,57 @@
+
+
+package body Wayland is
+
+
+    function Arg
+           (Of_Type : in Unsigned_Integer)
+        return Arg (Uint);
+
+
+    function Arg
+           (Of_Type : in Integer)
+        return Arg (Int);
+
+
+    function Arg
+           (Of_Type : in )
+        return Arg (Fixed);
+
+
+    function Arg
+           (Of_Type : in String)
+        return Arg (String);
+
+
+    function Arg
+           (Of_Type : in )
+        return Arg (Arr);
+
+
+    function Arg
+           (Of_Type : in File_Descriptor)
+        return Arg (FD);
+
+
+    function Arg
+           (Of_Type : in ID_Number)
+        return Arg (ID);
+
+
+    function Arg
+           (Of_Type : in )
+        return Arg (Obj);
+
+
+
+
+
+    procedure Initialize
+           (This : in out Wayland_Object) is
+    begin
+        This.Void_Ptr := System.Null_Address;
+    end Initialize;
+
+
+end Wayland;
+
-- 
cgit