anchor.diff:   end;
   end;
   
  -function TFLRE.NewNOP:PFLRENode;
  -begin
  - result:=NewNode(ntZEROWIDTH,nil,nil,sfEmptyNoOperation);
  +function TFLRE.NewEmptyMatch:PFLRENode;
  +begin
  + result:=NewNode(ntZEROWIDTH,nil,nil,sfEmptyMatch);
   end;
   
   function TFLRE.NewAlt(NodeLeft,NodeRight:PFLRENode):PFLRENode;
  
positive.code:   end;
   end;
   function ParseDisjunction:PFLRENode; forward;
   procedure GetCharClassPerName(const Name:TFLRERawByteString;const UnicodeCharClass:TFLREUnicodeCharClass;const IgnoreCase:boolean);
   var i:longint;
       f:int64;
   begin
    begin
     f:=UnicodeClassHashMap[Name];
     if f>0 then begin
      UnicodeCharClass.AddUnicodeCategory(f,IgnoreCase);
      UnicodeCharClass.Canonicalized:=true;
  
negative.code:     UnicodeCharClass.Canonicalize;
     end;
     UnicodeCharClass.Canonicalized:=true;
    end else if (WithLowerCase and (LowerCaseName='lower')) or
                ((not WithLowerCase) and (Name='Lower')) then begin
     if rfUTF8 in Flags then begin
      UnicodeCharClass.AddUnicodeCategory(1 shl FLREUnicodeCategoryLl,IgnoreCase);
     end else begin
      UnicodeCharClass.AddRange(ord('a'),ord('z'),IgnoreCase);
     end;
     UnicodeCharClass.Canonicalized:=true;
    end else if (WithLowerCase and (LowerCaseName='print')) or
                ((not WithLowerCase) and (Name='Print')) then begin
     if rfUTF8 in Flags then begin
      UnicodeCharClass.AddUnicodeCategory((1 shl FLREUnicodeCategoryCc) or (1 shl FLREUnicodeCategoryCf) or (1 shl FLREUnicodeCategoryCo) or (1 shl FLREUnicodeCategoryCs) or (1 shl FLREUnicodeCategoryCn),IgnoreCase);
     end else begin
      UnicodeCharClass.AddRange($20,$7e,IgnoreCase);
     end;
     UnicodeCharClass.Canonicalized:=true;
    end else if (WithLowerCase and (LowerCaseName='punct')) or
                ((not WithLowerCase) and (Name='Punct')) then begin
     if rfUTF8 in Flags then begin
      UnicodeCharClass.AddUnicodeCategory((1 shl FLREUnicodeCategoryPd) or (1 shl FLREUnicodeCategoryPs) or (1 shl FLREUnicodeCategoryPe) or (1 shl FLREUnicodeCategoryPc) or (1 shl FLREUnicodeCategoryPo),IgnoreCase);
     end else begin
  