git-svn-id: trunk@11813 -
@@ -1295,7 +1295,7 @@ begin
FHashList := nil;
end;
SetHashCapacity(1);
- FHashTable^[0]:=longword(-1); // sethashcapacity does not always call rehash
+ FHashTable^[0]:=-1; // sethashcapacity does not always call rehash
if Assigned(FStrs) then
begin
FStrCount:=0;