From addd0e7dcfd08c9bcdc1a9d636d75941cf1c8530 Mon Sep 17 00:00:00 2001
From: Jonas Maebe <jonas-devlists@watlock.be>
Date: Tue, 7 Jun 2022 21:12:49 +0200
Subject: [PATCH] dbgllvm: skip static fields when writing struct fields

These are not part of the struct instances
---
 compiler/llvm/dbgllvm.pas | 4 ++++
 1 file changed, 4 insertions(+)

diff --git a/compiler/llvm/dbgllvm.pas b/compiler/llvm/dbgllvm.pas
index 2c55d210b5..b69095838d 100644
--- a/compiler/llvm/dbgllvm.pas
+++ b/compiler/llvm/dbgllvm.pas
@@ -1174,6 +1174,10 @@ implementation
               continue;
 
             field:=tfieldvarsym(recst.symlist[i]);
+            if (sp_static in field.symoptions) or
+               (field.visibility=vis_hidden) then
+              exit;
+
             { start of a new variant part? }
             if vo_is_first_field in field.varoptions then
               begin