Explorar o código

* in the nasm writer only declare labels as global if they have labsym.bind=AB_GLOBAL; this fixes compilation of i8086-msdos programs that use multiple units

git-svn-id: trunk@24529 -
nickysn %!s(int64=12) %!d(string=hai) anos
pai
achega
b9084a22ca
Modificáronse 1 ficheiros con 1 adicións e 1 borrados
  1. 1 1
      compiler/x86/agx86nsm.pas

+ 1 - 1
compiler/x86/agx86nsm.pas

@@ -857,7 +857,7 @@ interface
              begin
                if tai_label(hp).labsym.is_used then
                  begin
-                   if SmartAsm then
+                   if SmartAsm and (tai_label(hp).labsym.bind=AB_GLOBAL) then
                      begin
                        AsmWrite(#9'GLOBAL ');
                        AsmWriteLn(tai_label(hp).labsym.name);