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

Revert aligntoptr to RTTIAlign rename

Browse Source 
git-svn-id: trunk@29739 -
This commit is contained in:
pierre 2015-02-17 07:35:31 +00:00
parent 44fb01eae6
commit f56990ee29
1 changed files with 1 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
rtl/inc/system.inc
View File

@ -398,7 +398,7 @@ end;
{$i gencurr.inc} {$i gencurr.inc}
function RTTIAlign(p : pointer) : pointer;inline; function aligntoptr(p : pointer) : pointer;inline;
begin begin
{$ifdef FPC_REQUIRES_PROPER_ALIGNMENT} {$ifdef FPC_REQUIRES_PROPER_ALIGNMENT}
result:=align(p,sizeof(p)); result:=align(p,sizeof(p));