Source position: lazgobject2.pas line 560
type TGClassInitFunc = procedure(
g_class: PGTypeClass;
class_data: gpointer
);