summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorDavid Kastrup <dak@gnu.org>2013-02-27 20:45:08 -0500
committerThien-Thi Nguyen <ttn@gnu.org>2020-12-13 23:39:59 -0500
commit6c76a42de1d33c8306db3ce958899b5f0216c240 (patch)
tree27f1ea938b8595da8092363d98bfeb966a219e35
parent4613c52c3b828a4f4037d3ffe0ed4e12bbbfd7e9 (diff)
downloadguile-6c76a42de1d33c8306db3ce958899b5f0216c240.tar.gz
Let reverse! accept arbitrary types as second argument (new_tail)
Backport from ‘master’. See <https://debbugs.gnu.org/cgi/bugreport.cgi?bug=13835>. * libguile/list.c (scm_reverse_x): remove typecheck for 2nd arg. Signed-off-by: Mark H Weaver <mhw@netris.org>
-rw-r--r--libguile/list.c2
1 files changed, 0 insertions, 2 deletions
diff --git a/libguile/list.c b/libguile/list.c
index 07b96f5a7..e8b19767a 100644
--- a/libguile/list.c
+++ b/libguile/list.c
@@ -374,8 +374,6 @@ SCM_DEFINE (scm_reverse_x, "reverse!", 1, 1, 0,
SCM_VALIDATE_LIST (1, lst);
if (SCM_UNBNDP (new_tail))
new_tail = SCM_EOL;
- else
- SCM_VALIDATE_LIST (2, new_tail);
while (!SCM_NULL_OR_NIL_P (lst))
{