/packages/gtk2/src/glib/gqueue.inc
Pascal | 36 lines | 19 code | 6 blank | 11 comment | 0 complexity | 65ece6c410b0791e832bb60291141008 MD5 | raw file
Possible License(s): LGPL-2.0, LGPL-2.1, LGPL-3.0
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