int type;
size_t block, blocks, oldlimit;
- /* Only keep real realloc and hidden malloc and free to the relevant functions */
+ /* Only keep real realloc, and reroute hidden malloc and free to the relevant functions */
if (size == 0) {
- fprintf(stderr,"free from realloc...");
mfree(mdp, ptr);
- fprintf(stderr,"done\n");
return mmalloc(mdp, 0);
} else if (ptr == NULL) {
return mmalloc(mdp, size);
block = BLOCK(ptr);
type = mdp->heapinfo[block].type;
- if (type<0)
- THROWF(arg_error,0,"Asked realloc a fragment comming from a *free* block. I'm puzzled.");
switch (type) {
+ case -1:
+ fprintf(stderr, "Asked realloc a fragment comming from a *free* block. I'm puzzled.\n");
+ abort();
+ break;
+
case 0:
/* Maybe reallocate a large block to a small fragment. */
- if (size <= BLOCKSIZE / 2) {
- //printf("(%s) alloc large block...",xbt_thread_self_name());
+
+ if (size <= BLOCKSIZE / 2) { // Full block -> Fragment; no need to optimize for time
+
result = mmalloc(mdp, size);
- if (result != NULL) {
+ if (result != NULL) { // useless (mmalloc never returns NULL), but harmless
memcpy(result, ptr, size);
mfree(mdp, ptr);
return (result);