diff --git a/wst/trunk/object_serializer.pas b/wst/trunk/object_serializer.pas
index 36b30c26f..2de28838f 100644
--- a/wst/trunk/object_serializer.pas
+++ b/wst/trunk/object_serializer.pas
@@ -1179,6 +1179,15 @@ var
 {$IFDEF WST_TKHELPER}
      ,( Simple : @ErrorFunc; Qualified : @ErrorFunc ;)  //tkHelper
 {$ENDIF WST_TKHELPER}
+{$IFDEF WST_TKFILE}
+     ,( Simple : @ErrorFunc; Qualified : @ErrorFunc ;)  //tkFile
+{$ENDIF WST_TKFILE}
+{$IFDEF WST_TKCLASSREF}
+     ,( Simple : @ErrorFunc; Qualified : @ErrorFunc ;)  //tkClassRef
+{$ENDIF WST_TKCLASSREF}
+{$IFDEF WST_TKPOINTER}
+     ,( Simple : @ErrorFunc; Qualified : @ErrorFunc ;)  //tkPointer
+{$ENDIF WST_TKPOINTER}
   );
 
   WriterInfoMap : array[TTypeKind] of TWriterInfo = (
@@ -1216,6 +1225,15 @@ var
 {$IFDEF WST_TKHELPER}
      ,( Simple : @ErrorProc; Qualified : @ErrorProc ;)  //tkHelper
 {$ENDIF WST_TKHELPER}
+{$IFDEF WST_TKFILE}
+     ,( Simple : @ErrorProc; Qualified : @ErrorProc ;)  //tkFile
+{$ENDIF WST_TKFILE}
+{$IFDEF WST_TKCLASSREF}
+     ,( Simple : @ErrorProc; Qualified : @ErrorProc ;)  //tkClassRef
+{$ENDIF WST_TKCLASSREF}
+{$IFDEF WST_TKPOINTER}
+     ,( Simple : @ErrorProc; Qualified : @ErrorProc ;)  //tkPointer
+{$ENDIF WST_TKPOINTER}
   );
 {$ENDIF FPC}
 
diff --git a/wst/trunk/wst_global.inc b/wst/trunk/wst_global.inc
index 124b8ada9..22f5c6ccc 100644
--- a/wst/trunk/wst_global.inc
+++ b/wst/trunk/wst_global.inc
@@ -62,6 +62,11 @@
     {$IF Defined(FPC_FULLVERSION) and (FPC_FULLVERSION > 20602) }
       {$DEFINE HAS_EXP_TREE}
     {$IFEND}
+    {$IF Defined(FPC_FULLVERSION) and (FPC_FULLVERSION >= 20701) }
+      {$DEFINE WST_TKFILE}
+      {$DEFINE WST_TKCLASSREF}
+      {$DEFINE WST_TKPOINTER}
+    {$IFEND}
   {$ENDIF}
 
   {$IFNDEF FPC}