+ ptr->is_allocated= MEMCACHED_USED;
+}
+
+/*
+ clone is the destination, while ptr is the structure to clone.
+ If ptr is NULL the call is the same as if a memcached_create() was
+ called.
+*/
+memcached_st *memcached_clone(memcached_st *clone, memcached_st *ptr)
+{
+ memcached_return rc= MEMCACHED_SUCCESS;
+ memcached_st *new_clone;
+
+ if (ptr == NULL)
+ return memcached_create(clone);
+
+ if (ptr->is_allocated == MEMCACHED_USED)
+ {
+ WATCHPOINT_ASSERT(0);
+ return NULL;
+ }
+
+ new_clone= memcached_create(clone);
+
+ if (new_clone == NULL)
+ return NULL;
+
+ if (ptr->hosts)
+ rc= memcached_server_push(new_clone, ptr->hosts);
+
+ if (rc != MEMCACHED_SUCCESS)
+ {
+ memcached_free(new_clone);
+
+ return NULL;
+ }
+
+
+ new_clone->flags= ptr->flags;
+ new_clone->send_size= ptr->send_size;
+ new_clone->recv_size= ptr->recv_size;
+ new_clone->poll_timeout= ptr->poll_timeout;
+ new_clone->distribution= ptr->distribution;
+ new_clone->hash= ptr->hash;
+
+ return new_clone;