From f7239e03e7c4e21aea30ef17393a5303dd5d5ac8 Mon Sep 17 00:00:00 2001
From: florian <florian@freepascal.org>
Date: Wed, 15 Dec 2021 23:05:18 +0100
Subject: [PATCH]   * make tgobj.pas less verbose in extdebug mode, use
 separate define DEBUG_FREETEMP for the really     verbose stuff

---
 compiler/tgobj.pas | 4 +++-
 1 file changed, 3 insertions(+), 1 deletion(-)

diff --git a/compiler/tgobj.pas b/compiler/tgobj.pas
index fbcc07daee..b6b4a398c4 100644
--- a/compiler/tgobj.pas
+++ b/compiler/tgobj.pas
@@ -29,6 +29,8 @@ unit tgobj;
 
 {$i fpcdefs.inc}
 
+{ $define DEBUG_FREETEMP}
+
   interface
 
     uses
@@ -494,7 +496,7 @@ implementation
                { check type that are allowed to be released }
                if not(hp^.temptype in temptypes) then
                 begin
-{$ifdef EXTDEBUG}
+{$ifdef DEBUG_FREETEMP}
                   if hp^.temptype = tt_persistent then
                     Comment(V_Note,'tgobj: (Freetemp) temp at pos '+tostr(pos.val)+ ' has different type ('+TempTypeStr[hp^.temptype]+'), not releasing')
                   else