suzanne.soy/racket
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

no dprintf() macro in libunwind to avoid collisions on some platforms

Browse Source
This commit is contained in:
Matthew Flatt 2013-07-23 19:55:23 -06:00
parent 245a688c2e
commit a31e9b29e0
2 changed files with 4 additions and 4 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

4
racket/src/racket/src/unwind/libunwind.c
View File

@ -1774,7 +1774,7 @@ apply_reg_state (struct dwarf_cursor *c, struct dwarf_reg_state *rs)
if (c->ip == prev_ip && c->cfa == prev_cfa)
{
dprintf ("%s: ip and cfa unchanged; stopping here (ip=0x%lx)\n",
Dprintf ("%s: ip and cfa unchanged; stopping here (ip=0x%lx)\n",
__FUNCTION__, (long) c->ip);
return -UNW_EBADFRAME;
}
@ -1839,7 +1839,7 @@ dwarf_find_save_locs (struct dwarf_cursor *c)
memcpy(rs, rs1, offsetof(struct dwarf_reg_state, ip));
if (!rs)
{
dprintf ("%s: failed to create unwind rs\n", __FUNCTION__);
Dprintf ("%s: failed to create unwind rs\n", __FUNCTION__);
ret = -UNW_EUNSPEC;
goto out;
}

4
racket/src/racket/src/unwind/libunwind_i.h
View File

@ -212,14 +212,14 @@ do { \
fprintf (stderr, format); \
} \
} while (0)
# define dprintf(format...) fprintf (stderr, format)
# define Dprintf(format...) fprintf (stderr, format)
# ifdef __GNUC__
# undef inline
# define inline UNUSED
# endif
#else
# define Debug(level,format...)
# define dprintf(format...)
# define Dprintf(format...)
#endif
static ALWAYS_INLINE int