Source position: gtkwindow.pp line 49
procedure set_auto_shrink(
var a: TGtkWindow;
__auto_shrink: guint
);