os4units: TInterfaceData must be 4 byte aligned, and TNode is only 14 bytes

git-svn-id: trunk@35269 -

packages/os4units/src/exec.pas

@@ -1019,6 +1019,8 @@ const
 
   CMD_NONSTD  = 9;
 
+{$PUSH}
+{$PACKRECORDS C}
 //**********************************************************************
 // The interface is the new way for exec libraries.
 // Basically, the interface is embedded in a table of
@@ -1026,7 +1028,6 @@ const
 //
 // FIXME: Add some more documentation
 type
-
   TInterfaceData = record
     Link: TNode;             // Node for linking several interfaces
     LibBase: PLibrary;       // Library this interface belongs to
@@ -1048,6 +1049,7 @@ type
     // some functions, calling convention?
   end;
   PInterface = ^TInterface;
+{$POP}
 
 const
 // Flags for the Flags field in interfaces and as flags parameter for GetInterface