Source position: gtkbutton.pp line 30
procedure set_relief(
var a: TGtkButton;
__button_down: guint
);