paweld/fpc
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/fpc/source.git synced 2025-09-13 21:11:23 +02:00
Code Issues Packages Projects Releases Wiki Activity

* status should not be present in TCompilerMessage.GetText

Browse Source
This commit is contained in:
pierre 1999-09-09 14:19:16 +00:00
parent 1f1576ef0b
commit c1aa1ecbea
1 changed files with 8 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

10
ide/text/fpcompil.pas
View File

@ -150,7 +150,8 @@ begin
if ClassS<>'' then
ClassS:=RExpand(ClassS,0)+': ';
if assigned(Module) and
(TClass<=V_ShowFile) and (status.currentsource<>'') and (status.currentline>0) then
(TClass<=V_ShowFile)
{and (status.currentsource<>'') and (status.currentline>0)} then
begin
if Row>0 then
begin
@ -451,6 +452,7 @@ begin
CompilerMessageWindow^.AddMessage(Level,S,status.currentsourcepath+status.currentsource,
status.currentline,status.currentcolumn);
{ update info messages }
@ -462,6 +464,7 @@ begin
{ update memory usage }
{ HeapView^.Update; }
end;
@ -742,7 +745,10 @@ end;
end.
{
$Log$
Revision 1.36 1999-09-07 11:32:13 pierre
Revision 1.37 1999-09-09 14:19:16 pierre
* status should not be present in TCompilerMessage.GetText
Revision 1.36 1999/09/07 11:32:13 pierre
* fix for Linux ./ prepended to ppas.sh
* Build add '-B' option
* if linkAfter is set, get errors from linker