diff options
author | Andy Wingo <wingo@pobox.com> | 2009-06-19 11:20:34 +0200 |
---|---|---|
committer | Andy Wingo <wingo@pobox.com> | 2009-06-19 11:20:34 +0200 |
commit | ce471ab8b083a345af0f49e08f51f22dbfe58efe (patch) | |
tree | 5f09dabf6205ed8f92a369c2e3715b07d8c7298b /libguile/debug.c | |
parent | 96b73e84bbb6d88c73a99bf46450642d79612be0 (diff) | |
download | guile-ce471ab8b083a345af0f49e08f51f22dbfe58efe.tar.gz |
rename SCM_SNAME to SCM_SUBR_NAME
* libguile/procs.h: Rename SCM_SNAME to SCM_SUBR_NAME.
* libguile/debug.c:
* libguile/eval.c:
* libguile/eval.i.c:
* libguile/goops.c:
* libguile/gsubr.c:
* libguile/print.c:
* libguile/procs.c: Update callers.
Diffstat (limited to 'libguile/debug.c')
-rw-r--r-- | libguile/debug.c | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/libguile/debug.c b/libguile/debug.c index 6e148ab32..71278c5e4 100644 --- a/libguile/debug.c +++ b/libguile/debug.c @@ -309,7 +309,7 @@ SCM_DEFINE (scm_procedure_name, "procedure-name", 1, 0, 0, SCM_VALIDATE_PROC (1, proc); switch (SCM_TYP7 (proc)) { case scm_tcs_subrs: - return SCM_SNAME (proc); + return SCM_SUBR_NAME (proc); default: { SCM name = scm_procedure_property (proc, scm_sym_name); |