2
0

wordexph.inc 1.2 KB

1234567891011121314151617181920212223242526272829303132333435363738394041
  1. Const
  2. WRDE_DOOFFS = 1 shl 0;
  3. WRDE_APPEND = 1 shl 1;
  4. WRDE_NOCMD = 1 shl 2;
  5. WRDE_REUSE = 1 shl 3;
  6. WRDE_SHOWERR = 1 shl 4;
  7. WRDE_UNDEF = 1 shl 5;
  8. __WRDE_FLAGS = ((((WRDE_DOOFFS or WRDE_APPEND) or WRDE_NOCMD) or WRDE_REUSE) or WRDE_SHOWERR) or WRDE_UNDEF;
  9. Type
  10. Pwordexp_t = ^wordexp_t;
  11. wordexp_t = record
  12. we_wordc : size_t;
  13. we_wordv : ^Pchar;
  14. we_offs : size_t;
  15. end;
  16. Const
  17. WRDE_NOSYS = -(1);
  18. WRDE_NOSPACE = 1;
  19. WRDE_BADCHAR = 2;
  20. WRDE_BADVAL = 3;
  21. WRDE_CMDSUB = 4;
  22. WRDE_SYNTAX = 5;
  23. function wordexp(__words:Pchar; __pwordexp:Pwordexp_t; __flags:longint):longint;cdecl;external clib name 'wordexp';
  24. procedure wordfree(__wordexp:Pwordexp_t);cdecl;external clib name 'wordfree';
  25. { ---------------------------------------------------------------------
  26. Borland compatibility types
  27. ---------------------------------------------------------------------}
  28. Type
  29. TWordExp = wordexp_t;
  30. PWordExp = ^TWordExp;
  31. function wordexp(__words:Pchar; var __pwordexp: wordexp_t; __flags:longint):longint;cdecl;external clib name 'wordexp';
  32. procedure wordfree(var __wordexp: wordexp_t);cdecl;external clib name 'wordfree';