瀏覽代碼

* fixed misplaced braces that caused all records to be passed by reference
on ppc64 with the mwpascal calling convention, instead of only the const
ones

git-svn-id: trunk@30219 -

Jonas Maebe 10 年之前
父節點
當前提交
a02fb7c794
共有 1 個文件被更改,包括 2 次插入1 次删除
  1. 2 1
      compiler/powerpc64/cpupara.pas

+ 2 - 1
compiler/powerpc64/cpupara.pas

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