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

--- Merging r31224 into '.':

Browse Source 
U    rtl/inc/system.fpd
--- Recording mergeinfo for merge of r31224 into '.':
 U   .

# revisions: 31224

git-svn-id: branches/fixes_3_0@31227 -
This commit is contained in:
marco 2015-07-25 10:24:30 +00:00
parent c52bae5b03
commit e7672ae7d0
1 changed files with 3 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

4
rtl/inc/system.fpd
View File

@ -78,7 +78,9 @@ Function Slice(Const A : ArrayType; ACount : Integer) : ArrayType2;
Function TypeInfo(Const T : AnyType) : Pointer;
Procedure Fail;
Function TypeOf(T : TObjectType) : Pointer;
Procedure Initialize(Var T : TAnyType; ACount : Integer = 1);
Procedure Finalize(Var T : TAnyType; ACount : Integer = 1);
{$IFNDEF GO32V2}
Var
mem : array[0..$7fffffff-1] of byte;