generic type User_Data_Type (<>) is private; with procedure Destroy (Data : in out User_Data_Type) is null; package Set_Search_Position_Func_User_Data is
type Gtk_Tree_View_Search_Position_Func is access procedure (Tree_View : not null access Gtk.Tree_View.Gtk_Tree_View_Record'Class; Search_Dialog : not null access Gtk.Widget.Gtk_Widget_Record'Class; User_Data : User_Data_Type);
procedure Destroy
( | Data | : in out User_Data_Type) is null; |
procedure Set_Search_Position_Func
( | Tree_View | : not null access Gtk.Tree_View.Gtk_Tree_View_Record'Class; |
Func | : Gtk_Tree_View_Search_Position_Func; | |
Data | : User_Data_Type); |