1------------------------------------------------------------------------------
2--                  GtkAda - Ada95 binding for Gtk+/Gnome                   --
3--                                                                          --
4--      Copyright (C) 1998-2000 E. Briot, J. Brobecker and A. Charlet       --
5--                     Copyright (C) 1998-2015, AdaCore                     --
6--                                                                          --
7-- This library is free software;  you can redistribute it and/or modify it --
8-- under terms of the  GNU General Public License  as published by the Free --
9-- Software  Foundation;  either version 3,  or (at your  option) any later --
10-- version. This library is distributed in the hope that it will be useful, --
11-- but WITHOUT ANY WARRANTY;  without even the implied warranty of MERCHAN- --
12-- TABILITY or FITNESS FOR A PARTICULAR PURPOSE.                            --
13--                                                                          --
14-- As a special exception under Section 7 of GPL version 3, you are granted --
15-- additional permissions described in the GCC Runtime Library Exception,   --
16-- version 3.1, as published by the Free Software Foundation.               --
17--                                                                          --
18-- You should have received a copy of the GNU General Public License and    --
19-- a copy of the GCC Runtime Library Exception along with this program;     --
20-- see the files COPYING3 and COPYING.RUNTIME respectively.  If not, see    --
21-- <http://www.gnu.org/licenses/>.                                          --
22--                                                                          --
23------------------------------------------------------------------------------
24
25--  <description>
26--
27--  This is the top level package of the Gdk hierarchy.
28--  It provides the type definitions used to access underlying C structures.
29--
30--  </description>
31--  <group>Gdk, the low-level API</group>
32
33with Glib;
34pragma Warnings (Off);
35with System;
36pragma Warnings (On);
37
38package Gdk is
39   --  A Gdk_Window, in gtk+, is really a GObject. That means it comes with
40   --  reference counting. Changing this in GtkAda would break a lot of code
41   --  though, so we only bind it as a C_Proxy, but provide Gdk.Window.Ref
42   --  and Gdk.Window.Unref to access the reference counting support.
43   type Gdk_Window is new Glib.C_Proxy;
44
45   type Gdk_Cursor is new Glib.C_Proxy;  --  private type in C
46   type Gdk_Visual is new Glib.C_Proxy;  --  private type in C
47   type Gdk_Window_Attr is new Glib.C_Proxy;
48end Gdk;
49