From c8133ba5eeef41952da574edf432aed3b4fc7f0f Mon Sep 17 00:00:00 2001
From: inoussa <inoussa@8e941d3f-bd1b-0410-a28a-d453659cc2b4>
Date: Thu, 23 Jan 2025 17:51:47 +0000
Subject: [PATCH] object_serializer : Fill the array for tkMRecord and
 tkPointer.

git-svn-id: https://svn.code.sf.net/p/lazarus-ccr/svn@9599 8e941d3f-bd1b-0410-a28a-d453659cc2b4
---
 wst/trunk/object_serializer.pas | 6 ++++++
 1 file changed, 6 insertions(+)

diff --git a/wst/trunk/object_serializer.pas b/wst/trunk/object_serializer.pas
index 686a0550d..8fb7ff069 100644
--- a/wst/trunk/object_serializer.pas
+++ b/wst/trunk/object_serializer.pas
@@ -1286,6 +1286,9 @@ var
 {$IFDEF WST_TKPROCEDURE}
      ,( Simple : ErrorFunc; Qualified : ErrorFunc ;)  //tkProcedure
 {$ENDIF WST_TKPROCEDURE}
+{$IFDEF WST_TKMRECORD}
+     ,( Simple : ErrorFunc; Qualified : ErrorFunc ;)  //tkMRecord
+{$ENDIF WST_TKMRECORD}
     );
 
     WriterInfoMap : array[TTypeKind] of TWriterInfo = (
@@ -1320,6 +1323,9 @@ var
 {$IFDEF WST_TKPROCEDURE}
      ,( Simple : ErrorProc; Qualified : ErrorProc ;)  //tkProcedure
 {$ENDIF WST_TKPROCEDURE}
+{$IFDEF WST_TKMRECORD}
+     ,( Simple : ErrorProc; Qualified : ErrorProc ;)  //tkPointer
+{$ENDIF WST_TKMRECORD}
     );
 {$ENDIF WST_DELPHI}