anchor.diff:    end;
    end;
   end;
  +{$endif}
   
   function TFLREDFA.WorkQueueToCachedState(const WorkQueue:TFLREDFAWorkQueue;Flags:longword):PFLREDFAState;
   var Index,n,Count:Longint;
  
positive.code:  end;
  end;
  
  function TFLREDFA.FastProcessNextState(State:PFLREDFAState;const CurrentChar:ansichar;const Reversed:boolean):PFLREDFAState; {$ifdef cpu386}register;{$endif}
  var Counter:longint;        
      Instruction:PFLREInstruction;
  begin
  
negative.code:   LastState:=State;
    State:=State^.NextStates[LocalByteMap[byte(ansichar(LocalInput[Position]))]];
    if not assigned(State) then begin
     State:=FastProcessNextState(LastState,LocalInput[Position]);
     if not assigned(State) then begin
      result:=DFAError;
      exit;
  