From 0b86daff6bc58119f2b0ad5324fd18857dfdb3c5 Mon Sep 17 00:00:00 2001 From: Jed Barber Date: Tue, 2 Jan 2018 21:05:54 +1100 Subject: Update from before Christmas --- src/wayland.ads | 14 +++++++++++++- 1 file changed, 13 insertions(+), 1 deletion(-) (limited to 'src/wayland.ads') diff --git a/src/wayland.ads b/src/wayland.ads index bfab18d..6c10b1c 100644 --- a/src/wayland.ads +++ b/src/wayland.ads @@ -9,6 +9,11 @@ private with package Wayland is + Wayland_Error : exception; + + + + type Unsigned_Integer is mod 2 ** 32; type Result is (Success, Failure); @@ -92,8 +97,15 @@ package Wayland is private + type Argument (Kind : Argument_Kind) is record + + end record; + + + + type Wayland_Object is new Ada.Finalization.Limited_Controlled with record - Void_Ptr : System.Address := System.Null_Address; + Void_Ptr : System.Address; end record; procedure Initialize -- cgit