소스 검색

+ workaround for old Amiga GNU AS, which vomits for .fpc sections

git-svn-id: trunk@5714 -
Károly Balogh 18 년 전
부모
커밋
121a5c3cb8
1개의 변경된 파일5개의 추가작업 그리고 1개의 파일을 삭제
  1. 5 1
      compiler/aggas.pas

+ 5 - 1
compiler/aggas.pas

@@ -286,7 +286,11 @@ implementation
           secname:=secnames_pic[atype]
         else
           secname:=secnames[atype];
-          
+{$ifdef m68k}
+        { old Amiga GNU AS doesn't support .section .fpc }
+        if (atype=sec_fpc) and (target_info.system = system_m68k_amiga) then
+            secname:=secnames[sec_data];
+{$endif}
         if (atype=sec_fpc) and (Copy(aname,1,3)='res') then
           begin
             result:=secname+'.'+aname;