anchor.diff:          end else begin
            Value:=CountInternalCaptures;
            inc(CountInternalCaptures);
  +         if (CountCaptures+1)>length(CapturesToSubMatchesMap) then begin
  +          SetLength(CapturesToSubMatchesMap,(CountCaptures+1)*2);
  +         end;
  +         CapturesToSubMatchesMap[CountCaptures]:=Value;
            inc(CountCaptures);
            GroupIndexIntegerStack.Add(Value);
            try
  
positive.code:   end;
  
    CountSubMatches:=CountInternalCaptures*2;
  
    CompilePrefix;
  
  
negative.code:   NamedGroupStringList.Add('wholematch');
    CountCaptures:=1;
    CountInternalCaptures:=1;
    SetLength(CapturesToSubMatchesMap,1);
    CapturesToSubMatchesMap[0]:=0;
    GroupIndexIntegerStack:=TFLREIntegerList.Create;
    GroupNameStringStack:=TStringList.Create;
    try
  