pthread_setcanceltype

This commit is contained in:
Pavel 2023-01-27 15:16:39 +03:00
parent 61761f251e
commit 77973d5196
2 changed files with 12 additions and 1 deletions

View File

@ -1356,6 +1356,7 @@ begin
lib^.set_proc($149AD3E4BB940405,@ps4_pthread_exit);
lib^.set_proc($959CC5792C4F974F,@ps4_pthread_setcancelstate);
lib^.set_proc($D9D121BEF8E5AB7D,@ps4_pthread_setcanceltype);
lib^.set_proc($128B51F1ADC049FE,@ps4_pthread_self);
lib^.set_proc($688F8E782CFCC6B4,@ps4_scePthreadSelf);

View File

@ -31,6 +31,7 @@ procedure ps4_scePthreadExit(value_ptr:Pointer); SysV_ABI_CDecl;
procedure ps4_pthread_exit(value_ptr:Pointer); SysV_ABI_CDecl;
function ps4_pthread_setcancelstate(state:Integer;oldstate:PInteger):Integer; SysV_ABI_CDecl;
function ps4_pthread_setcanceltype (_type:Integer;oldtype:PInteger):Integer; SysV_ABI_CDecl;
function ps4_pthread_self():pthread; SysV_ABI_CDecl;
function ps4_scePthreadSelf():pthread; SysV_ABI_CDecl;
@ -469,14 +470,23 @@ end;
function ps4_pthread_setcancelstate(state:Integer;oldstate:PInteger):Integer; SysV_ABI_CDecl;
begin
Result:=0;
Case state of
PTHREAD_CANCEL_DISABLE:{Writeln('PTHREAD_CANCEL_DISABLE')};
PTHREAD_CANCEL_ENABLE :{Writeln('PTHREAD_CANCEL_ENABLE')};
else
Exit(EINVAL);
end;
end;
function ps4_pthread_setcanceltype(_type:Integer;oldtype:PInteger):Integer; SysV_ABI_CDecl;
begin
Result:=0;
Case _type of
PTHREAD_CANCEL_DEFERRED :;
PTHREAD_CANCEL_ASYNCHRONOUS:;
else
Exit(EINVAL);
end;
end;
function ps4_pthread_self():pthread; SysV_ABI_CDecl;