From 04ab4585e0cb506b36182f8d6b6c8218c1ea3a1c Mon Sep 17 00:00:00 2001 From: cshapiro <cshapiro> Date: Fri, 11 Apr 2008 08:00:53 +0000 Subject: [PATCH] Insert intermediate (void *) casts to eliminate strict aliasing warnings when compiling with GCC version 4. --- lisp/gencgc.c | 6 +++--- 1 file changed, 3 insertions(+), 3 deletions(-) diff --git a/lisp/gencgc.c b/lisp/gencgc.c index 8f8f393ea..eb363253f 100644 --- a/lisp/gencgc.c +++ b/lisp/gencgc.c @@ -7,7 +7,7 @@ * * Douglas Crosher, 1996, 1997, 1998, 1999. * - * $Header: /Volumes/share2/src/cmucl/cvs2git/cvsroot/src/lisp/gencgc.c,v 1.94 2008/03/19 09:17:10 cshapiro Exp $ + * $Header: /Volumes/share2/src/cmucl/cvs2git/cvsroot/src/lisp/gencgc.c,v 1.95 2008/04/11 08:00:53 cshapiro Exp $ * */ @@ -6741,7 +6741,7 @@ verify_gc(void) verify_space((lispobj *) READ_ONLY_SPACE_START, read_only_space_size); verify_space((lispobj *) static_space, static_space_size); verify_space((lispobj *) BINDING_STACK_START, binding_stack_size); - verify_space((lispobj *) & scavenger_hooks, 1); + verify_space((lispobj *) (void *) &scavenger_hooks, 1); } static void @@ -7002,7 +7002,7 @@ garbage_collect_generation(int generation, int raise) lispobj **ptr; for (ptr = (lispobj **) CONTROL_STACK_END - 1; - ptr > (lispobj **) & raise; ptr--) + ptr > (lispobj **) (void *) &raise; ptr--) preserve_pointer(*ptr); } #endif -- GitLab