ソースを参照

* changed default packenum for MacPas from 1 to 2 (compatible with Metrowerks)

git-svn-id: trunk@1971 -
Jonas Maebe 19 年 前
コミット
ef2a0c7ddf
1 ファイル変更4 行追加2 行削除
  1. 4 2
      compiler/scanner.pas

+ 4 - 2
compiler/scanner.pas

@@ -309,9 +309,11 @@ implementation
             end;
            { Default enum packing for delphi/tp7 }
            if (m_tp7 in aktmodeswitches) or
-              (m_delphi in aktmodeswitches) or
-              (m_mac in aktmodeswitches) then
+              (m_delphi in aktmodeswitches) then
              aktpackenum:=1
+           else if (m_mac in aktmodeswitches) then
+             { compatible with Metrowerks Pascal }
+             aktpackenum:=2
            else
              aktpackenum:=4;
            if changeinit then