diff options
Diffstat (limited to 'libguile/list.c')
-rw-r--r-- | libguile/list.c | 10 |
1 files changed, 10 insertions, 0 deletions
diff --git a/libguile/list.c b/libguile/list.c index 9799dabee..a1a79a43a 100644 --- a/libguile/list.c +++ b/libguile/list.c @@ -570,6 +570,16 @@ SCM_SNARF_DOCS (primitive, scm_list_copy, "list", (SCM objs), 0, 0, 1, "Return a list containing @var{objs}, the arguments to\n" "@code{list}.") +/* This used to be the code for "list", but it's wrong when used via apply + (it should copy the list). It seems pretty unlikely anyone would have + been using this from C code, since it's a no-op, but keep it for strict + binary compatibility. */ +SCM +scm_list (SCM objs) +{ + return objs; +} + /* membership tests (memq, memv, etc.) */ |