anchor.diff:        exit;
        end;
        if FixedStringIsWholeRegExp and (CountCaptures=1) and not DFANeedVerification then begin
  -      SetLength(Captures,1);
         Captures[0].Start:=CurrentPosition;
         Captures[0].Length:=FixedStringLength;
         result:=true;
  
positive.code: 
  function TFLRE.PtrMatch(const Input:pointer;const InputLength:longint;var Captures:TFLRECaptures;const StartPosition:longint=0):boolean;
  var ThreadLocalStorageInstance:TFLREThreadLocalStorageInstance;
      Index:longint;
  begin
   ThreadLocalStorageInstance:=AcquireThreadLocalStorageInstance;
   try
  
negative.code:  end;
  
   if result then begin
    for Counter:=0 to Instance.CountCaptures-1 do begin
     Index:=Instance.CapturesToSubMatchesMap[Counter] shl 1;
     Captures[Counter].Start:=MatchSubMatches[Index];
  