anchor.diff:  end;
   
   procedure TFLRE.Parse;
  -const AllCharClass:TFLRECharClass=[#0..#255];
   var SourcePosition,SourceLength:longint;
       Source:ansistring;
       GroupIndexIntegerStack:TFLREIntegerList;
  
positive.code:      Instruction^.OtherNext:=@Instructions[ptrint(Instruction^.OtherNext)];
      end else begin
       Instruction^.OtherNext:=nil;
      end;
     end;
     if Reversed then begin
  
negative.code:       MaxGeneration=int64($4000000000000000);
  
        Mark=nil;
  
        AllCharClass:TFLRECharClass=[#0..#255];
  
        // State flags
        sfEmptyBeginLine=1 shl 0;
  