## Documentation

Table of Contents
Class Inheritance Tree
Widget Screenshots
Package groups

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

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

3.     --                                                                   --

4.     --   Copyright (C) 1998-2000 E. Briot, J. Brobecker and A. Charlet   --

5.     --                Copyright (C) 2000-2001 ACT-Europe                 --

6.     --                                                                   --

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

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

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

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

11.     --                                                                   --

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

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

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

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

16.     --                                                                   --

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

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

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

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

21.     --                                                                   --

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

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

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

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

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

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

28.     -----------------------------------------------------------------------

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

31.     with Glib.EnumsTo API docTo spec; use Glib.EnumsTo API docTo spec;

33.     package Glib.GnodesTo API docTo specTo body is

35.        type Gnode is new C_ProxyTo API docTo spec;

37.        --  pop_allocator

38.        --  push_allocator

40.        function Child_PositionTo API docTo body (Node  : in GnodeTo API docTo spec; Child : in GnodeTo API docTo spec) return GintTo API docTo spec;

42.        function DepthTo API docTo body (Node : in GnodeTo API docTo spec) return GuintTo API docTo spec;

44.        procedure DestroyTo API docTo body (Node : in out GnodeTo API docTo spec);

46.        function First_ChildTo API docTo body (Node : in GnodeTo API docTo spec) return GnodeTo API docTo spec;

48.        function First_SiblingTo API docTo body (Node : in GnodeTo API docTo spec) return GnodeTo API docTo spec;

50.        function Get_RootTo API docTo body (Node : in GnodeTo API docTo spec) return GnodeTo API docTo spec;

52.        procedure InsertTo API docTo body

53.          (Parent   : in out GnodeTo API docTo spec;

54.           Position : in     GintTo API docTo spec;

55.           Node     : in out GnodeTo API docTo spec);

57.        procedure Insert_BeforeTo API docTo body

58.          (Parent  : in out GnodeTo API docTo spec;

59.           Sibling : in out GnodeTo API docTo spec;

60.           Node    : in out GnodeTo API docTo spec);

62.        function Is_AncestorTo API docTo body

63.          (Node       : in GnodeTo API docTo spec;

64.           Descendant : in GnodeTo API docTo spec) return Boolean;

66.        function Is_LeafTo API docTo body (Node : in GnodeTo API docTo spec) return Boolean;

68.        function Is_RootTo API docTo body (Node : in GnodeTo API docTo spec) return Boolean;

70.        function Last_ChildTo API docTo body (Node : in GnodeTo API docTo spec) return GnodeTo API docTo spec;

72.        function Last_SiblingTo API docTo body (Node : in GnodeTo API docTo spec) return GnodeTo API docTo spec;

74.        function Max_HeightTo API docTo body (Root : in GnodeTo API docTo spec) return GuintTo API docTo spec;

76.        function N_NodesTo API docTo body

77.          (Root  : in GnodeTo API docTo spec; Flags : in Glib_Traverse_FlagsTo API docTo spec) return GuintTo API docTo spec;

79.        function Next_SiblingTo API docTo body (Node : in GnodeTo API docTo spec) return GnodeTo API docTo spec;

81.        function Nth_ChildTo API docTo body (Node : in GnodeTo API docTo spec; N : in GuintTo API docTo spec) return GnodeTo API docTo spec;

83.        procedure PrependTo API docTo body (Parent : in out GnodeTo API docTo spec; Node : in out GnodeTo API docTo spec);

85.        function Prev_SiblingTo API docTo body (Node : in GnodeTo API docTo spec) return GnodeTo API docTo spec;

87.        procedure Reverse_ChildrenTo API docTo body (Node : in out GnodeTo API docTo spec);

89.        procedure UnlinkTo API docTo body (Node : in out GnodeTo API docTo spec);

91.        generic

92.           type Element (<>) is private;

93.           type Element_Access is access all ElementTo API docTo spec;

94.        package Gnode_DataTo API docTo body is

96.           --  type Gnode_Traverse_Func

97.           --  type Gnode_Foreach_Func

99.           --  child_index

100.           --  children_foreach

101.           --  find

102.           --  find_child

104.           procedure Glib_NewTo API docTo body (Node : out GnodeTo API docTo spec; Data : in Element_AccessTo API docTo spec);

106.           --  traverse

107.        end Gnode_DataTo API docTo specTo body;

109.     private

110.        pragma Import (C, Child_PositionTo API docTo spec, "g_node_child_position");

111.        pragma Import (C, DepthTo API docTo spec, "g_node_depth");

112.        pragma Import (C, First_ChildTo API docTo spec, "ada_gnode_first_child");

113.        pragma Import (C, First_SiblingTo API docTo spec, "g_node_first_sibling");

114.        pragma Import (C, Get_RootTo API docTo spec, "g_node_get_root");

115.        pragma Import (C, InsertTo API docTo spec, "g_node_insert");

116.        pragma Import (C, Insert_BeforeTo API docTo spec, "g_node_insert_before");

117.        pragma Import (C, Last_ChildTo API docTo spec, "g_node_last_child");

118.        pragma Import (C, Last_SiblingTo API docTo spec, "g_node_last_sibling");

119.        pragma Import (C, Max_HeightTo API docTo spec, "g_node_max_height");

120.        pragma Import (C, Next_SiblingTo API docTo spec, "ada_gnode_next_sibling");

121.        pragma Import (C, Nth_ChildTo API docTo spec, "g_node_nth_child");

122.        pragma Import (C, PrependTo API docTo spec, "g_node_prepend");

123.        pragma Import (C, Prev_SiblingTo API docTo spec, "ada_gnode_prev_sibling");

124.        pragma Import (C, Reverse_ChildrenTo API docTo spec, "g_node_reverse_children");

125.        pragma Import (C, UnlinkTo API docTo spec, "g_node_unlink");

126.     end Glib.GnodesTo API docTo specTo body;