Преглед на файлове

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

git-svn-id: trunk@13315 -
florian преди 16 години
родител
ревизия
121875a374
променени са 1 файла, в които са добавени 1 реда и са изтрити 1 реда
  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;