* fix #39329: adjust visibilties of PT and TArr in TVector<> and TDeque<> so that they can be correctly used either by descendants or users outside of the class

packages/fcl-stl/src/gdeque.pp

@@ -23,10 +23,13 @@ interface
 
 type
   generic TDeque<T>=class
-  private
+  public
   type
     PT=^T;
+  protected
+  type
     TArr=array of T;
+  private
   var
     FData:TArr;
     FDataSize:SizeUInt;

packages/fcl-stl/src/gvector.pp

@@ -21,10 +21,13 @@ type
   { TVector }
 
   generic TVector<T> = class
-  private
+  public
   type
     PT = ^ T;
+  protected
+  type
     TArr = array of T;
+  private
   var
     FCapacity:SizeUInt;
     FDataSize:SizeUInt;