comparison src/fns.c @ 12618:60c4c0fee545

(Fsafe_length): Use conservative upper bound.

12617:2a4a6e89558d

  /* halftail is used to detect circular lists.  */
  halftail = list;
  for (tail = list; CONSP (tail); tail = XCONS (tail)->cdr)
    {
      if (EQ (tail, halftail) && len != 0)
	{
	  len /= 2;
	  break;
	}
      len++;
      if (len & 1 == 0)
	halftail = XCONS (halftail)->cdr;
    }

12618:60c4c0fee545

  /* halftail is used to detect circular lists.  */
  halftail = list;
  for (tail = list; CONSP (tail); tail = XCONS (tail)->cdr)
    {
      if (EQ (tail, halftail) && len != 0)
	break;
      len++;
      if (len & 1 == 0)
	halftail = XCONS (halftail)->cdr;
    }