anchor.diff:    if (Flags and carfDELIMITERS)<>0 then begin
      Include(RealFlags,rfDELIMITERS);
     end;
  -  if (Flags and carfSAFE)<>0 then begin
  -   Include(RealFlags,rfSAFE);
  -  end;
  -  if (Flags and carfFAST)<>0 then begin
  -   Include(RealFlags,rfFAST);
  -  end;
     try
      TFLRE(result):=TFLRE.Create(AnsiString(PtrCopy(RegularExpression,0,RegularExpressionLength)),RealFlags);
     except
  
positive.code:       carfMULTIMATCH=1 shl 7;
        carfUTF8=1 shl 8;
        carfDELIMITERS=1 shl 9;
        carfSAFE=1 shl 10;
        carfFAST=1 shl 11;
  
  type EFLRE=class(Exception);
  
  
negative.code:                 rfLONGEST,
                  rfMULTIMATCH,
                  rfUTF8,
                  rfDELIMITERS);
  
       PFLREMatchMode=^TFLREMatchMode;
       TFLREMatchMode=(mmFirstMatch,
  