anchor.diff:        continue;
        end;
        opZEROWIDTH:begin
  -      if Satisfy(Instruction^.Value,Position) then begin
  +      if ((longword(Instruction^.Value) and sfEmptyAllFlags) and not GetSatisfyFlags(Position))=0 then begin
          Instruction:=Instruction^.Next;
          continue;
         end else begin
  
positive.code:       end;
       end;
       opZEROWIDTH:begin
        if Satisfy(Instruction^.Value,Position) then begin
         Instruction:=Instruction^.Next;
         if ShouldVisit(Instruction,Position) then begin
          continue;
  
negative.code: end;
  
  procedure TFLREThreadLocalStorageInstance.ParallelNFAAddThread(const ThreadList:PFLREParallelNFAThreadList;Instruction:PFLREInstruction;State:PFLREParallelNFAState;const Position:longint);
  var Thread:PFLREParallelNFAThread;
      StackItem:PFLREParallelNFAStackItem;
      StackSize,InstructionID:longint;
  