summaryrefslogtreecommitdiff
path: root/libguile/debug.h
diff options
context:
space:
mode:
authorMikael Djurfeldt <djurfeldt@nada.kth.se>1999-07-29 21:11:51 +0000
committerMikael Djurfeldt <djurfeldt@nada.kth.se>1999-07-29 21:11:51 +0000
commit7e3a72763caafd0d613acd53cc2b9ab1a9968bc2 (patch)
tree4353553193b27d7e5473d73996d435d5eb6f7a0c /libguile/debug.h
parentc75512d6a7e27a4b7872968886c8d0d29334859c (diff)
downloadguile-7e3a72763caafd0d613acd53cc2b9ab1a9968bc2.tar.gz
* debug.c, debug.h (scm_reverse_lookup): Added.
(scm_procedure_name): Use scm_reverse_lookup to lookup the name of internal procedure definitions; Don't use scm_i_inner_name.
Diffstat (limited to 'libguile/debug.h')
-rw-r--r--libguile/debug.h1
1 files changed, 1 insertions, 0 deletions
diff --git a/libguile/debug.h b/libguile/debug.h
index 8751ca0b0..13a599b74 100644
--- a/libguile/debug.h
+++ b/libguile/debug.h
@@ -185,6 +185,7 @@ extern int scm_ready_p SCM_P ((void));
extern void debug_print SCM_P ((SCM obj));
extern SCM scm_debug_object_p SCM_P ((SCM obj));
extern SCM scm_local_eval SCM_P ((SCM exp, SCM env));
+extern SCM scm_reverse_lookup SCM_P ((SCM env, SCM data));
extern SCM scm_start_stack SCM_P ((SCM id, SCM exp, SCM env));
extern SCM scm_procedure_environment SCM_P ((SCM proc));
extern SCM scm_procedure_source SCM_P ((SCM proc));