gcache.inc 1.4 KB

12345678910111213141516171819202122232425262728
  1. // included by glib2.pas
  2. {$IFDEF read_forward_definitions}
  3. {$ENDIF read_forward_definitions}
  4. //------------------------------------------------------------------------------
  5. {$IFDEF read_interface_types}
  6. PGCache = pointer;
  7. TGCacheNewFunc = function (key:gpointer):gpointer;cdecl;
  8. TGCacheDupFunc = function (value:gpointer):gpointer;cdecl;
  9. TGCacheDestroyFunc = procedure (value:gpointer);cdecl;
  10. {$ENDIF read_interface_types}
  11. //------------------------------------------------------------------------------
  12. {$IFDEF read_interface_rest}
  13. function g_cache_new(value_new_func:TGCacheNewFunc; value_destroy_func:TGCacheDestroyFunc; key_dup_func:TGCacheDupFunc; key_destroy_func:TGCacheDestroyFunc; hash_key_func:TGHashFunc;
  14. hash_value_func:TGHashFunc; key_equal_func:TGEqualFunc):PGCache;cdecl;external gliblib name 'g_cache_new';
  15. procedure g_cache_destroy(cache:PGCache);cdecl;external gliblib name 'g_cache_destroy';
  16. function g_cache_insert(cache:PGCache; key:gpointer):gpointer;cdecl;external gliblib name 'g_cache_insert';
  17. procedure g_cache_remove(cache:PGCache; value:gconstpointer);cdecl;external gliblib name 'g_cache_remove';
  18. procedure g_cache_key_foreach(cache:PGCache; func:TGHFunc; user_data:gpointer);cdecl;external gliblib name 'g_cache_key_foreach';
  19. procedure g_cache_value_foreach(cache:PGCache; func:TGHFunc; user_data:gpointer);cdecl;external gliblib name 'g_cache_value_foreach';
  20. {$ENDIF read_interface_rest}