paweld/fpc
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/fpc/source.git synced 2025-04-05 15:47:54 +02:00
Code Issues Packages Projects Releases Wiki Activity

* Add pthread_mutex_timedlock, sem_timedwait may be needed in future

Browse Source
This commit is contained in:
Michaël Van Canneyt 2023-11-10 14:13:13 +01:00
parent d989fb9a15
commit f0b714d5ad
2 changed files with 6 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

4
rtl/freebsd/pthread.inc
View File

@ -90,7 +90,8 @@ function pthread_self:pthread_t; cdecl;external;
function pthread_mutex_init (p:ppthread_mutex_t;o:ppthread_mutex_attr_t):cint; cdecl;external;
function pthread_mutex_destroy (p:ppthread_mutex_attr_t):cint; cdecl;external;
function pthread_mutex_lock (p:ppthread_mutex_attr_t):cint; cdecl;external;
function pthread_mutex_trylock (p:ppthread_mutex_attr_t):cint; cdecl;external;
function pthread_mutex_timedlock(__mutex:ppthread_mutex_t; __abs_timeout:ptimespec):longint;cdecl; external;
function pthread_mutex_trylock(p:ppthread_mutex_attr_t):cint; cdecl;external;
function pthread_mutex_unlock (p:ppthread_mutex_attr_t):cint; cdecl;external;
function pthread_cancel(_para1:pthread_t):cint;cdecl;external;
function pthread_detach(_para1:pthread_t):cint;cdecl;external;
@ -109,6 +110,7 @@ function sem_close(__sem:Psem_t):cint;cdecl;external ;
function sem_unlink(__name:PAnsiChar):cint;cdecl;external ;
function sem_wait(__sem:Psem_t):cint;cdecl;external ;
function sem_trywait(__sem:Psem_t):cint;cdecl;external ;
function sem_timedwait (__sem:Psem_t; __abs_timeout:ptimespec):longint;cdecl;external;
function sem_post(__sem:Psem_t):cint;cdecl;external ;
function sem_getvalue(__sem:Psem_t; __sval:Pcint):cint;cdecl;external;
function pthread_mutexattr_init(_para1:Ppthread_mutexattr_t):cint;cdecl;external;

3
rtl/linux/pthread.inc
View File

@ -139,6 +139,7 @@ Type
function pthread_mutex_init(__mutex:ppthread_mutex_t; __mutex_attr:ppthread_mutexattr_t):longint;cdecl;external;
function pthread_mutex_destroy(__mutex:ppthread_mutex_t):longint;cdecl;external;
function pthread_mutex_trylock(__mutex:ppthread_mutex_t):longint;cdecl;external;
function pthread_mutex_timedlock(__mutex:ppthread_mutex_t; __abs_timeout:ptimespec):longint;cdecl;external;
function pthread_mutex_lock(__mutex:ppthread_mutex_t):longint;cdecl;external;
function pthread_mutex_unlock(__mutex:ppthread_mutex_t):longint;cdecl;external;
function pthread_mutexattr_init(__attr:ppthread_mutexattr_t):longint;cdecl;external;
@ -221,6 +222,7 @@ Var
pthread_mutex_init : Function(__mutex:ppthread_mutex_t; __mutex_attr:ppthread_mutexattr_t):longint;cdecl;
pthread_mutex_destroy : Function(__mutex:ppthread_mutex_t):longint;cdecl;
pthread_mutex_trylock : Function(__mutex:ppthread_mutex_t):longint;cdecl;
pthread_mutex_timedlock : Function(__mutex:ppthread_mutex_t; __abs_timeout:ptimespec):longint;cdecl;
pthread_mutex_lock : Function(__mutex:ppthread_mutex_t):longint;cdecl;
pthread_mutex_unlock : Function(__mutex:ppthread_mutex_t):longint;cdecl;
pthread_mutexattr_init : Function(__attr:ppthread_mutexattr_t):longint;cdecl;
@ -316,6 +318,7 @@ begin
Pointer(pthread_mutex_init) := dlsym(PthreadDLL,'pthread_mutex_init');
Pointer(pthread_mutex_destroy) := dlsym(PthreadDLL,'pthread_mutex_destroy');
Pointer(pthread_mutex_trylock) := dlsym(PthreadDLL,'pthread_mutex_trylock');
Pointer(pthread_mutex_timedlock) := dlsym(PthreadDLL,'pthread_mutex_timedlock');
Pointer(pthread_mutex_lock) := dlsym(PthreadDLL,'pthread_mutex_lock');
Pointer(pthread_mutex_unlock) := dlsym(PthreadDLL,'pthread_mutex_unlock');
Pointer(pthread_mutexattr_init) := dlsym(PthreadDLL,'pthread_mutexattr_init');