GtkAda Problem

[Oliver Doerler <oliver.doerler@novatek.de>]

Hi!

Problem with GtkAda in Gtk.Main...

Def. from http://libre.act-europe.fr/GtkAda/docs/gtkada_rm_102.html#SEC444
---------------------------------
type Idle_Callback is access function return Boolean;

function Timeout_Add
   (Interval       : in     Guint32;
   Func            :        Timeout_Callback)
return Timeout_Handler_Id;
---------------------------------

My Code:
---------------------------------
function fidle return boolean is
begin
   Gtk.Fixed.Move (Container, Lkw, 40, 40);

   return true;
end fidle;

fidle_id := Gtk.Main.Idle_Add (fidle'access);
----------------------------------

gnatmake Message:
=>subprogram must not be deeper than access type



I can't see my misstake... help?! :)

Thanks!
Oliver Doerler