Просмотр исходного кода

* fix -Xn option

git-svn-id: trunk@14274 -
pierre 16 лет назад
Родитель
Сommit
1fffaf627e
1 измененных файлов с 2 добавлено и 2 удалено
  1. 2 2
      compiler/options.pas

+ 2 - 2
compiler/options.pas

@@ -1620,9 +1620,9 @@ begin
                     'n' :
                       begin
                         If UnsetBool(More, j) then
-                          include(init_settings.globalswitches,cs_link_native)
+                          exclude(init_settings.globalswitches,cs_link_native)
                         else
-                          exclude(init_settings.globalswitches,cs_link_native);
+                          include(init_settings.globalswitches,cs_link_native);
                       end;
 
                     'm' :