Publish AddRefArray.

rtl/inc/rtti.inc

@@ -401,6 +401,9 @@ procedure InitializeArray(p, typeInfo: Pointer; count: SizeInt);
 procedure FinalizeArray(p, typeInfo: Pointer; count: SizeInt);
   external name 'FPC_FINALIZE_ARRAY';
 
+procedure AddRefArray(p, typeInfo: Pointer; count: SizeInt);
+  external name 'FPC_ADDREF_ARRAY';
+
 procedure CopyArray(dest, source, typeInfo: Pointer; count: SizeInt);
   var
     i, size: SizeInt;

rtl/inc/rttih.inc

@@ -82,6 +82,7 @@ const
 {$IFDEF FPC_HAS_FEATURE_RTTI}
 procedure InitializeArray(p, typeInfo: Pointer; count: SizeInt);
 procedure FinalizeArray(p, typeInfo: Pointer; count: SizeInt);
+procedure AddRefArray(p, typeInfo: Pointer; count: SizeInt);
 procedure CopyArray(dest, source, typeInfo: Pointer; count: SizeInt);
 {$endif FPC_HAS_FEATURE_RTTI}