aboutsummaryrefslogtreecommitdiffstats
path: root/src/alloc.c
diff options
context:
space:
mode:
authorPaul Eggert2012-02-25 17:09:59 -0800
committerPaul Eggert2012-02-25 17:09:59 -0800
commita9a769fba6dd1f3db1777c48b81f6d50627d5001 (patch)
tree41e0b89b6fc2ebbb7ad20ee945fa0e809ab0cc89 /src/alloc.c
parentea8fb88d46c612939011aad40dd131e1f9659c91 (diff)
downloademacs-a9a769fba6dd1f3db1777c48b81f6d50627d5001.tar.gz
emacs-a9a769fba6dd1f3db1777c48b81f6d50627d5001.zip
* alloc.c (mark_memory): Conditionalize recent fix on USE_USB_TAG.
Diffstat (limited to 'src/alloc.c')
-rw-r--r--src/alloc.c2
1 files changed, 2 insertions, 0 deletions
diff --git a/src/alloc.c b/src/alloc.c
index 21c4db4ddca..a3e8033db18 100644
--- a/src/alloc.c
+++ b/src/alloc.c
@@ -4312,12 +4312,14 @@ mark_memory (void *start, void *end)
4312 void *w = *(void **) ((char *) pp + i); 4312 void *w = *(void **) ((char *) pp + i);
4313 mark_maybe_pointer (w); 4313 mark_maybe_pointer (w);
4314 4314
4315#ifdef USE_LSB_TAG
4315 /* A host where a Lisp_Object is wider than a pointer might 4316 /* A host where a Lisp_Object is wider than a pointer might
4316 allocate a Lisp_Object in non-adjacent halves. If 4317 allocate a Lisp_Object in non-adjacent halves. If
4317 USE_LSB_TAG, the bottom half is not a valid pointer, so 4318 USE_LSB_TAG, the bottom half is not a valid pointer, so
4318 widen it to to a Lisp_Object and check it that way. */ 4319 widen it to to a Lisp_Object and check it that way. */
4319 if (sizeof w < sizeof (Lisp_Object)) 4320 if (sizeof w < sizeof (Lisp_Object))
4320 mark_maybe_object (widen_to_Lisp_Object (w)); 4321 mark_maybe_object (widen_to_Lisp_Object (w));
4322#endif
4321 } 4323 }
4322} 4324}
4323 4325