generic type Widget_Type is new Gtk_Widget_Record with private; with procedure Realize_Proc (Widget : access Widget_Type'Class); package Realize_Handling is
type Widget_Type is new Gtk_Widget_Record with private;
procedure Realize_Proc
( | Widget | : access Widget_Type'Class); |
procedure Set_Realize
( | Widget | : access Gtk_Widget_Record'Class); |