summaryrefslogtreecommitdiffstats
path: root/unwind.c
diff options
context:
space:
mode:
authorKaz Kylheku <kaz@kylheku.com>2009-11-01 09:25:42 -0800
committerKaz Kylheku <kaz@kylheku.com>2009-11-01 09:25:42 -0800
commit08cebd08c7645737d44de8a801af7c2df7874571 (patch)
tree78969e3fda526f41a4b846652fccd30b53e14b48 /unwind.c
parent04ed380c4a389c0c21eae8e3cd35e7e44506a2e3 (diff)
downloadtxr-08cebd08c7645737d44de8a801af7c2df7874571.tar.gz
txr-08cebd08c7645737d44de8a801af7c2df7874571.tar.bz2
txr-08cebd08c7645737d44de8a801af7c2df7874571.zip
Bug ID 27895: Calls to protect have an argument list terminated
by the integer constant 0 rather than a proper null pointer constant.
Diffstat (limited to 'unwind.c')
-rw-r--r--unwind.c2
1 files changed, 1 insertions, 1 deletions
diff --git a/unwind.c b/unwind.c
index 1a8cb987..8c817da5 100644
--- a/unwind.c
+++ b/unwind.c
@@ -361,7 +361,7 @@ void uw_continue(uw_frame_t *current, uw_frame_t *cont)
void uw_init(void)
{
- protect(&toplevel_env.ev.func_bindings, &exception_subtypes, 0);
+ protect(&toplevel_env.ev.func_bindings, &exception_subtypes, (obj_t **) 0);
exception_subtypes = cons(cons(t, nil), exception_subtypes);
uw_register_subtype(type_error, error);
uw_register_subtype(internal_err, error);