Browse Source

* fixed some wrong levels in extdebug comments

peter 23 years ago
parent
commit
8b2fb4187e
1 changed files with 6 additions and 3 deletions
  1. 6 3
      compiler/tgobj.pas

+ 6 - 3
compiler/tgobj.pas

@@ -357,7 +357,7 @@ unit tgobj;
                if not(hp^.temptype in temptypes) then
                if not(hp^.temptype in temptypes) then
                 begin
                 begin
 {$ifdef EXTDEBUG}
 {$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}
 {$endif}
                   exit;
                   exit;
                 end;
                 end;
@@ -442,7 +442,7 @@ unit tgobj;
              hp := hp^.next;
              hp := hp^.next;
            end;
            end;
 {$ifdef EXTDEBUG}
 {$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}
 {$endif}
       end;
       end;
 
 
@@ -503,7 +503,10 @@ finalization
 end.
 end.
 {
 {
   $Log$
   $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
     * when reusing a block also update the temptype instead of forcing it
       to tt_normal
       to tt_normal