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

* fixed misplaced braces that caused all records to be passed by reference

Browse Source 
on ppc64 with the mwpascal calling convention, instead of only the const
    ones

git-svn-id: trunk@30219 -
This commit is contained in:
Jonas Maebe 2015-03-14 18:36:35 +00:00
parent 7bc66a5142
commit a02fb7c794
1 changed files with 2 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

3
compiler/powerpc64/cpupara.pas
View File

@ -178,7 +178,8 @@ begin
procvardef,
recorddef:
result :=
((varspez = vs_const) and
(varspez = vs_const) and
(
(
(not (calloption in [pocall_cdecl, pocall_cppdecl]) and
(def.size > 8))