From 1853d1ddd8916104f4087533ba3a861f55fac9fc Mon Sep 17 00:00:00 2001
From: Sven/Sarah Barth <pascaldragon@gmail.com>
Date: Sat, 30 Dec 2023 14:45:41 +0100
Subject: [PATCH] * keep track which nested function definition the new method
 has been converted from

---
 compiler/procdefutil.pas | 1 +
 compiler/symdef.pas      | 1 +
 2 files changed, 2 insertions(+)

diff --git a/compiler/procdefutil.pas b/compiler/procdefutil.pas
index dfd5ca0af3..ce0909d8fd 100644
--- a/compiler/procdefutil.pas
+++ b/compiler/procdefutil.pas
@@ -993,6 +993,7 @@ implementation
           { the nested function needs access to the parent's framepointer to
             access the capturer }
           insert_parentfp_para(pinested.procdef);
+          pd.copied_from:=pinested.procdef;
         end;
       { to simplify some checks, but only after insert_funcret_para }
       pd.was_anonymous:=true;
diff --git a/compiler/symdef.pas b/compiler/symdef.pas
index b4251a5bcf..daa5d6186c 100644
--- a/compiler/symdef.pas
+++ b/compiler/symdef.pas
@@ -907,6 +907,7 @@ interface
 {$endif}
           { only needed when actually compiling a unit, no need to save/load from ppu }
           invoke_helper : tprocdef;
+          copied_from : tprocdef;
           constructor create(level:byte;doregister:boolean);virtual;
           constructor ppuload(ppufile:tcompilerppufile);
           destructor  destroy;override;