anchor.diff:        end;
        end else begin
         if LastPosition<Captures[0].Start then begin
  -       result:=result+PtrCopy(PAnsiChar(Input),LastPosition,Captures[0].Start-LastPosition);
  +       result:=result+FLREPtrCopy(PAnsiChar(Input),LastPosition,Captures[0].Start-LastPosition);
         end;
         CurrentPosition:=Captures[0].Start+Captures[0].Length;
         if CurrentPosition<Next then begin
  
positive.code:        function Get(const ARegularExpression:TFLRERawByteString;const AFlags:TFLREFlags=[rfDELIMITERS]):TFLRE; overload;
         function Get(const ARegularExpressions:array of TFLRERawByteString;const AFlags:TFLREFlags=[]):TFLRE; overload;
       end;
  
  function FLREGetVersion:longword; {$ifdef win32}{$ifdef cpu386}stdcall;{$endif}{$endif}
  function FLREGetVersionString:PAnsiChar; {$ifdef win32}{$ifdef cpu386}stdcall;{$endif}{$endif}
  
negative.code:             end;
              '-':begin
               if length(Captures)>1 then begin
                result:=result+FLREPtrCopy(PAnsiChar(Input),Captures[1].Start,Captures[1].Length);
               end;
               inc(i);
              end;
              '+':begin
               if length(Captures)>1 then begin
                e:=length(Captures)-1;
                result:=result+FLREPtrCopy(PAnsiChar(Input),Captures[e].Start,Captures[e].Length);
               end;
               inc(i);
              end;
  