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

* fixed compilation on non sigbusing cpus

Browse Source 
git-svn-id: trunk@8829 -
This commit is contained in:
florian 2007-10-16 21:14:41 +00:00
parent 9ca132c61b
commit 4b69743c92
1 changed files with 2 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
rtl/inc/generic.inc
View File

@ -464,8 +464,8 @@ begin
inc(pdest);
inc(psrc);
end
{$endif FPC_REQUIRES_PROPER_ALIGNMENT}
else
{$endif FPC_REQUIRES_PROPER_ALIGNMENT}
while psrc<pend do
begin
b:=(ptrint(psrc^)-ptrint(pdest^));