Explorar el Código

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

git-svn-id: trunk@5714 -
Károly Balogh hace 18 años
padre
commit
121a5c3cb8
Se han modificado 1 ficheros con 5 adiciones y 1 borrados
  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;