(mark_maybe_pointer): Enforce mult-of-8 alignment when using

USE_LSB_TAG.  Suggested by Dmitry Antipov <dmantipov@yandex.ru>.

1 files changed, 8 insertions, 3 deletions

diff --git a/src/alloc.c b/src/alloc.c
index 7668309e59c..f3140da1ddc 100644
--- a/src/alloc.c
+++ b/src/alloc.c
@@ -4263,9 +4263,14 @@ mark_maybe_pointer (p)
 {
   struct mem_node *m;
 
-  /* Quickly rule out some values which can't point to Lisp data.  We
-     assume that Lisp data is aligned on even addresses.  */
-  if ((EMACS_INT) p & 1)
+  /* Quickly rule out some values which can't point to Lisp data.  */
+  if ((EMACS_INT) p %
+#ifdef USE_LSB_TAG
+      8 /* USE_LSB_TAG needs Lisp data to be aligned on multiples of 8.  */
+#else
+      2 /* We assume that Lisp data is aligned on even addresses.  */
+#endif
+      )
     return;
 
   m = mem_find (p);