Revert "core: length: Check parameter."
authorJan Nieuwenhuizen <janneke@gnu.org>
Mon, 30 Apr 2018 18:47:05 +0000 (20:47 +0200)
committerJan Nieuwenhuizen <janneke@gnu.org>
Mon, 30 Apr 2018 18:47:05 +0000 (20:47 +0200)
This reverts commit 1f52ed35c66febcce16e06868e803a39be7eda41.

src/mes.c

index 8bd705614aecf5e9ba1f637e429af9bf67825bc7..4f787929a016363ad02b7bb303716abc882b8119 100644 (file)
--- a/src/mes.c
+++ b/src/mes.c
@@ -520,8 +520,6 @@ length__ (SCM x) ///((internal))
 SCM
 length (SCM x)
 {
-  if (x != cell_nil && TYPE (x) != TPAIR)
-    error (cell_symbol_not_a_pair, x);
   return MAKE_NUMBER (length__ (x));
 }