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

* fixed some wrong levels in extdebug comments

Browse Source
This commit is contained in:
peter 2002-09-01 12:14:53 +00:00
parent 8ee2462ba4
commit 8b2fb4187e
1 changed files with 6 additions and 3 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

9
compiler/tgobj.pas
View File

@ -357,7 +357,7 @@ unit tgobj;
if not(hp^.temptype in temptypes) then
begin
{$ifdef EXTDEBUG}
Comment(V_Debug,'temp managment : (Freetemp) temp at pos '+tostr(pos)+ ' has wrong type !');
Comment(V_Warning,'temp managment : (Freetemp) temp at pos '+tostr(pos)+ ' has wrong type !');
{$endif}
exit;
end;
@ -442,7 +442,7 @@ unit tgobj;
hp := hp^.next;
end;
{$ifdef EXTDEBUG}
Comment(V_Warning,'temp managment : SizeOfTemp temp at pos '+tostr(ref.offset)+ ' not found !');
Comment(V_Debug,'temp managment : SizeOfTemp temp at pos '+tostr(ref.offset)+ ' not found !');
{$endif}
end;
@ -503,7 +503,10 @@ finalization
end.
{
$Log$
Revision 1.13 2002-08-24 18:35:04 peter
Revision 1.14 2002-09-01 12:14:53 peter
* fixed some wrong levels in extdebug comments
Revision 1.13 2002/08/24 18:35:04 peter
* when reusing a block also update the temptype instead of forcing it
to tt_normal