1 files changed, 1 insertions, 1 deletions

diff --git a/src/fns.c b/src/fns.c
index a19c886e3e1..8057e429176 100644
--- a/src/fns.c
+++ b/src/fns.c
@@ -168,7 +168,7 @@ which is at least the number of distinct elements.  */)
   uintmax_t lolen = 1;
 
   if (! CONSP (list))
-    return 0;
+    return make_number (0);
 
   /* halftail is used to detect circular lists.  */
   for (tail = halftail = list; ; )