paweld/fpc
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/fpc/source.git synced 2025-10-29 19:42:51 +01:00
Code Issues Packages Projects Releases Wiki Activity

* removed path from output, was there only for debugging

Browse Source
This commit is contained in:
peter 1999-01-15 12:27:23 +00:00
parent d86094c298
commit b5075769be
1 changed files with 5 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

7
compiler/comphook.pas
View File

@ -220,7 +220,7 @@ begin
hs:=gccfilename(status.currentsource)+':'+tostr(status.currentline)+': '+hs hs:=gccfilename(status.currentsource)+':'+tostr(status.currentline)+': '+hs
+tostr(status.currentcolumn)+': ' +tostr(status.currentcolumn)+': '
else else
hs:=status.currentsourcepath+'/'+status.currentsource+'('+tostr(status.currentline) hs:=status.currentsource+'('+tostr(status.currentline)
+','+tostr(status.currentcolumn)+') '+hs; +','+tostr(status.currentcolumn)+') '+hs;
end end
else else
@ -261,7 +261,10 @@ end;
end. end.
{ {
$Log$ $Log$
Revision 1.14 1999-01-14 21:47:09 peter Revision 1.15 1999-01-15 12:27:23 peter
* removed path from output, was there only for debugging
Revision 1.14 1999/01/14 21:47:09 peter
* status.currentmodule is now also updated * status.currentmodule is now also updated
+ status.currentsourcepath + status.currentsourcepath