[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
master 2a8ad64ddd9 2/2: Revert "Don't use pointer arithmetic for untaggi
From: |
Eli Zaretskii |
Subject: |
master 2a8ad64ddd9 2/2: Revert "Don't use pointer arithmetic for untagging Lisp values" |
Date: |
Sat, 16 Sep 2023 13:04:48 -0400 (EDT) |
branch: master
commit 2a8ad64ddd9b0d0511a91adcbb73a0e7e7930f19
Author: Eli Zaretskii <eliz@gnu.org>
Commit: Eli Zaretskii <eliz@gnu.org>
Revert "Don't use pointer arithmetic for untagging Lisp values"
This reverts commit 056c99a34c143e1b5162366db07a143ac2b10631.
It broke compilation of 32-bit build --with-wide-int.
---
src/lisp.h | 2 +-
1 file changed, 1 insertion(+), 1 deletion(-)
diff --git a/src/lisp.h b/src/lisp.h
index 35a88d9b238..50b68f2e767 100644
--- a/src/lisp.h
+++ b/src/lisp.h
@@ -811,7 +811,7 @@ INLINE void
extracted pointer's type is CTYPE *. */
#define XUNTAG(a, type, ctype) ((ctype *) \
- ((uintptr_t) XLP (a) - LISP_WORD_TAG (type)))
+ ((char *) XLP (a) - LISP_WORD_TAG (type)))
/* A forwarding pointer to a value. It uses a generic pointer to
avoid alignment bugs that could occur if it used a pointer to a