* debug.c (scm_reverse_lookup): Bugfix: Reinserted SCM_NIMP.

This commit is contained in:
Mikael Djurfeldt 1999-12-18 13:42:46 +00:00
commit f1e1c997b7

View file

@ -500,7 +500,7 @@ SCM
scm_reverse_lookup (SCM env, SCM data)
{
SCM names, values;
while (SCM_CONSP (SCM_CAR (env)))
while (SCM_NIMP (env) && SCM_SLOPPY_CONSP (SCM_CAR (env)))
{
names = SCM_CAAR (env);
values = SCM_CDAR (env);