mirror of
https://git.savannah.gnu.org/git/guile.git
synced 2025-06-12 14:50:19 +02:00
*** empty log message ***
This commit is contained in:
parent
780d8c6e7f
commit
e93ffe595c
2 changed files with 11 additions and 1 deletions
|
@ -1,3 +1,13 @@
|
||||||
|
Mon Oct 7 00:14:17 1996 Mikael Djurfeldt <mdj@kenneth>
|
||||||
|
|
||||||
|
* 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 <ghouston@actrix.gen.nz>
|
Sun Oct 6 05:26:05 1996 Gary Houston <ghouston@actrix.gen.nz>
|
||||||
|
|
||||||
* filesys.c (scm_sys_select): move SCM_ALLOW_INTS past the sreturn
|
* filesys.c (scm_sys_select): move SCM_ALLOW_INTS past the sreturn
|
||||||
|
|
|
@ -214,7 +214,7 @@ cwdr (proc, a1, args, handler, stack_start)
|
||||||
#endif
|
#endif
|
||||||
|
|
||||||
/* Catch all errors. */
|
/* 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_dowinds (old_winds, - scm_ilength (old_winds));
|
||||||
SCM_REDEFER_INTS;
|
SCM_REDEFER_INTS;
|
||||||
|
|
Loading…
Add table
Add a link
Reference in a new issue