From mboxrd@z Thu Jan  1 00:00:00 1970
From: mdj@sourceware.cygnus.com
To: guile-cvs@sourceware.cygnus.com
Subject: guile/guile-core/libguile debug.c
Date: Thu, 29 Jul 1999 14:11:00 -0000
Message-id: <19990729211138.11630.qmail@egcs.cygnus.com>
X-SW-Source: 1999-q3/msg00170.html
List-Id: <guile-cvs.sourceware.org>

CVSROOT:	/cvs/guile
Module name:	guile
Changes by:	mdj@egcs.cygnus.com	99/07/29 14:11:37

Modified files:
	guile-core/libguile: debug.c 

Log message:
	* 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.
	
	* debug.c (scm_procedure_source): Cons SCM_IM_LAMBDA onto
	procedure source before calling scm_unmemocopy instead of faking
	an environment.