void chpl_track_malloc(void* memAlloc, size_t number, size_t size,
chpl_mem_descInt_t description,
int32_t lineno, int32_t filename) {
if (number * size > memThreshold) {
if (chpl_memTrack && chpl_mem_descTrack(description)) {
memTrack_lock();
addMemTableEntry(memAlloc, number, size, description, lineno, filename);
memTrack_unlock();
}
if (chpl_verbose_mem) {
fprintf(memLogFile, "%" PRI_c_nodeid_t ": %s:%" PRId32
": allocate %zuB of %s at %p\n",
chpl_nodeID, (filename ? chpl_lookupFilename(filename) : "--"),
lineno, number * size, chpl_mem_descString(description),
memAlloc);
}
}
}
void chpl_track_malloc(void* memAlloc, size_t number, size_t size,
chpl_mem_descInt_t description,
int32_t lineno, c_string filename) {
if (number * size > memThreshold) {
if (chpl_memTrack) {
chpl_sync_lock(&memTrack_sync);
addMemTableEntry(memAlloc, number, size, description, lineno, filename);
chpl_sync_unlock(&memTrack_sync);
}
if (chpl_verbose_mem) {
fprintf(memLogFile,
"%" FORMAT_c_nodeid_t ": %s:%" PRId32
": allocate %zuB of %s at %p\n",
chpl_nodeID, (filename ? filename : "--"), lineno,
number*size, chpl_mem_descString(description), memAlloc);
}
}
}
