浏览代码

* support custom section names for Darwin platforms

git-svn-id: trunk@32396 -
Jonas Maebe 9 年之前
父节点
当前提交
d303e15eae
共有 1 个文件被更改,包括 5 次插入0 次删除
  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               }