diff options
author | Andy Wingo <wingo@pobox.com> | 2011-02-09 23:01:37 +0100 |
---|---|---|
committer | Andy Wingo <wingo@pobox.com> | 2011-02-09 23:17:09 +0100 |
commit | 5a5885215afae3c547ae6ca10e769704b0f7e3d9 (patch) | |
tree | 639005ba64fc5da88e6c8da20a3ffa3aa8477310 /libguile/srfi-1.c | |
parent | 6245ea944026e8897a6a36ce39db537fd3a77cad (diff) | |
download | guile-5a5885215afae3c547ae6ca10e769704b0f7e3d9.tar.gz |
fix recursive throws if an error occurs at boot-time
* libguile/throw.c (find_pre_init_catch): New internal helper.
(pre_init_throw): If we don't find a catch, print out a message and
abort.
(scm_init_throw): Declare pre-init-throw as taking at least one arg.
Diffstat (limited to 'libguile/srfi-1.c')
0 files changed, 0 insertions, 0 deletions