Преглед на файлове

* support opcode+operands > 255 characters (e.g. when loading string constants)

git-svn-id: branches/jvmbackend@18560 -
Jonas Maebe преди 14 години
родител
ревизия
8248e6762f
променени са 1 файла, в които са добавени 2 реда и са изтрити 1 реда
  1. 2 1
      compiler/agjasmin.pas

+ 2 - 1
compiler/agjasmin.pas

@@ -1144,7 +1144,8 @@ implementation
                  sep:=' ';
               end;
           end;
-        owner.AsmWriteLn(s);
+        owner.AsmWritePChar(PChar(s));
+        owner.AsmLn;
       end;
 
 {****************************************************************************}