diff options
author | Greg J. Badros <gjb@cs.washington.edu> | 1999-12-14 17:41:59 +0000 |
---|---|---|
committer | Greg J. Badros <gjb@cs.washington.edu> | 1999-12-14 17:41:59 +0000 |
commit | e8e9b690b4f0394f958e0613bc2a4d5e8c524518 (patch) | |
tree | 9368d40ade081bf917992e8f6092cc6d95104963 /libguile/backtrace.c | |
parent | 5623a9b4590618773e7969b512850cd92bfd79ed (diff) | |
download | guile-e8e9b690b4f0394f958e0613bc2a4d5e8c524518.tar.gz |
* backtrace.c (scm_set_print_params_x): Renamed from
set_print_params_x.
* guile-doc-snarf.in: Use guile-snarf.awk, not
guile-doc-snarf.awk. Pass the basename of $filename
* load.h: Added prototypes for scm_sys_library_dir,
scm_sys_site_dir.
* load.c (scm_sys_library_dir, scm_sys_site_dir): Added these
functions, and took out the old scm_library_dir, scm_site_dir,
scm_pkgdata_dir. Now the primitives are %package-data-dir
(already existed), %library-dir, and %site-dir.
* debug.c: Use SCM_MISC_ERROR when possible instead of using
s_scm_* in a scm_misc_error() call.
* Makefile.am: Use guile-snarf.awk, not guile-doc-snarf.awk. Make
using guile-doc-snarf send stdout to $@ to create the .x file like
guile-snarf does.
* guile-snarf.awk.in: Added.
Diffstat (limited to 'libguile/backtrace.c')
-rw-r--r-- | libguile/backtrace.c | 6 |
1 files changed, 3 insertions, 3 deletions
diff --git a/libguile/backtrace.c b/libguile/backtrace.c index a246e1903..c471077d7 100644 --- a/libguile/backtrace.c +++ b/libguile/backtrace.c @@ -285,10 +285,10 @@ static print_params_t default_print_params[] = { static print_params_t *print_params = default_print_params; #ifdef GUILE_DEBUG -GUILE_PROC(set_print_params_x, "set-print-params!", 1, 0, 0, +GUILE_PROC(scm_set_print_params_x, "set-print-params!", 1, 0, 0, (SCM params), "") -#define FUNC_NAME s_set_print_params_x +#define FUNC_NAME s_scm_set_print_params_x { int i, n = scm_ilength (params); SCM ls; @@ -302,7 +302,7 @@ GUILE_PROC(set_print_params_x, "set-print-params!", 1, 0, 0, && SCM_INUM (SCM_CADAR (ls)) >= 0, params, SCM_ARG2, - s_set_print_params_x); + s_scm_set_print_params_x); new_params = scm_must_malloc (n * sizeof (print_params_t), FUNC_NAME); if (print_params != default_print_params) |