generic type User_Data_Type (<>) is private; with procedure Destroy (Data : in out User_Data_Type) is null; package Foreach_User_Data is
type Gtk_Accel_Map_Foreach is access procedure (Data : User_Data_Type; Accel_Path : UTF8_String; Accel_Key : Gdk.Types.Gdk_Key_Type; Accel_Mods : Gdk.Types.Gdk_Modifier_Type; Changed : Boolean);
procedure Destroy
( | Data | : in out User_Data_Type) is null; |
procedure Foreach
( | Data | : User_Data_Type; |
Foreach_Func | : Gtk_Accel_Map_Foreach); |