changeset 12618:60c4c0fee545

(Fsafe_length): Use conservative upper bound.
author Karl Heuer <kwzh@gnu.org>
date Thu, 20 Jul 1995 20:26:06 +0000
parents 2a4a6e89558d
children 9d4a4e914215
files src/fns.c
diffstat 1 files changed, 1 insertions(+), 4 deletions(-) [+]
line wrap: on
line diff
--- a/src/fns.c	Thu Jul 20 20:02:38 1995 +0000
+++ b/src/fns.c	Thu Jul 20 20:26:06 1995 +0000
@@ -147,10 +147,7 @@
   for (tail = list; CONSP (tail); tail = XCONS (tail)->cdr)
     {
       if (EQ (tail, halftail) && len != 0)
-	{
-	  len /= 2;
-	  break;
-	}
+	break;
       len++;
       if (len & 1 == 0)
 	halftail = XCONS (halftail)->cdr;