From ea7525392644e484d6fa0c6315f0a28c2c496408 Mon Sep 17 00:00:00 2001
From: svenbarth <pascaldragon@googlemail.com>
Date: Mon, 2 Dec 2019 06:58:59 +0000
Subject: [PATCH] * initialize the defid in trecorddef.create_global_internal
 as unique_id_str needs it

git-svn-id: trunk@43625 -
---
 compiler/symdef.pas | 1 +
 1 file changed, 1 insertion(+)

diff --git a/compiler/symdef.pas b/compiler/symdef.pas
index 656b9c160b..6db4205d15 100644
--- a/compiler/symdef.pas
+++ b/compiler/symdef.pas
@@ -4801,6 +4801,7 @@ implementation
           pname:=@n
         else
           begin
+            init_defid;
             name:='$InternalRec'+unique_id_str;
             pname:=@name;
           end;