summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorAndy Wingo <wingo@pobox.com>2019-10-07 14:22:54 +0200
committerAndy Wingo <wingo@pobox.com>2019-11-07 16:46:53 +0100
commitf2c8ff5a52eb7073b50151d5d14d2e6ab351fa4f (patch)
treeabdcb98b5a3356caaa674fb2689d8baa7a7b48b2
parent3c73d77e2a5865b4b006e7363791dae7617cb5ac (diff)
downloadguile-f2c8ff5a52eb7073b50151d5d14d2e6ab351fa4f.tar.gz
Remove boot "catch" definition.
* libguile/throw.c (scm_init_throw): Remove boot definition of "catch".
-rw-r--r--libguile/throw.c9
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));