Bläddra i källkod

* fixed writing of symbol sizes

git-svn-id: trunk@2123 -
florian 19 år sedan
förälder
incheckning
06c84e1c5e
1 ändrade filer med 1 tillägg och 1 borttagningar
  1. 1 1
      compiler/aggas.pas

+ 1 - 1
compiler/aggas.pas

@@ -535,7 +535,7 @@ implementation
                      end;
                      end;
                    if (tf_needs_symbol_type in target_info.flags) then
                    if (tf_needs_symbol_type in target_info.flags) then
                      asmwriteln(#9'.type '+Tai_datablock(hp).sym.name+',@object');
                      asmwriteln(#9'.type '+Tai_datablock(hp).sym.name+',@object');
-                   if (tf_needs_symbol_size in target_info.flags) and (Tai_datablock(hp).sym.size > 0) then
+                   if (tf_needs_symbol_size in target_info.flags) and (tai_datablock(hp).size > 0) then
                      asmwriteln(#9'.size '+Tai_datablock(hp).sym.name+','+tostr(Tai_datablock(hp).size));
                      asmwriteln(#9'.size '+Tai_datablock(hp).sym.name+','+tostr(Tai_datablock(hp).size));
                    asmwrite(Tai_datablock(hp).sym.name);
                    asmwrite(Tai_datablock(hp).sym.name);
                    asmwriteln(':');
                    asmwriteln(':');