瀏覽代碼

* fix -Xn option

git-svn-id: trunk@14274 -
pierre 16 年之前
父節點
當前提交
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' :