Changeset 481 for Generics/NativeGenerics/Units/GenericDictionary.pas

Timestamp:

Feb 23, 2016, 10:30:36 PM (8 years ago)

Author:

chronos

Message:

• Updated: Fix NativeGenerics project compilation with FPC 3.0.0.

File:

• Generics/NativeGenerics/Units/GenericDictionary.pas (modified) (1 diff)

Generics/NativeGenerics/Units/GenericDictionary.pas

@@ -93 +93 @@
     Result := Result + 1;
   end;
+  if Result >= FList.Count then Result := -1;
 end;