Ver código fonte

+ add {$packrecords c} to all units importing Objective-C records since
that's the alignment used by the system headers

git-svn-id: trunk@18115 -

Jonas Maebe 14 anos atrás
pai
commit
e0e326be8e

+ 1 - 0
packages/cocoaint/utils/cocoa-skel/src/CocoaAll.pas

@@ -3,6 +3,7 @@ unit CocoaAll;
 {$mode delphi}
 {$modeswitch objectivec1}
 {$modeswitch cvar} { for "external" after the semi-colon with external vars }
+{$packrecords c}
 
 interface
 

+ 1 - 0
packages/cocoaint/utils/cocoa-skel/src/CoreData.pas

@@ -1,6 +1,7 @@
 {$mode delphi}
 {$modeswitch cvar}
 {$modeswitch objectivec1}
+{$packrecords c}
 unit CoreData;
 interface
 uses

+ 2 - 1
packages/cocoaint/utils/cocoa-skel/src/WebKit.pas

@@ -3,6 +3,7 @@ unit WebKit;
 {$mode delphi}
 {$modeswitch cvar}
 {$modeswitch objectivec1}
+{$packrecords c}
 
 interface
 
@@ -66,4 +67,4 @@ implementation
 {$undef USER_PATCHES}
 
 {$undef IMPLEMENTATION}
-end.
+end.

+ 2 - 1
packages/cocoaint/utils/uikit-skel/src/iPhoneAll.pas

@@ -3,6 +3,7 @@ unit iPhoneAll;
 {$mode delphi}
 {$modeswitch objectivec1}
 {$modeswitch cvar}
+{$packrecords c}
 
 interface
 
@@ -105,4 +106,4 @@ implementation
 {$undef USER_PATCHES}
 
 {$undef IMPLEMENTATION}
-end.
+end.

+ 1 - 0
rtl/inc/objcbase.pp

@@ -18,6 +18,7 @@ unit objcbase;
 {$ifdef FPC_HAS_FEATURE_OBJECTIVEC1}
 
 {$modeswitch objectivec1}
+{$packrecords c}
 
 interface