## Documentation

Table of Contents
Class Inheritance Tree
Widget Screenshots
Package groups

1.     -----------------------------------------------------------------------

2.     --               GtkAda - Ada95 binding for Gtk+/Gnome               --

3.     --                                                                   --

4.     --                Copyright (C) 2001-2002 ACT-Europe                 --

5.     --                                                                   --

6.     -- This library is free software; you can redistribute it and/or     --

7.     -- modify it under the terms of the GNU General Public               --

8.     -- License as published by the Free Software Foundation; either      --

9.     -- version 2 of the License, or (at your option) any later version.  --

10.     --                                                                   --

11.     -- This library is distributed in the hope that it will be useful,   --

12.     -- but WITHOUT ANY WARRANTY; without even the implied warranty of    --

13.     -- MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU --

14.     -- General Public License for more details.                          --

15.     --                                                                   --

16.     -- You should have received a copy of the GNU General Public         --

17.     -- License along with this library; if not, write to the             --

18.     -- Free Software Foundation, Inc., 59 Temple Place - Suite 330,      --

19.     -- Boston, MA 02111-1307, USA.                                       --

20.     --                                                                   --

21.     -- As a special exception, if other files instantiate generics from  --

22.     -- this unit, or you link this unit with other files to produce an   --

23.     -- executable, this  unit  does not  by itself cause  the resulting  --

24.     -- executable to be covered by the GNU General Public License. This  --

25.     -- exception does not however invalidate any other reasons why the   --

26.     -- executable file  might be covered by the  GNU Public License.     --

27.     -----------------------------------------------------------------------

29.     --  <description>

30.     --

31.     --  This package provides definitions for the error handling mechanism used in

32.     --  Glib, Gdk and Gtk.

33.     --

34.     --  </description>

35.     --  <c_version>1.3.11</c_version>

36.     --  <group>Glib, the general-purpose library</group>

38.     package Glib.ErrorTo API docTo specTo body is

39.        pragma Preelaborate;

41.        type GError is new C_ProxyTo API docTo spec;

43.        type GError_Access is access all GErrorTo API docTo spec;

45.        function Error_NewTo API docTo body

46.          (Domain : GQuarkTo API docTo spec; Code : GintTo API docTo spec; Message : String) return GErrorTo API docTo spec;

47.        --  Create a new GError object.

49.        procedure Error_FreeTo API docTo body (Error : GErrorTo API docTo spec);

50.        --  Free the memory associated with a GError.

52.        function Error_CopyTo API docTo body (Error : GErrorTo API docTo spec) return GErrorTo API docTo spec;

53.        --  Duplicate a GError object.

55.        function Error_MatchesTo API docTo body

56.          (Error : GErrorTo API docTo spec; Domain : GQuarkTo API docTo spec; Code : GintTo API docTo spec) return Boolean;

57.        --  Return whether a given GError matches a domain/code.

59.        function Get_DomainTo API docTo body (Error : GErrorTo API docTo spec) return GQuarkTo API docTo spec;

60.        --  Return the domain associated with a GError.

62.        function Get_CodeTo API docTo body (Error : GErrorTo API docTo spec) return GintTo API docTo spec;

63.        --  Return the code associated with a GError.

65.        function Get_MessageTo API docTo body (Error : GErrorTo API docTo spec) return String;

66.        --  Return the message associated with a GError.

68.     private

70.        pragma Import (C, Error_FreeTo API docTo spec, "g_error_free");

71.        pragma Import (C, Error_CopyTo API docTo spec, "g_error_copy");

73.     end Glib.ErrorTo API docTo specTo body;