comparison src/alloc.c @ 89957:c08afac24467

Revision: [e-mail]--gnu-2004/emacs--unicode--0--patch-26 Merge from emacs--cvs-trunk--0 Patches applied: * [e-mail]--gnu-2004/emacs--cvs-trunk--0--patch-466 - [e-mail]--gnu-2004/emacs--cvs-trunk--0--patch-470 Update from CVS

89956:b9eee0a7bef5

  consing_since_gc += sizeof (struct Lisp_Cons);
  cons_cells_consed++;
  return val;
}


/* Make a list of 2, 3, 4 or 5 specified objects.  */

Lisp_Object
list2 (arg1, arg2)

89957:c08afac24467

  consing_since_gc += sizeof (struct Lisp_Cons);
  cons_cells_consed++;
  return val;
}

/* Get an error now if there's any junk in the cons free list.  */
void
check_cons_list ()
{
  struct Lisp_Cons *tail = cons_free_list;

#if 0
  while (tail)
    tail = *(struct Lisp_Cons **)&tail->cdr;
#endif
}

/* Make a list of 2, 3, 4 or 5 specified objects.  */

Lisp_Object
list2 (arg1, arg2)