Parcourir la source

* make TSettings packed so ppus containing generics are compatible regardless which compiler generated them

git-svn-id: trunk@13315 -
florian il y a 16 ans
Parent
commit
121875a374
1 fichiers modifiés avec 1 ajouts et 1 suppressions
  1. 1 1
      compiler/globals.pas

+ 1 - 1
compiler/globals.pas

@@ -104,7 +104,7 @@ interface
     type
        tcodepagestring = string[20];
 
-       tsettings = record
+       tsettings = packed record
          globalswitches  : tglobalswitches;
          moduleswitches  : tmoduleswitches;
          localswitches   : tlocalswitches;