summaryrefslogtreecommitdiff
path: root/libguile/environments.c
diff options
context:
space:
mode:
authorKeisuke Nishida <kxn30@po.cwru.edu>2001-03-11 09:44:08 +0000
committerKeisuke Nishida <kxn30@po.cwru.edu>2001-03-11 09:44:08 +0000
commite0c08f17b19a4379f9ef4d2188ecaf6154e12759 (patch)
tree61a3323287987b19196426bfdce93e356eba7642 /libguile/environments.c
parente6e2e95aa53f876e25bee2b0f867350c4a2ddf7a (diff)
downloadguile-e0c08f17b19a4379f9ef4d2188ecaf6154e12759.tar.gz
Use SCM_LISTn instead of scm_listify.
Diffstat (limited to 'libguile/environments.c')
-rw-r--r--libguile/environments.c2
1 files changed, 1 insertions, 1 deletions
diff --git a/libguile/environments.c b/libguile/environments.c
index 500943327..aa14c3e0f 100644
--- a/libguile/environments.c
+++ b/libguile/environments.c
@@ -816,7 +816,7 @@ update_catch_handler (void *ptr, SCM tag, SCM args)
SCM observer = data->observer;
SCM message = scm_makfrom0str ("Observer `~A' signals `~A' error: ~S");
- return scm_cons (message, scm_listify (observer, tag, args, SCM_UNDEFINED));
+ return scm_cons (message, SCM_LIST3 (observer, tag, args));
}