* Patch from Henrique Werlang to move TArray (bug ID 37759)

packages/rtl/system.pas

@@ -98,6 +98,8 @@ type
                     coLingCasing, coDigitAsNumbers, coStringSort});
   TCompareOptions = set of TCompareOption;
 
+  generic TArray<T> = array of T;
+
 {*****************************************************************************
             TObject, TClass, IUnknown, IInterface, TInterfacedObject
 *****************************************************************************}

packages/rtl/sysutils.pas

@@ -655,8 +655,6 @@ Function EncodeHTMLEntities (S : String) : String;
   ---------------------------------------------------------------------}
 
 Type
-
-  generic TArray<T> = array of T;
   TCharArray = Array of char;
 
   TByteBitIndex = 0..7;