anchor.diff:       PPFLREDFANextStatesByteBlock=^TPFLREDFANextStatesByteBlock;
        TPFLREDFANextStatesByteBlock=array[0..256] of PFLREDFAState;
   
  -     TFLREDFAWorkQueueItems=array of longint;
  +     TFLREDFAWorkQueueItems=array of TFLREInt32;
   
        TFLREDFAState=record
  -      Flags:longword;
  +      Flags:TFLREUInt32;
         Instructions:TPFLREInstructions;
  -      CountInstructions:longint;
  +      CountInstructions:TFLREInt32;
         NextStates:TPFLREDFANextStatesByteBlock;
        end;
   
  
positive.code:  end;
  end;
  
  function UnicodeGetCategoryFromTable(c:longword):longword; {$ifdef caninline}inline;{$endif}
  var Index:longword;
  begin
   if c<=$10ffff then begin
    Index:=c shr PUCUUnicodeCategoryArrayBlockBits;
  
negative.code: 
         SearchMatch:TFLREDFASearchMatch;
  
         MaximalDFAStates:TFLREInt32;
  
         HadReset:longbool;
  
         constructor Create(const AThreadLocalStorageInstance:TFLREThreadLocalStorageInstance;const AReversed:boolean;const AMaximalDFAStates:TFLREInt32);
         destructor Destroy; override;
  
         function CacheState(const State:PFLREDFAState):PFLREDFAState; {$ifdef caninline}inline;{$endif}
  