mirror/guile
mirror/guile
1
Fork 0
mirror of https://git.savannah.gnu.org/git/guile.git synced 2025-04-30 20:00:19 +02:00
Code Activity

*.[ch]: Replace GUILE_PROC w/ SCM_DEFINE.

Browse source
This commit is contained in:
Greg J. Badros 2000-01-05 19:05:23 +00:00
parent fb76446506
commit a1ec69163d
63 changed files with 582 additions and 582 deletions
Download patch file Download diff file Expand all files Collapse all files

4
libguile/error.c
View file

@ -87,7 +87,7 @@ scm_error (SCM key, const char *subr, const char *message, SCM args, SCM rest)
}
/* Scheme interface to scm_error. */
GUILE_PROC(scm_error_scm, "scm-error", 5, 0, 0,
SCM_DEFINE(scm_error_scm, "scm-error", 5, 0, 0,
(SCM key, SCM subr, SCM message, SCM args, SCM rest),
"Raise an error with key @var{key}. @var{subr} can be a string naming
the procedure associated with the error, or @code{#f}. @var{message}
@ -114,7 +114,7 @@ will usually be @code{#f}.")
}
#undef FUNC_NAME
GUILE_PROC (scm_strerror, "strerror", 1, 0, 0,
SCM_DEFINE (scm_strerror, "strerror", 1, 0, 0,
(SCM err),
"Returns the Unix error message corresponding to @var{errno}, an integer.")
#define FUNC_NAME s_scm_strerror