|
@@ -42,7 +42,7 @@ begin
|
|
|
// don't work with TCuckooD6 map because default TCuckooD6 needs TDelphiSixfoldHashFactory
|
|
// don't work with TCuckooD6 map because default TCuckooD6 needs TDelphiSixfoldHashFactory
|
|
|
// and TDefaultHashFactory = TDelphiQuadrupleHashFactory
|
|
// and TDefaultHashFactory = TDelphiQuadrupleHashFactory
|
|
|
// (TDelphiQuadrupleHashFactory is compatible with TDelphiDoubleHashFactory and TDelphiHashFactory)
|
|
// (TDelphiQuadrupleHashFactory is compatible with TDelphiDoubleHashFactory and TDelphiHashFactory)
|
|
|
- TDefaultHashFactory.GetHashList(@AValue.TaxID, SizeOf(Integer), AHashList);
|
|
|
|
|
|
|
+ TDelphiQuadrupleHashFactory.GetHashList(@AValue.TaxID, SizeOf(Integer), AHashList);
|
|
|
end;
|
|
end;
|
|
|
|
|
|
|
|
var
|
|
var
|
michael