mirror/guile
mirror/guile
1
Fork 0
mirror of https://git.savannah.gnu.org/git/guile.git synced 2025-06-24 12:20:20 +02:00
Code Activity

* error.c, error.h (scm_error_callback): Removed (see NEWS).

Browse source
This commit is contained in:
Mikael Djurfeldt 1997-08-25 12:33:50 +00:00
parent 0b89e78ee7
commit 88482b31af
4 changed files with 11 additions and 7 deletions
Download patch file Download diff file Expand all files Collapse all files

5
libguile/error.c
View file

@ -60,8 +60,6 @@
extern int errno;
void (*scm_error_callback) () = 0;
/* All errors should pass through here. */
void
scm_error (key, subr, message, args, rest)
@ -72,9 +70,6 @@ scm_error (key, subr, message, args, rest)
SCM rest;
{
SCM arg_list;
if (scm_error_callback)
(*scm_error_callback) (key, subr, message, args, rest);
arg_list = scm_listify (subr ? scm_makfrom0str (subr) : SCM_BOOL_F,
message ? scm_makfrom0str (message) : SCM_BOOL_F,
args,