Fcalva/cyclone
1
0
Fork 0
mirror of https://github.com/justinethier/cyclone.git synced 2025-07-16 09:17:35 +02:00
Code Issues Projects Releases Packages Wiki Activity Actions

Enhance debug capability via GC_DEBUG_TRACE

Browse source
This commit is contained in:
Justin Ethier 2018-07-14 22:23:51 -04:00
parent 1343490c9b
commit 133adce4c1
1 changed files with 5 additions and 1 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

6
runtime.c
View file

@ -60,8 +60,12 @@ const char *tag_names[] = {
void Cyc_invalid_type_error(void *data, int tag, object found) void Cyc_invalid_type_error(void *data, int tag, object found)
{ {
char buf[256]; char buf[256];
#if GC_DEBUG_TRACE
// Object address can be very useful for GC debugging
snprintf(buf, 255, "Invalid type: expected %s, found (%p) ", tag_names[tag], found);
#else
snprintf(buf, 255, "Invalid type: expected %s, found ", tag_names[tag]); snprintf(buf, 255, "Invalid type: expected %s, found ", tag_names[tag]);
//snprintf(buf, 255, "Invalid type: expected %s, found (%p) ", tag_names[tag], found); #endif
Cyc_rt_raise2(data, buf, found); Cyc_rt_raise2(data, buf, found);
} }