summaryrefslogtreecommitdiff
path: root/src
diff options
context:
space:
mode:
authorPhilipp Stephani <phst@google.com>2020-08-01 21:34:46 +0200
committerPhilipp Stephani <phst@google.com>2020-08-01 21:34:46 +0200
commit6ec71e829a272e562c541ef5c93213d2fac3d3d7 (patch)
tree4a0ffc31e40e5c222b566c84955fca5cda14da51 /src
parentfce47c93252fe0be14e8c169f6bab8b0fd512cab (diff)
downloademacs-6ec71e829a272e562c541ef5c93213d2fac3d3d7.tar.gz
emacs-6ec71e829a272e562c541ef5c93213d2fac3d3d7.tar.bz2
emacs-6ec71e829a272e562c541ef5c93213d2fac3d3d7.zip
* src/alloc.c (mark_maybe_object): Make overflow check conditional.
Diffstat (limited to 'src')
-rw-r--r--src/alloc.c6
1 files changed, 6 insertions, 0 deletions
diff --git a/src/alloc.c b/src/alloc.c
index e556fc86a3b..e139d8cf262 100644
--- a/src/alloc.c
+++ b/src/alloc.c
@@ -4643,7 +4643,13 @@ mark_maybe_object (Lisp_Object obj)
bool overflow
= INT_SUBTRACT_WRAPV (offset, LISP_WORD_TAG (type_tag), &offset);
+#if !defined WIDE_EMACS_INT || USE_LSB_TAG
+ /* If we don't use wide integers, then `intptr_t' should always be
+ large enough to not overflow. Furthermore, when using the least
+ significant bits as tag bits, the tag is small enough to not
+ overflow either. */
eassert (!overflow);
+#endif
void *po = (char *) ((intptr_t) (char *) XLP (obj) + offset);
/* If the pointer is in the dump image and the dump has a record