generic type Base_Type is new Gtk.Widget.Gtk_Widget_Record with private; type Access_Type is access all Base_Type'Class; package Generic_Widget_Marshaller is
type Base_Type is new Gtk.Widget.Gtk_Widget_Record with private;
type Access_Type is access all Base_Type'Class;
type Handler is access function (Widget : access Widget_Type'Class; Param : access Base_Type'Class) return Return_Type;
function To_Marshaller
( | Cb | : Handler) return Marshaller; |
function Emit_By_Name
( | Object | : access Widget_Type'Class; |
Name | : Glib.Signal_Name; | |
Param | : access Base_Type'Class) return Return_Type; |