fpc/packages/base/libc/dlfcnh.inc
2005-02-14 17:13:06 +00:00

34 lines
1.1 KiB
PHP

Const
RTLD_NEXT = Pointer(-1);
RTLD_DEFAULT = nil;
function dlopen(__file:Pchar; __mode:longint):pointer;cdecl;external clib name 'dlopen';
function dlclose(__handle:pointer):longint;cdecl;external clib name 'dlclose';
function dlsym(__handle:pointer; __name:Pchar):pointer;cdecl;external clib name 'dlsym';
function dlvsym(__handle:pointer; __name:Pchar; __version:Pchar):pointer;cdecl;external clib name 'dlvsym';
function dlerror:Pchar;cdecl;external clib name 'dlerror';
type
PDl_info = ^Dl_info;
Dl_info = record
dli_fname : Pchar;
dli_fbase : pointer;
dli_sname : Pchar;
dli_saddr : pointer;
end;
function dladdr(__address:pointer; __info:PDl_info):longint;cdecl;external clib name 'dladdr';
{ ---------------------------------------------------------------------
Borland compatibility types
---------------------------------------------------------------------}
Type
TDLInfo = Dl_info;
PDLInfo = ^TDLInfo;
function dladdr(__address:pointer; var __info: Dl_info):longint;cdecl;external clib name 'dladdr';