Archipelago

	else

		obj_h->obj_size = size;

	/* request space of an xhash of sizeshift 3 */

	xhash = (xhash_t *) xheap_allocate(heap, xhash_get_alloc_size(3));

	if (!xhash)

		//ugly

		if (r == -XHASH_ERESIZE) {

			ul_t sizeshift = grow_size_shift(allocated);

			uint64_t size;

			xhash_t *new;

			size = xhash_get_alloc_size(sizeshift); 

			//printf("%llu\n", xheap_get_chunk_size(allocated));

			new = xheap_allocate(heap, size);

//			printf("requested %llu, got %llu\n", size, xheap_get_chunk_size(new));

		}

	}

	do {

		objptr = obj_h->list;

		obj->next = objptr; 

	}while(!__sync_bool_compare_and_swap(&obj_h->list, objptr, XPTR_MAKE((unsigned long) mem, container)));