anchor.diff:     GroupIndexIntegerStack.Add(Value);
      GroupNameStringStack.Add(Name);
      try
  -    result:=NewNode(ntPAREN,ParseDisjunction,nil,nil,Value);
  +    result:=NewNode(ntPAREN,ParseDisjunction,nil,Value);
      finally
       GroupIndexIntegerStack.Delete(GroupIndexIntegerStack.Count-1);
       GroupNameStringStack.Delete(GroupNameStringStack.Count-1);
  
positive.code:   result:=Node;
    result^.NodeType:=ntSTAR;
   end else begin
    result:=NewNode(ntPLUS,Node,nil,nil,Kind);
   end;
  end;
  
  
negative.code: function TFLRE.CopyNode(Node:PFLRENode):PFLRENode;
  begin
   if assigned(Node) then begin
    result:=NewNode(Node^.NodeType,nil,nil,Node^.Value);
    result^.Group:=Node^.Group;
    result^.Name:=Node^.Name;
    if assigned(Node^.Left) then begin
  