generic type Widget_Type is new Glib.Object.GObject_Record with private; type Return_Type is (<>); type User_Type (<>) is private; with procedure Setup (User_Data : User_Type; Id : Handler_Id); package User_Return_Callback_With_Setup is
package Internal_Cb is new User_Return_Callback (Widget_Type, Return_Type, User_Type);
package Marshallers renames Internal_Cb.Marshallers;
package Gint_Marshaller renames Internal_Cb.Gint_Marshaller;
package Guint_Marshaller renames Internal_Cb.Guint_Marshaller;
package Event_Marshaller renames Internal_Cb.Event_Marshaller;
package Widget_Marshaller renames Internal_Cb.Widget_Marshaller;
package Notebook_Page_Marshaller renames Internal_Cb.Notebook_Page_Marshaller;
type Widget_Type is new Glib.Object.GObject_Record with private;
subtype Handler is Internal_Cb.Handler;
subtype Simple_Handler is Internal_Cb.Simple_Handler;
procedure Setup
( | User_Data | : User_Type; |
Id | : Handler_Id); |
procedure Connect
( | Widget | : access Widget_Type'Class; |
Name | : Glib.Signal_Name; | |
Marsh | : Marshallers.Marshaller; | |
User_Data | : User_Type; | |
After | : Boolean := False); |
procedure Object_Connect
( | Widget | : access Glib.Object.GObject_Record'Class; |
Name | : Glib.Signal_Name; | |
Marsh | : Marshallers.Marshaller; | |
Slot_Object | : access Widget_Type'Class; | |
User_Data | : User_Type; | |
After | : Boolean := False); |
procedure Connect
( | Widget | : access Widget_Type'Class; |
Name | : Glib.Signal_Name; | |
Cb | : Handler; | |
User_Data | : User_Type; | |
After | : Boolean := False); |
procedure Object_Connect
( | Widget | : access Glib.Object.GObject_Record'Class; |
Name | : Glib.Signal_Name; | |
Cb | : Handler; | |
Slot_Object | : access Widget_Type'Class; | |
User_Data | : User_Type; | |
After | : Boolean := False); |
procedure Connect
( | Widget | : access Widget_Type'Class; |
Name | : Glib.Signal_Name; | |
Cb | : Simple_Handler; | |
User_Data | : User_Type; | |
After | : Boolean := False); |
procedure Object_Connect
( | Widget | : access Glib.Object.GObject_Record'Class; |
Name | : Glib.Signal_Name; | |
Cb | : Simple_Handler; | |
Slot_Object | : access Widget_Type'Class; | |
User_Data | : User_Type; | |
After | : Boolean := False); |
function Connect
( | Widget | : access Widget_Type'Class; |
Name | : Glib.Signal_Name; | |
Marsh | : Marshallers.Marshaller; | |
User_Data | : User_Type; | |
After | : Boolean := False) return Handler_Id; |
function Object_Connect
( | Widget | : access Glib.Object.GObject_Record'Class; |
Name | : Glib.Signal_Name; | |
Marsh | : Marshallers.Marshaller; | |
Slot_Object | : access Widget_Type'Class; | |
User_Data | : User_Type; | |
After | : Boolean := False) return Handler_Id; |
function Connect
( | Widget | : access Widget_Type'Class; |
Name | : Glib.Signal_Name; | |
Cb | : Handler; | |
User_Data | : User_Type; | |
After | : Boolean := False) return Handler_Id; |
function Object_Connect
( | Widget | : access Glib.Object.GObject_Record'Class; |
Name | : Glib.Signal_Name; | |
Cb | : Handler; | |
Slot_Object | : access Widget_Type'Class; | |
User_Data | : User_Type; | |
After | : Boolean := False) return Handler_Id; |
function To_Marshaller
( | Cb | : Gint_Marshaller.Handler) return Internal_Cb.Marshallers.Marshaller renames Internal_Cb.To_Marshaller; |
function To_Marshaller
( | Cb | : Guint_Marshaller.Handler) return Internal_Cb.Marshallers.Marshaller renames Internal_Cb.To_Marshaller; |
function To_Marshaller
( | Cb | : Event_Marshaller.Handler) return Internal_Cb.Marshallers.Marshaller renames Internal_Cb.To_Marshaller; |
function To_Marshaller
( | Cb | : Widget_Marshaller.Handler) return Internal_Cb.Marshallers.Marshaller renames Internal_Cb.To_Marshaller; |
function To_Marshaller
( | Cb | : Internal_Cb.Marshallers.Void_Marshaller.Handler) return Internal_Cb.Marshallers.Marshaller renames Internal_Cb.To_Marshaller; |
function To_Marshaller
( | Cb | : Notebook_Page_Marshaller.Handler) return Internal_Cb.Marshallers.Marshaller renames Internal_Cb.To_Marshaller; |
function Emit_By_Name
( | Object | : access Widget_Type'Class; |
Name | : Glib.Signal_Name; | |
Param | : Gint) return Return_Type renames Internal_Cb.Emit_By_Name; |
function Emit_By_Name
( | Object | : access Widget_Type'Class; |
Name | : Glib.Signal_Name; | |
Param | : Guint) return Return_Type renames Internal_Cb.Emit_By_Name; |
function Emit_By_Name
( | Object | : access Widget_Type'Class; |
Name | : Glib.Signal_Name; | |
Param | : Gdk.Event.Gdk_Event) return Return_Type renames Internal_Cb.Emit_By_Name; |
function Emit_By_Name
( | Object | : access Widget_Type'Class; |
Name | : Glib.Signal_Name; | |
Param | : access Gtk.Widget.Gtk_Widget_Record'Class) return Return_Type renames Internal_Cb.Emit_By_Name; |
function Emit_By_Name
( | Object | : access Widget_Type'Class; |
Name | : Glib.Signal_Name) return Return_Type renames Internal_Cb.Emit_By_Name; |
function Emit_By_Name
( | Object | : access Widget_Type'Class; |
Name | : Glib.Signal_Name; | |
Param | : Gtk.Notebook.Gtk_Notebook_Page) return Return_Type renames Internal_Cb.Emit_By_Name; |