Source position: gtklist.inc line 60
procedure set_drag_selection(
var a: TGtkList;
__drag_selection: guint
);