comparison src/alloc.c @ 111670:f736e5e4fef4

* alloc.c (mark_maybe_object): Return early if given a Lisp integer (Bug#6301).

111669:ed117caa918e

/* Mark OBJ if we can prove it's a Lisp_Object.  */

static INLINE void
mark_maybe_object (Lisp_Object obj)
{
  void *po = (void *) XPNTR (obj);
  struct mem_node *m = mem_find (po);

  if (m != MEM_NIL)
    {
      int mark_p = 0;

111670:f736e5e4fef4

/* Mark OBJ if we can prove it's a Lisp_Object.  */

static INLINE void
mark_maybe_object (Lisp_Object obj)
{
  void *po;
  struct mem_node *m;

  if (INTEGERP (obj))
    return;

  po = (void *) XPNTR (obj);
  m = mem_find (po);

  if (m != MEM_NIL)
    {
      int mark_p = 0;