浏览代码

* always use unified assembler syntax on Darwin (required by Xcode 7+)

git-svn-id: trunk@31805 -
Jonas Maebe 9 年之前
父节点
当前提交
840c043c75
共有 1 个文件被更改,包括 10 次插入0 次删除
  1. 10 0
      compiler/arm/agarmgas.pas

+ 10 - 0
compiler/arm/agarmgas.pas

@@ -49,6 +49,7 @@ unit agarmgas;
 
       TArmAppleGNUAssembler=class(TAppleGNUassembler)
         constructor create(info: pasminfo; smart: boolean); override;
+        procedure WriteExtraHeader; override;
       end;
 
 
@@ -142,6 +143,15 @@ unit agarmgas;
       begin
         inherited;
         InstrWriter := TArmInstrWriter.create(self);
+        TArmInstrWriter(InstrWriter).unified_syntax:=true;
+      end;
+
+
+    procedure TArmAppleGNUAssembler.WriteExtraHeader;
+      begin
+        inherited WriteExtraHeader;
+        if TArmInstrWriter(InstrWriter).unified_syntax then
+          writer.AsmWriteLn(#9'.syntax unified');
       end;