> On Apr 20, 2021, at 3:10 PM, Sven Barth <pascaldra...@googlemail.com> wrote:
> 
> If you look at TFPSMap' code you'll see that BinaryCompareKey and 
> BinaryCompareData are only used in the way of method pointers OnKeyPtrCompare 
> and OnDataPtrCompare. In TFPGMap<,> these are then set to compare methods 
> specific to the specialization, most importantly TFPGMap<,>.KeyCompare if no 
> custom compare function is set.

There's no many levels of indirection here I got confused. I see this method 
below and so maybe the <> operators are overloaded for short strings?

function TFPGMap.KeyCompare(Key1, Key2: Pointer): Integer;
begin
  if PKey(Key1)^ < PKey(Key2)^ then
    Result := -1
  else if PKey(Key1)^ > PKey(Key2)^ then
    Result := 1
  else
    Result := 0;
end;


Regards,
        Ryan Joseph

_______________________________________________
fpc-pascal maillist  -  fpc-pascal@lists.freepascal.org
https://lists.freepascal.org/cgi-bin/mailman/listinfo/fpc-pascal

Reply via email to