Source position: gtknotebook.pp line 86
procedure set_child_has_focus(
var a: TGtkNotebook;
__child_has_focus: guint
);