2
0
Эх сурвалжийг харах

Disable limitation of nonlocal setting for LLVM compiler

Pierre Muller 5 сар өмнө
parent
commit
e749c81040

+ 4 - 0
compiler/rautils.pas

@@ -1781,7 +1781,11 @@ Begin
       begin
       begin
         if symtablestack.top.symtablelevel<>srsymtable.symtablelevel then
         if symtablestack.top.symtablelevel<>srsymtable.symtablelevel then
           begin
           begin
+{$ifndef LLVM}
+	    { LLVM compiler requires that the static label RawThunkEnd
+             in packages/rtl-objpas/src/rtti.pp unit is set to nonlocal }
             if (srsymtable.symtabletype=globalsymtable) or create_smartlink_library then
             if (srsymtable.symtabletype=globalsymtable) or create_smartlink_library then
+{$endif LLVM}
               Tlabelsym(sym).nonlocal:=true;
               Tlabelsym(sym).nonlocal:=true;
             if emit then
             if emit then
               include(current_procinfo.flags,pi_has_interproclabel);
               include(current_procinfo.flags,pi_has_interproclabel);