anchor.diff:  
    CurrentThreadList^.CountThreads:=0;
    NewThreadList^.CountThreads:=0;
  +
  + for Index:=0 to Instance.CountManySubMatches-1 do begin
  +  ThreadLocalStorageInstance.ManySubMatches[Index]:=-1;
  + end;
   
    State:=StateAllocate(Instance.CountSubMatches,0);
   
  
positive.code: 
   SearchLongest:=ManyMatch or (rfLONGEST in Instance.Flags);
  
   ParallelNFA:=TFLREParallelNFA.Create(self);
  
   if Instance.OnePassNFAReady then begin
  
negative.code: destructor TFLREBitStateNFA.Destroy;
  begin
   SetLength(Jobs,0);
   SetLength(WorkSubMatches,0);
   SetLength(MatchSubMatches,0);
   inherited Destroy;
  