Просмотр исходного кода

* fixed output of line numbers/columns with -vR

git-svn-id: trunk@43769 -
florian 5 лет назад
Родитель
Сommit
be0054eeb4
1 измененных файлов с 1 добавлено и 2 удалено
  1. 1 2
      compiler/comphook.pas

+ 1 - 2
compiler/comphook.pas

@@ -305,8 +305,7 @@ begin
      if status.currentcolumn>0 then
      if status.currentcolumn>0 then
       begin
       begin
         if status.use_gccoutput then
         if status.use_gccoutput then
-          hs:=gccfilename(status.currentsource)+':'+tostr(status.currentline)+': '+hs+' '+
-              tostr(status.currentcolumn)+': '+s
+          hs:=gccfilename(status.currentsource)+':'+tostr(status.currentline)+':'+tostr(status.currentcolumn)+': '+hs+' '+s
         else
         else
           begin
           begin
             hs:=status.currentsource+'('+tostr(status.currentline)+
             hs:=status.currentsource+'('+tostr(status.currentline)+