function operator=(x,y: Stack): boolean; extensionmethod; begin Result := True end; function operator<>(x,y: Stack): boolean; extensionmethod; begin Result := not(x = y); end; begin var a1 := new Stack; var a2 := new Stack; assert(a1 = a2); assert(not (a1 <> a2)); end.