function pointer.operator+(left,right:pointer):pointer;
begin
  writeln('XXX');
end;

var p:pointer;

begin
  p:=p+p;
end.