From 2641f65bb7cdd494eb8459daf45bc4f5b1e1e965 Mon Sep 17 00:00:00 2001
From: florian <florian@freepascal.org>
Date: Thu, 28 Mar 2024 15:07:35 +0100
Subject: [PATCH]   * compilation with -dEXTDEBUG fixed

---
 compiler/pass_1.pas | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/compiler/pass_1.pas b/compiler/pass_1.pas
index 510466a688..35b4eb2d5f 100644
--- a/compiler/pass_1.pas
+++ b/compiler/pass_1.pas
@@ -207,7 +207,7 @@ implementation
                    (tnf_pass1_done in hp.transientflags);
              include(p.transientflags,tnf_pass1_done);
 {$ifdef EXTDEBUG}
-             if not(nf_error in p.flags) then
+             if not(tnf_error in p.transientflags) then
                begin
                  if (p.expectloc=LOC_INVALID) then
                    Comment(V_Warning,'Expectloc is not set in firstpass: '+nodetype2str[p.nodetype]);