dict.inc 1.3 KB

1234567891011121314151617181920212223242526272829303132333435363738394041424344
  1. (*
  2. * Summary: string dictionnary
  3. * Description: dictionary of reusable strings, just used to avoid allocation
  4. * and freeing operations.
  5. *
  6. * Copy: See Copyright for the status of this software.
  7. *
  8. * Author: Daniel Veillard
  9. *)
  10. (*
  11. * The dictionnary
  12. *)
  13. {$IFDEF POINTER}
  14. xmlDictPtr = ^xmlDict;
  15. {$ENDIF}
  16. {$IFDEF TYPE}
  17. xmlDict = record end;
  18. {$ENDIF}
  19. {$IFDEF FUNCTION}
  20. (*
  21. * Constructor and destructor.
  22. *)
  23. function xmlDictCreate: xmlDictPtr; EXTDECL; external xml2lib;
  24. function xmlDictCreateSub(sub: xmlDictPtr): xmlDictPtr; EXTDECL; external xml2lib;
  25. function xmlDictReference(dict: xmlDictPtr): cint; EXTDECL; external xml2lib;
  26. procedure xmlDictFree(dict: xmlDictPtr); EXTDECL; external xml2lib;
  27. (*
  28. * Lookup of entry in the dictionnary.
  29. *)
  30. function xmlDictLookup(dict: xmlDictPtr; name: xmlCharPtr; len: cint): xmlCharPtr; EXTDECL; external xml2lib;
  31. function xmlDictExists(dict: xmlDictPtr; name: xmlCharPtr; len: cint): xmlCharPtr; EXTDECL; external xml2lib;
  32. function xmlDictQLookup(dict: xmlDictPtr; prefix, name: xmlCharPtr): xmlCharPtr; EXTDECL; external xml2lib;
  33. function xmlDictOwns(dict: xmlDictPtr; str: xmlCharPtr): cint; EXTDECL; external xml2lib;
  34. function xmlDictOwns(dict: xmlDictPtr): cint; EXTDECL; external xml2lib;
  35. (*
  36. * Cleanup function
  37. *)
  38. procedure xmlDictCleanup; EXTDECL; external xml2lib;
  39. {$ENDIF}