type Gnode_Traverse_Func type Gnode_Foreach_Func
type Element (<>) is private;
type Element_Access is access all Element;
procedure Glib_New (Node : out Gnode; Data : Element_Access)