paweld/fpc
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/fpc/source.git synced 2025-04-21 01:09:31 +02: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
+tostr(status.currentcolumn)+': '
else
hs:=status.currentsourcepath+'/'+status.currentsource+'('+tostr(status.currentline)
hs:=status.currentsource+'('+tostr(status.currentline)
+','+tostr(status.currentcolumn)+') '+hs;
end
else
@ -261,7 +261,10 @@ end;
end.
{
$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.currentsourcepath