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

* Fixed TCompilerMessageWindow.AddMessage to see line numbers with 1.1

Browse Source
This commit is contained in:
armin 2003-03-28 09:55:46 +00:00
parent 4fba6898d0
commit 1f0510925c
1 changed files with 5 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

7
ide/fpcompil.pas
View File

@ -400,7 +400,7 @@ begin
{$ifdef COMPILER_1_0}
if AClass>=V_Info then
{$else}
if (AClass and V_LineInfo)=V_LineInfo then
if (AClass and V_LineInfo)<>V_LineInfo then
{$endif}
Line:=0;
MsgLB^.AddItem(New(PCompilerMessage,Init(AClass, Msg, MsgLB^.AddModuleName(Module), Line, Column)));
@ -1330,7 +1330,10 @@ end;
end.
{
$Log$
Revision 1.21 2003-03-27 14:11:53 pierre
Revision 1.22 2003-03-28 09:55:46 armin
* Fixed TCompilerMessageWindow.AddMessage to see line numbers with 1.1
Revision 1.21 2003/03/27 14:11:53 pierre
* fix problem in CompilerComment procedure
Revision 1.20 2003/01/13 09:05:18 pierre