anchor.diff:  
   function TFLREDFA.SearchMatchFull(const StartPosition,UntilExcludingPosition:longint;out MatchEnd:longint;const UnanchoredStart:longbool):longint;
   {$ifdef cpu386}
  -label ProcessNewStartState,SkipProcessNewStartState,NewStartState;
  +label ProcessNewStartState,SkipProcessNewStartState,NewStartState,ExitFunction;
   {$endif}
   var Position,LocalInputLength,Index,Offset:longint;
       State,LastState:PFLREDFAState;
  
positive.code:   result:=DFAMatch;
   end;
  
   for Position:=StartPosition downto UntilExcludingPosition do begin
    CurrentChar:=byte(ansichar(LocalInput[Position]));
    LastState:=State;
  
negative.code:      jnz @HaveNextState
  
       mov dword ptr result,DFAError
       popad
       jmp ExitFunction
  
      @Done:
  
      mov dword ptr State,edi
  
     popad
  
  