anchor.diff:      ntANY:begin
        result:=result+'.';
       end;
  -    ntPAREN:begin
  +    ntPAREN,ntMANY:begin
        result:='('+ProcessNode(Node^.Left)+')';
       end;
       ntQUEST:begin
  
positive.code:        end;
        end;
       end;
       opZEROWIDTH:begin
        if ((longword(Instruction^.Value) and sfEmptyAllFlags) and not ThreadLocalStorageInstance.GetSatisfyFlags(Position))=0 then begin
         Instruction:=Instruction^.Next;
  
negative.code:    Argument:=Stack[StackPointer].Argument;
     while assigned(Node) do begin
      case Node^.NodeType of
       ntPAREN,ntMANY:begin
        case Argument of
         1:begin
          if assigned(Node^.Left) then begin
  