瀏覽代碼

* Fix overflow of compiler messages (bug id 27973)

git-svn-id: trunk@43481 -
michael 5 年之前
父節點
當前提交
43a09af7f2
共有 1 個文件被更改,包括 1 次插入1 次删除
  1. 1 1
      compiler/utils/msg2inc.pp

+ 1 - 1
compiler/utils/msg2inc.pp

@@ -714,7 +714,7 @@ begin
                end;
               if s[i+k]='_' then
                inc(i,k+1);
-              writeln(t,'\item ['+s1+escapestring(Copy(s,i,255))+']');
+              writeln(t,'\item ['+s1+escapestring(Copy(s,i,255))+'] \hfill \\');
             end
            else
             writeln('error in line: ',line,' skipping');