diff --git a/packages/rtl-generics/src/generics.collections.pas b/packages/rtl-generics/src/generics.collections.pas
index e92e76c503..8ebe96f4bc 100644
--- a/packages/rtl-generics/src/generics.collections.pas
+++ b/packages/rtl-generics/src/generics.collections.pas
@@ -1803,7 +1803,7 @@ begin
   Pack(
     function(const L, R: T): Boolean
     begin
-      Result := FComparer.Compare(L, Default(T)) = 0;
+      Result := FComparer.Compare(L, R) = 0;
     end);
 end;