anchor.diff:  
     if (CountForwardInstructions>0) and (CountForwardInstructions<512) then begin
      Include(InternalFlags,fifBitStateNFAReady);
  +   MaxBitStateNFATextSize:=(length(TFLREBitStateNFAVisited)*SizeOf(TFLREUInt32)) div CountForwardInstructions;
  +  end else begin
  +   MaxBitStateNFATextSize:=0;
     end;
   
     if not (fifBeginTextAnchor in InternalFlags) then begin
  
positive.code:    exit;
    end;
   end else begin
    if fifBitStateNFAReady in InternalFlags then begin
     case ThreadLocalStorageInstance.BitStateNFA.SearchMatch(Captures,StartPosition,UntilExcludingPosition,UnanchoredStart) of
      BitStateNFAFail:begin
       result:=false;
  
negative.code:        RangeHigh:TFLRERawByteString;
  
         PrefilterRootNode:TFLREPrefilterNode;
         
         MaxBitStateNFATextSize:TFLREInt32;
  
         function NewCharClass(const CharClass:TFLRECharClass;const FromRegularExpression:boolean):TFLREInt32;
         function GetCharClass(const CharClass:TFLREInt32):TFLRECharClass;
  