anchor.diff:     repeat
   
       case Instruction^.IDandOpcode and $ff of
  -     opSPLIT:begin
  +     opSPLIT,opSPLITMATCH:begin
         case Argument of
          0:begin
           Push(Instruction,Position,1);
  
positive.code:         continue;
         end;
        end;
       end;
       opSINGLECHAR:begin
        if (Position<LocalInputLength) and (byte(ansichar(LocalInput[Position]))=Instruction^.Value) then begin
         inc(Position);
  
negative.code:   end else begin
  
     if assigned(State) and ((State^.Flags and sfDFAMatchWins)<>0) then begin
      MatchEnd:=StartPosition-1;
      result:=DFAMatch;
     end;
  
  