Browse Source

* Merging revisions r43404 from trunk:
------------------------------------------------------------------------
r43404 | michael | 2019-11-06 11:42:11 +0100 (Wed, 06 Nov 2019) | 1 line

* Fix bug ID #0036268, more descriptive comment
------------------------------------------------------------------------

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

michael 5 years ago
parent
commit
469350538a
1 changed files with 1 additions and 1 deletions
  1. 1 1
      rtl/objpas/fgl.pp

+ 1 - 1
rtl/objpas/fgl.pp

@@ -45,7 +45,7 @@ type
   protected
     FList: PByte;
     FCount: Integer;
-    FCapacity: Integer; { list is one longer sgthan capacity, for temp }
+    FCapacity: Integer; { list has room for capacity+1 items, contains room for a temporary item }
     FItemSize: Integer;
     procedure CopyItem(Src, Dest: Pointer); virtual;
     procedure Deref(Item: Pointer); virtual; overload;