* Merging revisions 342 from trunk:

    ------------------------------------------------------------------------
    r342 | mattias | 2019-03-04 14:52:35 +0100 (Mon, 04 Mar 2019) | 1 line
    
    rtl: less hints
    ------------------------------------------------------------------------

packages/rtl/contnrs.pas

@@ -1819,7 +1819,7 @@ end;
 Function TBucketList.BucketFor(AItem: JSValue): Integer;
 begin
   // JSValues on average have a granularity of 4
-  Result:=(PtrInt(AItem) shr 2) and FBucketMask;
+  Result:=(longword(AItem) shr 2) and FBucketMask;
 end;
 
 constructor TBucketList.Create(ABuckets: TBucketListSizes);