From 5045e68e7015710cc94ee6cbbd8bc81bad67d625 Mon Sep 17 00:00:00 2001 From: Stefan Monnier Date: Tue, 10 Jul 2007 18:00:44 +0000 Subject: (mark_maybe_pointer): Enforce mult-of-8 alignment when using USE_LSB_TAG. Suggested by Dmitry Antipov . --- src/alloc.c | 11 ++++++++--- 1 file changed, 8 insertions(+), 3 deletions(-) (limited to 'src/alloc.c') 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); -- cgit v1.2.1 From 8991fa8fd3a215489a4e41182c35fd4a228f0f7a Mon Sep 17 00:00:00 2001 From: Stefan Monnier Date: Wed, 11 Jul 2007 15:23:37 +0000 Subject: (emacs_blocked_free): Remove unused var `bytes_used_now'. --- src/alloc.c | 2 -- 1 file changed, 2 deletions(-) (limited to 'src/alloc.c') diff --git a/src/alloc.c b/src/alloc.c index f3140da1ddc..3497234234d 100644 --- a/src/alloc.c +++ b/src/alloc.c @@ -1179,8 +1179,6 @@ emacs_blocked_free (ptr, ptr2) void *ptr; const void *ptr2; { - EMACS_INT bytes_used_now; - BLOCK_INPUT_ALLOC; #ifdef GC_MALLOC_CHECK -- cgit v1.2.1