浏览代码

* added more asmmode directives to make compilation more robust in case the asmmode is changed by configuration files, resolves #27255

git-svn-id: trunk@29589 -
florian 10 年之前
父节点
当前提交
c1091e1724
共有 4 个文件被更改,包括 7 次插入0 次删除
  1. 2 0
      rtl/linux/x86_64/si_c.inc
  2. 1 0
      rtl/linux/x86_64/si_dll.inc
  3. 2 0
      rtl/linux/x86_64/si_g.inc
  4. 2 0
      rtl/linux/x86_64/si_prc.inc

+ 2 - 0
rtl/linux/x86_64/si_c.inc

@@ -33,6 +33,8 @@
          argc <--- esp
          argc <--- esp
 }
 }
 
 
+{$asmmode gas}
+
 {$L abitag.o}
 {$L abitag.o}
 var
 var
   libc_environ: pchar; external name '__environ';
   libc_environ: pchar; external name '__environ';

+ 1 - 0
rtl/linux/x86_64/si_dll.inc

@@ -12,6 +12,7 @@
  
  
  **********************************************************************}
  **********************************************************************}
 
 
+{$asmmode gas}
 
 
 procedure PASCALMAIN; external name 'PASCALMAIN';
 procedure PASCALMAIN; external name 'PASCALMAIN';
 
 

+ 2 - 0
rtl/linux/x86_64/si_g.inc

@@ -33,6 +33,8 @@
          argc <--- esp
          argc <--- esp
 }
 }
 
 
+{$asmmode gas}
+
 var
 var
   libc_environ: pchar; external name '__environ';
   libc_environ: pchar; external name '__environ';
   libc_fpu_control: word; external name '__fpu_control';
   libc_fpu_control: word; external name '__fpu_control';

+ 2 - 0
rtl/linux/x86_64/si_prc.inc

@@ -31,6 +31,8 @@
 					NULL
 					NULL
 }
 }
 
 
+{$asmmode gas}
+
 {$L abitag.o}
 {$L abitag.o}
 
 
 procedure PASCALMAIN; external name 'PASCALMAIN';
 procedure PASCALMAIN; external name 'PASCALMAIN';