* debug.h, debug.c (scm_start_stack): New function. Implements

the guts of old scm_m_start_stack.

diff --git a/libguile/debug.h b/libguile/debug.h
index e77edeb..1780310 100644 (file)
--- a/libguile/debug.h
+++ b/libguile/debug.h
@@ -181,6 +181,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_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));
 extern SCM scm_procedure_name SCM_P ((SCM proc));