From 32786b6c40e3fdd0abe7cd9cf6705560838508d2 Mon Sep 17 00:00:00 2001
From: toy <toy>
Date: Sat, 10 Jan 2004 05:10:42 +0000
Subject: [PATCH] valid_addr shouldn't test against DYNAMIC_1_SPACE_START in
 gencgc builds because there is no dynamic 1 space.  (Minor opt.)

---
 lisp/solaris-os.c | 4 +++-
 1 file changed, 3 insertions(+), 1 deletion(-)

diff --git a/lisp/solaris-os.c b/lisp/solaris-os.c
index 0896913c4..b06723892 100644
--- a/lisp/solaris-os.c
+++ b/lisp/solaris-os.c
@@ -1,5 +1,5 @@
 /*
- * $Header: /Volumes/share2/src/cmucl/cvs2git/cvsroot/src/lisp/solaris-os.c,v 1.11 2004/01/09 04:39:06 toy Exp $
+ * $Header: /Volumes/share2/src/cmucl/cvs2git/cvsroot/src/lisp/solaris-os.c,v 1.12 2004/01/10 05:10:42 toy Exp $
  *
  * OS-dependent routines.  This file (along with os.h) exports an
  * OS-independent interface to the operating system VM facilities.
@@ -189,7 +189,9 @@ valid_addr(os_vm_address_t addr)
   return (   in_range_p(addr, READ_ONLY_SPACE_START, READ_ONLY_SPACE_SIZE)
           || in_range_p(addr, STATIC_SPACE_START   , STATIC_SPACE_SIZE   )
           || in_range_p(addr, DYNAMIC_0_SPACE_START, dynamic_space_size  )
+#ifndef GENCGC
           || in_range_p(addr, DYNAMIC_1_SPACE_START, dynamic_space_size  )
+#endif
           || in_range_p(addr, CONTROL_STACK_START  , CONTROL_STACK_SIZE  )
           || in_range_p(addr, BINDING_STACK_START  , BINDING_STACK_SIZE  ));
 }
-- 
GitLab