Void Marshaller
procedure Call
(Widget : access Widget_Type'Class;
Params : Glib.Values.GValues;
Cb : General_Handler;
User_Data : User_Type)
procedure Emit_By_Name
(Object : access Widget_Type'Class;
Name : Glib.Signal_Name)
type Handler is access procedure
(Widget : access Widget_Type'Class;
User_Data : User_Type);
function To_Marshaller (Cb : Handler) return Marshaller