mirror/guile
mirror/guile
1
Fork 0
mirror of https://git.savannah.gnu.org/git/guile.git synced 2025-06-01 01:40:21 +02:00
Code Activity

* root.c (cwdr_outer_body): Bugfix: Pass c' instead of &c' to

Browse source 
scm_internal_catch.
This commit is contained in:
Marius Vollmer 1997-07-03 15:22:59 +00:00
parent ec918b9b2e
commit beec890ea8
1 changed files with 1 additions and 1 deletions
Download patch file Download diff file Expand all files Collapse all files

2
libguile/root.c
View file

@ -224,7 +224,7 @@ cwdr_outer_body (void *data, SCM jmpbuf)
struct cwdr_body_data *c = (struct cwdr_body_data *) data; struct cwdr_body_data *c = (struct cwdr_body_data *) data;
return scm_internal_catch (SCM_BOOL_T, return scm_internal_catch (SCM_BOOL_T,
cwdr_inner_body, &c, cwdr_inner_body, c,
scm_handle_by_proc, &c->handler); scm_handle_by_proc, &c->handler);
} }