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