Island (Linux) Dictionary bug

Elements Oxygene
, , ,
1

namespace dict;

type
Program = class
public

class method Main(args: array of String): Int32;
begin

 var dict := new dictionary<string, integer>;
 var keys := new string[1000000];

 for i : integer := low(keys) to high(keys) do
  keys[i] := 'index' + i.ToString;

 for i : integer := low(keys) to high(keys) do
  dict.Add(keys[i], i);

 for i : integer := low(keys) to high(keys) do
  if not dict.containskey(keys[i]) then
   raise new exception('whoops. (' + keys[i] + ')');

end;

end;

end.

Uncaught exception: RemObjects.Elements.System.Exception: whoops. (index0)

2

Thanks, logged as bugs://77025

3

bugs://77025 got closed with status fixed.

4

bugs://i64797 was closed as fixed.

5

Logged as bugs://i64797.