Source position: gtkhandlebox.inc line 79
procedure set_snap_edge(
var a: TGtkHandleBox;
__snap_edge: gint
);