Преглед изворни кода

AROS: 32/64-bit fix field alignment for unit conunit

Make sure AROS' record structures are C-packed.
magorium пре 3 година
родитељ
комит
5a0d76e45a
1 измењених фајлова са 1 додато и 1 уклоњено
  1. 1 1
      packages/arosunits/src/conunit.pas

+ 1 - 1
packages/arosunits/src/conunit.pas

@@ -40,7 +40,7 @@ const
 
 
 
 
 type
 type
-  {$PACKRECORDS 2}
+  {$PACKRECORDS C}
   PConUnit = ^TConUnit;
   PConUnit = ^TConUnit;
   TConUnit = record
   TConUnit = record
     cu_MP: TMsgPort;
     cu_MP: TMsgPort;