* sparc uses wait4 as well

This commit is contained in:
florian 2004-08-18 21:03:35 +00:00
parent 65819e3b93
commit 5064ecaf57
3 changed files with 19 additions and 6 deletions

View File

@ -215,7 +215,7 @@ begin
begin
Intf_Decr_Ref(PPointer(Data)^);
PPointer(Data)^:=nil;
end;
end;
{$endif HASINTF}
tkDynArray:
fpc_dynarray_decr_ref(PPointer(Data)^,TypeInfo);
@ -381,7 +381,10 @@ procedure fpc_finalize_array(data,typeinfo : pointer;count,size : longint); [Pub
{
$Log$
Revision 1.13 2004-07-02 21:21:09 peter
Revision 1.14 2004-08-18 21:03:35 florian
* sparc uses wait4 as well
Revision 1.13 2004/07/02 21:21:09 peter
* decr ref doesn't reset pointer
* finalize resets pointer for astring,wstring

View File

@ -72,13 +72,13 @@ End;
function fpc_variant_to_dynarray(const v : variant;typeinfo : pointer) : pointer;compilerproc;
begin
{$warning TODO fpc_variant_to_dynarray}
{$warning TODO fpc_variant_to_dynarray}
result:=nil;
end;
function fpc_dynarray_to_variant(const v : variant;typeinfo : pointer) : pointer;compilerproc;
begin
{$warning TODO fpc_dynarray_to_variant}
{$warning TODO fpc_dynarray_to_variant}
result:=nil;
end;
@ -601,7 +601,10 @@ procedure initvariantmanager;
{
$Log$
Revision 1.17 2004-05-31 20:25:04 peter
Revision 1.18 2004-08-18 21:03:35 florian
* sparc uses wait4 as well
Revision 1.17 2004/05/31 20:25:04 peter
* removed warnings
Revision 1.16 2003/12/10 01:36:39 florian

View File

@ -307,6 +307,10 @@ End;
{$define WAIT4}
{$endif CPUx86_64}
{$ifdef CPUSPARC}
{$define WAIT4}
{$endif CPUSPARC}
function Fpwaitpid(pid : pid_t; stat_loc : pcint; options: cint): pid_t; [public, alias : 'FPC_SYSC_WAITPID'];
{
@ -539,7 +543,10 @@ end;
{
$Log$
Revision 1.28 2004-05-31 20:25:04 peter
Revision 1.29 2004-08-18 21:03:35 florian
* sparc uses wait4 as well
Revision 1.28 2004/05/31 20:25:04 peter
* removed warnings
Revision 1.27 2004/05/31 14:31:57 peter