paweld/fpc
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/fpc/source.git synced 2025-08-05 13:25:58 +02:00
Code Issues Packages Projects Releases Wiki Activity

* user screen parsing fixed

Browse Source
This commit is contained in:
florian 2005-01-08 12:05:13 +00:00
parent 6c2ea3f2b4
commit 1dcc4b0309
1 changed files with 14 additions and 11 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

17
ide/fpcompil.pas
View File

@ -229,12 +229,12 @@ begin
begin
UserScreen^.GetLine(Y,Text,Attr);
SearchBackTrace;
InsertInMessages(' Fatal:',v_Fatal,true);
InsertInMessages(' Error:',v_Error,true);
InsertInMessages(' Warning:',v_Warning,false);
InsertInMessages(' Note:',v_Note,false);
InsertInMessages(' Info:',v_Info,false);
InsertInMessages(' Hint:',v_Hint,false);
InsertInMessages(' Fatal:',v_Fatal or v_lineinfo,true);
InsertInMessages(' Error:',v_Error or v_lineinfo,true);
InsertInMessages(' Warning:',v_Warning or v_lineinfo,false);
InsertInMessages(' Note:',v_Note or v_lineinfo,false);
InsertInMessages(' Info:',v_Info or v_lineinfo,false);
InsertInMessages(' Hint:',v_Hint or v_lineinfo,false);
end;
if DisplayCompilerWindow then
begin
@ -1265,7 +1265,10 @@ end;
end.
{
$Log$
Revision 1.33 2004-11-22 19:34:58 peter
Revision 1.34 2005-01-08 12:05:13 florian
* user screen parsing fixed
Revision 1.33 2004/11/22 19:34:58 peter
* GetHeapStatus added, removed MaxAvail,MemAvail,HeapSize
Revision 1.32 2004/11/20 14:21:19 florian