Source position: gtkpaned.inc line 89
procedure set_child2_shrink(
var a: TGtkPaned;
__child2_shrink: guint
);