Переглянути джерело

* made several OS interfacing records non-packed, since they are not packed
in the system headers either

git-svn-id: trunk@20652 -

Jonas Maebe 13 роки тому
батько
коміт
87f7d65650
3 змінених файлів з 3 додано та 3 видалено
  1. 1 1
      rtl/darwin/ptypes.inc
  2. 1 1
      rtl/darwin/signal.inc
  3. 1 1
      rtl/darwin/termios.inc

+ 1 - 1
rtl/darwin/ptypes.inc

@@ -99,7 +99,7 @@ type
     ptimeval = ^timeval;
     ptimeval = ^timeval;
     TTimeVal = timeval;
     TTimeVal = timeval;
 
 
-    timespec = packed record
+    timespec = record
       tv_sec   : time_t;
       tv_sec   : time_t;
       tv_nsec  : clong;
       tv_nsec  : clong;
     end;
     end;

+ 1 - 1
rtl/darwin/signal.inc

@@ -219,7 +219,7 @@
     SigActionHandler = procedure (Sig: cint; info : psiginfo; SigContext:PSigContext); cdecl;
     SigActionHandler = procedure (Sig: cint; info : psiginfo; SigContext:PSigContext); cdecl;
 
 
 
 
-    SigActionRec = packed record
+    SigActionRec = record
 {
 {
       case byte of
       case byte of
         0: (Sh: SignalHandler; Sa_Flags: longint; Sa_Mask: SigSet);
         0: (Sh: SignalHandler; Sa_Flags: longint; Sa_Mask: SigSet);

+ 1 - 1
rtl/darwin/termios.inc

@@ -151,7 +151,7 @@
 // as in linux freebsd netbsd and openbsd
 // as in linux freebsd netbsd and openbsd
 // Start
 // Start
 Type
 Type
-  winsize = packed record
+  winsize = record
     ws_row,
     ws_row,
     ws_col,
     ws_col,
     ws_xpixel,
     ws_xpixel,