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

m68k: when calling g_concatcopy for para copy, still only copy cgpara.intsize amount of bytes

Browse Source 
git-svn-id: trunk@36603 -
This commit is contained in:
Károly Balogh 2017-06-26 19:40:13 +00:00
parent 09a8cafcd7
commit d5e1b391f9
1 changed files with 1 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
compiler/m68k/cgcpu.pas
View File

@ -385,7 +385,7 @@ unit cgcpu;
len:=align(cgpara.intsize,cgpara.alignment);
g_stackpointer_alloc(list,len);
reference_reset_base(href,NR_STACK_POINTER_REG,0,cgpara.alignment,[]);
g_concatcopy(list,r,href,len);
g_concatcopy(list,r,href,cgpara.intsize);
end
else
begin