anchor.diff:   end else begin
     if (Position+LookAssertionStringLength)<=InputLength then begin
      result:=true;
  +   BasePosition:=Position;
  +   if rfUTF8 in Instance.Flags then begin
  +    UTF8PtrSafeInc(Input,InputLength,BasePosition);
  +    dec(BasePosition);
  +   end;
      for Index:=1 to LookAssertionStringLength do begin
  -    if Input[Position+Index]<>LookAssertionString[Index] then begin
  +    if Input[BasePosition+Index]<>LookAssertionString[Index] then begin
        result:=false;
        break;
       end;
  
positive.code: 
         function LookAssertion(const Position,WhichLookAssertionString:longint;const LookBehind,Negative:boolean):boolean;
  
         function ParallelNFAStateAllocate(const Count:longint;const SubMatchesBitMask:longword):PFLREParallelNFAState; {$ifdef caninline}inline;{$endif}
         function ParallelNFAStateAcquire(const State:PFLREParallelNFAState):PFLREParallelNFAState; {$ifdef caninline}inline;{$endif}
         procedure ParallelNFAStateRelease(const State:PFLREParallelNFAState); {$ifdef caninline}inline;{$endif}
         function ParallelNFAStateUpdate(const State:PFLREParallelNFAState;const Index,Position:longint):PFLREParallelNFAState; {$ifdef caninline}inline;{$endif}
  
negative.code:     Instruction:PFLREInstruction;
      CurrentChar:ansichar;
      Capture:PFLRECapture;
      SubMatchesBitmap:longword;
      LocalInput:pansichar;
  begin
   result:=false;
  