Remove special-casing of tagged pointers.

This partially reverts commit
09b2b8a5ce5b542856f93b645db51eb11cf9855a.

* src/alloc.c (mark_maybe_pointer): Remove special-casing of tagged
pointers.  After commit 09d746dad36e4780d379f975a84b1b076da78c50,
modules no longer rely on tagged pointers.

diff --git a/src/alloc.c b/src/alloc.c
index dd783863be870b45087fa424276d550802c2fc8b..70701d75d479320a45d2555dd83b2c98b6ef6b5d 100644 (file)
--- a/src/alloc.c
+++ b/src/alloc.c
@@ -4863,17 +4863,8 @@ mark_maybe_pointer (void *p)
   VALGRIND_MAKE_MEM_DEFINED (&p, sizeof (p));
 #endif
 
-  if (sizeof (Lisp_Object) == sizeof (void *) || !HAVE_MODULES)
-    {
-      if (!maybe_lisp_pointer (p))
-        return;
-    }
-  else
-    {
-      /* For the wide-int case, also mark emacs_value tagged pointers,
-        which can be generated by emacs-module.c's value_to_lisp.  */
-      p = (void *) ((uintptr_t) p & ~((1 << GCTYPEBITS) - 1));
-    }
+  if (!maybe_lisp_pointer (p))
+    return;
 
   if (pdumper_object_p (p))
     {