From 94b05d6852d04f44287f8150c0216dc3313fa750 Mon Sep 17 00:00:00 2001
From: toy <toy>
Date: Wed, 23 Jan 2002 19:04:13 +0000
Subject: [PATCH] From Eric Marsden:

There is an incorrect gc_assert in lisp/gc.c in the function
from_space_p. The argument is not necessarily a descriptor; it may be
an untagged pointer, in which case the assertion is false. This causes
rebuild to fail on SPARC when GC assertions are enabled.

This observation is due to Daniel Barlow (and is fixed in SBCL).
---
 lisp/gc.c | 4 +---
 1 file changed, 1 insertion(+), 3 deletions(-)

diff --git a/lisp/gc.c b/lisp/gc.c
index 36ad2a2be..d8e355640 100644
--- a/lisp/gc.c
+++ b/lisp/gc.c
@@ -1,7 +1,7 @@
 /*
  * Stop and Copy GC based on Cheney's algorithm.
  *
- * $Header: /Volumes/share2/src/cmucl/cvs2git/cvsroot/src/lisp/gc.c,v 1.18 2000/11/06 17:18:25 dtc Exp $
+ * $Header: /Volumes/share2/src/cmucl/cvs2git/cvsroot/src/lisp/gc.c,v 1.19 2002/01/23 19:04:13 toy Exp $
  * 
  * Written by Christopher Hoover.
  */
@@ -59,8 +59,6 @@ boolean from_space_p(lispobj object)
 {
 	lispobj *ptr;
 
-	gc_assert(Pointerp(object));
-
 	ptr = (lispobj *) PTR(object);
 
 	return ((from_space <= ptr) &&
-- 
GitLab