Browse Source

* write the segment of aitconst_farptr on a separate line to avoid long symbol truncation, due to line length limit; this fixes compilation of sysutils in the medium memory model

git-svn-id: trunk@24879 -
nickysn 12 years ago
parent
commit
511b1f37c1
1 changed files with 9 additions and 6 deletions
  1. 9 6
      compiler/x86/agx86nsm.pas

+ 9 - 6
compiler/x86/agx86nsm.pas

@@ -677,15 +677,18 @@ interface
                        begin
                          if SmartAsm then
                            AddSymbol(tai_const(hp).sym.name,false);
-                         s:=tai_const(hp).sym.name;
+                         AsmWrite(tai_const(hp).sym.name);
                          if tai_const(hp).value<>0 then
-                           s:=s+tostr_with_plus(tai_const(hp).value);
-                         s:=s+',SEG '+tai_const(hp).sym.name;
+                           AsmWrite(tostr_with_plus(tai_const(hp).value));
+                         AsmLn;
+                         AsmWrite(ait_const2str[aitconst_16bit]);
+                         AsmWrite('SEG ');
+                         AsmWrite(tai_const(hp).sym.name);
                        end
                      else
-                       s:=tostr(lo(longint(tai_const(hp).value)))+','+
-                          tostr(hi(longint(tai_const(hp).value)));
-                     AsmWriteLn(s);
+                       AsmWrite(tostr(lo(longint(tai_const(hp).value)))+','+
+                                tostr(hi(longint(tai_const(hp).value))));
+                     AsmLn;
                    end;
 {$endif i8086}
                  aitconst_32bit,