aprutil.pas 1.3 KB

12345678910111213141516171819202122232425262728293031323334353637383940414243444546474849505152535455565758596061626364
  1. {
  2. aprutil.pas
  3. Copyright (C) 2006 Felipe Monteiro de Carvalho
  4. This unit is a pascal binding for the Apache 2.0.58 headers.
  5. The headers were released under the following copyright:
  6. }
  7. { Copyright 2000-2005 The Apache Software Foundation or its licensors, as
  8. * applicable.
  9. *
  10. * Licensed under the Apache License, Version 2.0 (the "License");
  11. * you may not use this file except in compliance with the License.
  12. * You may obtain a copy of the License at
  13. *
  14. * http://www.apache.org/licenses/LICENSE-2.0
  15. *
  16. * Unless required by applicable law or agreed to in writing, software
  17. * distributed under the License is distributed on an "AS IS" BASIS,
  18. * WITHOUT WARRANTIES OR CONDITIONS OF ANY KIND, either express or implied.
  19. * See the License for the specific language governing permissions and
  20. * limitations under the License.
  21. }
  22. unit aprutil;
  23. interface
  24. {$ifdef fpc}
  25. {$mode delphi}{$H+}
  26. {$endif}
  27. {$IFNDEF FPC}
  28. {$DEFINE WINDOWS}
  29. {$ENDIF}
  30. {$IFDEF WIN32}
  31. {$DEFINE WINDOWS}
  32. {$ENDIF}
  33. {$ifdef Unix}
  34. {$PACKRECORDS C}
  35. {$endif}
  36. uses
  37. {$ifdef WINDOWS}
  38. Windows,
  39. {$ENDIF}
  40. apr, ctypes;
  41. const
  42. {$IFDEF WINDOWS}
  43. LibAPRUtil = 'libaprutil.dll';
  44. {$ELSE}
  45. LibAPRUtil = '';
  46. {$ENDIF}
  47. {$include apr_xml.inc}
  48. {$include apr_uri.inc}
  49. {$include apr_md5.inc}
  50. implementation
  51. end.