anchor.diff:     end;
     end;
    end;
  +{$endif}
   
    Position:=UntilExcludingPosition;
   
  
positive.code: end;
  
  function TFLREDFA.SearchMatchFull(const StartPosition,UntilExcludingPosition:longint;out MatchEnd:longint;const UnanchoredStart:longbool):longint;
  var Position,LocalInputLength,Index,Offset:longint;
      State,LastState:PFLREDFAState;
      LocalInput:pansichar;
  
negative.code:      end;
  
       PFLREDFAByteMap=^TFLREDFAByteMap;
       TFLREDFAByteMap=array[0..256] of longword;
  
       TFLREDFASearchMatch=function(const StartPosition,UntilExcludingPosition:longint;out MatchEnd:longint;const UnanchoredStart:longbool):longint of object; {$ifdef cpu386}stdcall;{$endif}
  
  