[fpc-pascal] TFPHashList and nil pointers

[Michael Van Canneyt]

On Tue, 19 May 2015, Serguei TARASSOV wrote:

> Hello,
>
> Is it normal that TFPHashList cannot find an item by name if the pointer is 
> nil?
> However, the item is stored in the list.
>
> FPC 2.6.4, both Windows and Linux versions.
>
> program project1;
>
> uses
>  Contnrs;
>
> var
>  List: TFPHashList;
> begin
>  List := TFPHashList.Create;
>  List.Add('Name1', List);
>  List.Add('Name2', nil);
>  writeln('List count: ', List.Count);
>  writeln('Index of Name1: ', List.FindIndexOf('Name1'));
>  writeln('Index of Name2: ', List.FindIndexOf('Name2'));
>  List.Free;
> end.
>
> Output:
> List count: 2
> Index of Name1: 0
> Index of Name2: -1

It is by design.

Michael.