diff --git a/libguile/ChangeLog b/libguile/ChangeLog index 195e6ed93..862fcdf9f 100644 --- a/libguile/ChangeLog +++ b/libguile/ChangeLog @@ -1,3 +1,13 @@ +Mon Oct 7 00:14:17 1996 Mikael Djurfeldt + + * init.c (scm_boot_guile_1): Bugfix: i --> base in argument to + `scm_init_threads'. + + * throw.h (scm_catch_apply): Removed the `lazyp' argument. + + * throw.c (scm_catch_apply): Finished implementation of + `lazy-catch'. + Sun Oct 6 05:26:05 1996 Gary Houston * filesys.c (scm_sys_select): move SCM_ALLOW_INTS past the sreturn diff --git a/libguile/root.c b/libguile/root.c index 424afd13f..9fb6fbd8b 100644 --- a/libguile/root.c +++ b/libguile/root.c @@ -214,7 +214,7 @@ cwdr (proc, a1, args, handler, stack_start) #endif /* Catch all errors. */ - answer = scm_catch_apply (SCM_BOOL_T, proc, a1, args, handler, 0); + answer = scm_catch_apply (SCM_BOOL_T, proc, a1, args, handler); scm_dowinds (old_winds, - scm_ilength (old_winds)); SCM_REDEFER_INTS;