Browse Source

* emit sec_fpc as sec_data, because custom section names aren't supported

git-svn-id: branches/wasm@46848 -
nickysn 4 years ago
parent
commit
5c27030faf
1 changed files with 2 additions and 0 deletions
  1. 2 0
      compiler/wasm32/agllvmmc.pas

+ 2 - 0
compiler/wasm32/agllvmmc.pas

@@ -114,6 +114,8 @@ implementation
 
 
   function TLLVMMachineCodePlaygroundAssembler.sectionname(atype: TAsmSectiontype; const aname: string; aorder: TAsmSectionOrder): string;
   function TLLVMMachineCodePlaygroundAssembler.sectionname(atype: TAsmSectiontype; const aname: string; aorder: TAsmSectionOrder): string;
     begin
     begin
+      if atype=sec_fpc then
+        atype:=sec_data;
       Result:=inherited sectionname(atype, aname, aorder)+',"",@';
       Result:=inherited sectionname(atype, aname, aorder)+',"",@';
     end;
     end;