Browse Source

qlunits: make sure everything is two byte aligned

git-svn-id: trunk@49392 -
Károly Balogh 4 years ago
parent
commit
54f761b4da

+ 1 - 0
packages/qlunits/src/qdos.pas

@@ -12,6 +12,7 @@
     MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.
 
  **********************************************************************}
+{$PACKRECORDS 2}
 
 unit qdos;
 

+ 1 - 1
packages/qlunits/src/qdos_sysvars.inc

@@ -12,7 +12,7 @@
     MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.
 
  **********************************************************************}
-
+{$PACKRECORDS 2}
 
 { This file holds the system variables for a QDOS system and uses
   the QDOS (original) naming convention. ND. }

+ 1 - 0
packages/qlunits/src/sms.pas

@@ -12,6 +12,7 @@
     MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.
 
  **********************************************************************}
+{$PACKRECORDS 2}
 
 unit sms;
 

+ 1 - 1
packages/qlunits/src/sms_sysvars.inc

@@ -12,7 +12,7 @@
     MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.
 
  **********************************************************************}
-
+{$PACKRECORDS 2}
 
 { This file holds the system variables for an SMSQ system and uses
   the SMSQ naming convention. ND. }