/packages/gtk2/src/glib/gqueue.inc

 1// included by glib2.pas
 2
 3{$IFDEF read_forward_definitions}
 4{$ENDIF read_forward_definitions}
 5
 6//------------------------------------------------------------------------------
 7
 8{$IFDEF read_interface_types}
 9  PGQueue = ^TGQueue;
10  TGQueue = record
11    head   : PGList;
12    tail   : PGList;
13    length : guint;
14  end;
15{$ENDIF read_interface_types}
16
17//------------------------------------------------------------------------------
18
19{$IFDEF read_interface_rest}
20{ Queues }
21
22function  g_queue_new:PGQueue;cdecl;external gliblib name 'g_queue_new';
23procedure g_queue_free(queue:PGQueue);cdecl;external gliblib name 'g_queue_free';
24procedure g_queue_push_head(queue:PGQueue; data:gpointer);cdecl;external gliblib name 'g_queue_push_head';
25procedure g_queue_push_tail(queue:PGQueue; data:gpointer);cdecl;external gliblib name 'g_queue_push_tail';
26function  g_queue_pop_head(queue:PGQueue):gpointer;cdecl;external gliblib name 'g_queue_pop_head';
27function  g_queue_pop_tail(queue:PGQueue):gpointer;cdecl;external gliblib name 'g_queue_pop_tail';
28function  g_queue_is_empty(queue:PGQueue):gboolean;cdecl;external gliblib name 'g_queue_is_empty';
29function  g_queue_peek_head(queue:PGQueue):gpointer;cdecl;external gliblib name 'g_queue_peek_head';
30function  g_queue_peek_tail(queue:PGQueue):gpointer;cdecl;external gliblib name 'g_queue_peek_tail';
31procedure g_queue_push_head_link(queue:PGQueue; link:PGList);cdecl;external gliblib name 'g_queue_push_head_link';
32procedure g_queue_push_tail_link(queue:PGQueue; link:PGList);cdecl;external gliblib name 'g_queue_push_tail_link';
33function  g_queue_pop_head_link(queue:PGQueue):PGList;cdecl;external gliblib name 'g_queue_pop_head_link';
34function  g_queue_pop_tail_link(queue:PGQueue):PGList;cdecl;external gliblib name 'g_queue_pop_tail_link';
35{$ENDIF read_interface_rest}
36// included by glib2.pas