summaryrefslogtreecommitdiff
path: root/libguile/debug.c
diff options
context:
space:
mode:
authorAndy Wingo <wingo@pobox.com>2009-06-19 11:20:34 +0200
committerAndy Wingo <wingo@pobox.com>2009-06-19 11:20:34 +0200
commitce471ab8b083a345af0f49e08f51f22dbfe58efe (patch)
tree5f09dabf6205ed8f92a369c2e3715b07d8c7298b /libguile/debug.c
parent96b73e84bbb6d88c73a99bf46450642d79612be0 (diff)
downloadguile-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.c2
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);