summaryrefslogtreecommitdiff
path: root/libguile/struct.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/struct.c
parente6e2e95aa53f876e25bee2b0f867350c4a2ddf7a (diff)
downloadguile-e0c08f17b19a4379f9ef4d2188ecaf6154e12759.tar.gz
Use SCM_LISTn instead of scm_listify.
Diffstat (limited to 'libguile/struct.c')
-rw-r--r--libguile/struct.c4
1 files changed, 1 insertions, 3 deletions
diff --git a/libguile/struct.c b/libguile/struct.c
index 3c15deb53..b57d1996f 100644
--- a/libguile/struct.c
+++ b/libguile/struct.c
@@ -534,9 +534,7 @@ SCM_DEFINE (scm_make_vtable_vtable, "make-vtable-vtable", 2, 0, 1,
SCM_VALIDATE_INUM (2, tail_array_size);
SCM_VALIDATE_REST_ARGUMENT (init);
- fields = scm_string_append (scm_listify (required_vtable_fields,
- user_fields,
- SCM_UNDEFINED));
+ fields = scm_string_append (SCM_LIST2 (required_vtable_fields, user_fields));
layout = scm_make_struct_layout (fields);
basic_size = SCM_SYMBOL_LENGTH (layout) / 2;
tail_elts = SCM_INUM (tail_array_size);