mirror of
https://gitlab.com/freepascal.org/fpc/source.git
synced 2025-10-19 17:51:58 +02:00
* sparc uses wait4 as well
This commit is contained in:
parent
65819e3b93
commit
5064ecaf57
@ -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
|
||||
|
||||
|
@ -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
|
||||
|
@ -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
|
||||
|
Loading…
Reference in New Issue
Block a user