1 files changed, 1 insertions, 1 deletions

diff --git a/src/bytecode.c b/src/bytecode.c
index 9356ebeb6cb..b26146c27f3 100644
--- a/src/bytecode.c
+++ b/src/bytecode.c
@@ -393,7 +393,7 @@ sf_get_ptr (Lisp_Object *fp, enum stack_frame_index index)
 INLINE void
 sf_set_ptr (Lisp_Object *fp, enum stack_frame_index index, void *value)
 {
-  fp[index] = XIL ((EMACS_INT)value);
+  fp[index] = XIL ((uintptr_t)value);
 }
 
 INLINE Lisp_Object *