* Merging revisions r43474 from trunk:

    ------------------------------------------------------------------------
    r43474 | michael | 2019-11-15 15:26:12 +0100 (Fri, 15 Nov 2019) | 1 line
    
    * avoid warning about visibility of ItemIsmanaged
    ------------------------------------------------------------------------

git-svn-id: branches/fixes_3_2@43750 -

rtl/objpas/fgl.pp

@@ -138,12 +138,11 @@ type
     procedure SetLast(const Value: T); {$ifdef FGLINLINE} inline; {$endif}
     function GetFirst: T; {$ifdef FGLINLINE} inline; {$endif}
     procedure SetFirst(const Value: T); {$ifdef FGLINLINE} inline; {$endif}
-  Protected
-    class Function ItemIsManaged : Boolean; override;
   public
     Type
       TFPGListEnumeratorSpec = specialize TFPGListEnumerator<T>;
     constructor Create;
+    class Function ItemIsManaged : Boolean; override;
     function Add(const Item: T): Integer; {$ifdef FGLINLINE} inline; {$endif}
     function Extract(const Item: T): T; {$ifdef FGLINLINE} inline; {$endif}
     property First: T read GetFirst write SetFirst;