mirror of
https://gitlab.com/freepascal.org/fpc/source.git
synced 2025-05-02 03:55:20 +02:00
42 lines
1.2 KiB
PHP
42 lines
1.2 KiB
PHP
|
|
Const
|
|
WRDE_DOOFFS = 1 shl 0;
|
|
WRDE_APPEND = 1 shl 1;
|
|
WRDE_NOCMD = 1 shl 2;
|
|
WRDE_REUSE = 1 shl 3;
|
|
WRDE_SHOWERR = 1 shl 4;
|
|
WRDE_UNDEF = 1 shl 5;
|
|
__WRDE_FLAGS = ((((WRDE_DOOFFS or WRDE_APPEND) or WRDE_NOCMD) or WRDE_REUSE) or WRDE_SHOWERR) or WRDE_UNDEF;
|
|
|
|
Type
|
|
Pwordexp_t = ^wordexp_t;
|
|
wordexp_t = record
|
|
we_wordc : size_t;
|
|
we_wordv : ^Pchar;
|
|
we_offs : size_t;
|
|
end;
|
|
|
|
Const
|
|
WRDE_NOSYS = -(1);
|
|
WRDE_NOSPACE = 1;
|
|
WRDE_BADCHAR = 2;
|
|
WRDE_BADVAL = 3;
|
|
WRDE_CMDSUB = 4;
|
|
WRDE_SYNTAX = 5;
|
|
|
|
function wordexp(__words:Pchar; __pwordexp:Pwordexp_t; __flags:longint):longint;cdecl;external clib name 'wordexp';
|
|
procedure wordfree(__wordexp:Pwordexp_t);cdecl;external clib name 'wordfree';
|
|
|
|
|
|
{ ---------------------------------------------------------------------
|
|
Borland compatibility types
|
|
---------------------------------------------------------------------}
|
|
|
|
Type
|
|
TWordExp = wordexp_t;
|
|
PWordExp = ^TWordExp;
|
|
|
|
function wordexp(__words:Pchar; var __pwordexp: wordexp_t; __flags:longint):longint;cdecl;external clib name 'wordexp';
|
|
procedure wordfree(var __wordexp: wordexp_t);cdecl;external clib name 'wordfree';
|
|
|