Backport193

#define GC_PROF_SET_MALLOC_INFO do {\

if (objspace->profile.run) {\

gc_profile_record *record = &objspace->profile.record[objspace->profile.count];\

record->allocate_limit = malloc_limit; \

}\

} while(0)

struct {

size_t limit;

size_t increase;

#if CALC_EXACT_MALLOC_SIZE

size_t allocated_size;

size_t allocations;

#endif

#define malloc_limit objspace->malloc_params.limit

#define malloc_increase objspace->malloc_params.increase

#define heaps objspace->heap.ptr

#define heaps_length objspace->heap.length

#define heaps_used objspace->heap.used

size += sizeof(size_t);

#endif

if ((ruby_gc_stress && !ruby_disable_gc_stress) ||

garbage_collect_with_gvl(objspace);

}

static inline void *

vm_malloc_fixup(rb_objspace_t *objspace, void *mem, size_t size)

{

#if CALC_EXACT_MALLOC_SIZE

objspace->malloc_params.allocated_size += size;

objspace->malloc_params.allocations++;

objspace->heap.sweep_slots = heaps;

objspace->heap.free_num = 0;

/* sweep unlinked method entries */

if (GET_VM()->unlinked_method_entry_list) {

rb_sweep_method_entry(GET_VM());

heaps_increment(objspace);

}

malloc_limit += (size_t)((malloc_increase - malloc_limit) * (double)objspace->heap.live_num / (heaps_used * HEAP_OBJ_LIMIT));

if (malloc_limit < initial_malloc_limit) malloc_limit = initial_malloc_limit;

}

malloc_increase = 0;

free_unused_heaps(objspace);

}