[gtkada] GNOME problem

[Alexandr Darkman]

Hi,
Help, please.

with this program :
---
with Gtk.Main,
	 Gtk.Enums,
	 Gtk.Window,
	 GNOME,
	 Ada.Text_IO;

use Gtk.Main,
	Gtk.Enums,
	Gtk.Window,
	Ada.Text_IO;

package body PWE is

	exInit: exception;

	procedure Main is
		begin
			Gtk.Main.Set_Locale;
			Gtk.Main.Init;
			if not GNOME.Init("PWE","1") then
				raise exInit;
			end if;

			Gtk.Main.Main;
		exception
			when exInit =>
				Put_Line("*** Error: initialization failed");
		end Main;

end PWE;
---

I got the folowing error:
[23:07] (pts/2) darkman at darkman:~/Projects/pwe> ./pwe

(PWE:30699): GLib-GObject-WARNING **: specified class size for type
`GnomeClient' is smaller than the parent type's `GtkObject' class size

(PWE:30699): Gtk-CRITICAL **: file gtktypeutils.c: line 97 (gtk_type_new):
assertion `GTK_TYPE_IS_OBJECT (type)' failed

raised STORAGE_ERROR : stack overflow (or erroneous memory access)


What i am doing wrong ?

-- 
					       Alexandr Darkman
---------------------------------------------------------------
ISP IC Group, Chief System Administrator, ADL220-RIPE