浏览代码

* Make clongdouble 16 bytes on Darwin.

git-svn-id: trunk@8113 -
daniel 18 年之前
父节点
当前提交
c5ac7638ed
共有 1 个文件被更改,包括 1 次插入1 次删除
  1. 1 1
      rtl/inc/ctypes.pp

+ 1 - 1
rtl/inc/ctypes.pp

@@ -79,7 +79,7 @@ type
   {$define longdouble_assignment_overload}
   {$define longdouble_assignment_overload}
   clongdouble = packed record
   clongdouble = packed record
     value:extended;
     value:extended;
-  {$ifdef cpu64}
+  {$ifdef defined(cpu64) or defined(darwin)}
     padding:array[0..5] of byte;
     padding:array[0..5] of byte;
   {$else}
   {$else}
     padding:array[0..1] of byte;
     padding:array[0..1] of byte;