Explorar o código

* support custom section names for Darwin platforms

git-svn-id: trunk@32396 -
Jonas Maebe %!s(int64=9) %!d(string=hai) anos
pai
achega
d303e15eae
Modificáronse 1 ficheiros con 5 adicións e 0 borrados
  1. 5 0
      compiler/aggas.pas

+ 5 - 0
compiler/aggas.pas

@@ -1603,6 +1603,11 @@ implementation
       begin
         if (target_info.system in systems_darwin) then
           case atype of
+            sec_user:
+              begin
+                result:='.section '+aname;
+                exit;
+              end;
             sec_bss:
               { all bss (lcomm) symbols are automatically put in the right }
               { place by using the lcomm assembler directive               }