diff options
author | Andy Wingo <wingo@pobox.com> | 2019-10-07 14:22:54 +0200 |
---|---|---|
committer | Andy Wingo <wingo@pobox.com> | 2019-11-07 16:46:53 +0100 |
commit | f2c8ff5a52eb7073b50151d5d14d2e6ab351fa4f (patch) | |
tree | abdcb98b5a3356caaa674fb2689d8baa7a7b48b2 | |
parent | 3c73d77e2a5865b4b006e7363791dae7617cb5ac (diff) | |
download | guile-f2c8ff5a52eb7073b50151d5d14d2e6ab351fa4f.tar.gz |
Remove boot "catch" definition.
* libguile/throw.c (scm_init_throw): Remove boot definition of "catch".
-rw-r--r-- | libguile/throw.c | 9 |
1 files changed, 4 insertions, 5 deletions
diff --git a/libguile/throw.c b/libguile/throw.c index 2fd25fcc6..055ad87d2 100644 --- a/libguile/throw.c +++ b/libguile/throw.c @@ -1,4 +1,4 @@ -/* Copyright 1995-1998,2000-2001,2003-2004,2006,2008,2009-2014,2017-2018 +/* Copyright 1995-1998,2000-2001,2003-2004,2006,2008,2009-2014,2017-2019 Free Software Foundation, Inc. This file is part of Guile. @@ -54,9 +54,9 @@ #include "throw.h" -/* Pleasantly enough, the guts of catch are defined in Scheme, in terms - of prompt, abort, and the %exception-handler fluid. Check boot-9 for - the definitions. +/* Pleasantly enough, the guts of exception handling are defined in + Scheme, in terms of prompt, abort, and the %exception-handler fluid. + Check boot-9 for the definitions. Still, it's useful to be able to throw unwind-only exceptions from C, for example so that we can recover from stack overflow. We also need @@ -661,7 +661,6 @@ scm_init_throw () throw, and with-throw-handler are created in boot-9.scm. */ scm_c_define ("%exception-handler", exception_handler_fluid); - scm_c_define ("catch", scm_c_make_gsubr ("catch", 3, 1, 0, catch)); throw_var = scm_c_define ("throw", scm_c_make_gsubr ("throw", 1, 0, 1, throw_without_pre_unwind)); |