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

+ added correct alignment

Browse Source
This commit is contained in:
olle 2004-05-27 21:36:07 +00:00
parent 9be32ff5e7
commit 23c89ea193
1 changed files with 4 additions and 0 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

4
rtl/macos/macostp.inc
View File

@ -22,6 +22,9 @@
in MacOS Universal Headers. The prefix is to avoid name clashes
with FPC types.}
{$PACKRECORDS 2} {Alignment inherited from the m68k days}
{************** from Types.p ***************}
const
noErr = 0;
@ -407,4 +410,5 @@ function Munger (h: Mac_Handle; offset: LONGINT; ptr1: Mac_Ptr;
len1: LONGINT; ptr2: Mac_Ptr; len2: LONGINT): LONGINT;
external 'InterfaceLib';
{$PACKRECORDS NORMAL}