X-Git-Url: http://repo.macrolet.net/gitweb/?a=blobdiff_plain;f=src%2Fruntime%2Fgencgc.c;h=aec65cd83de703f311dc9607e6956535a4744f89;hb=b870615b146940f661e5d0e9069ca4e16e9f483d;hp=5fb17ea5ee42005962f8d7a91bb2192e8407ecce;hpb=d2e48d5a1805e3fb98268473a71aff38d8fd9d0b;p=sbcl.git

diff --git a/src/runtime/gencgc.c b/src/runtime/gencgc.c
index 5fb17ea..aec65cd 100644
--- a/src/runtime/gencgc.c
+++ b/src/runtime/gencgc.c
@@ -2306,6 +2306,7 @@ possibly_valid_dynamic_space_pointer(lispobj *pointer)
 #endif
 	case SIMPLE_STRING_WIDETAG:
 	case SIMPLE_BIT_VECTOR_WIDETAG:
+	case SIMPLE_ARRAY_NIL_WIDETAG:
 	case SIMPLE_ARRAY_UNSIGNED_BYTE_2_WIDETAG:
 	case SIMPLE_ARRAY_UNSIGNED_BYTE_4_WIDETAG:
 	case SIMPLE_ARRAY_UNSIGNED_BYTE_8_WIDETAG:
@@ -2389,6 +2390,7 @@ maybe_adjust_large_object(lispobj *where)
     case BIGNUM_WIDETAG:
     case SIMPLE_STRING_WIDETAG:
     case SIMPLE_BIT_VECTOR_WIDETAG:
+    case SIMPLE_ARRAY_NIL_WIDETAG:
     case SIMPLE_ARRAY_UNSIGNED_BYTE_2_WIDETAG:
     case SIMPLE_ARRAY_UNSIGNED_BYTE_4_WIDETAG:
     case SIMPLE_ARRAY_UNSIGNED_BYTE_8_WIDETAG:
@@ -3380,6 +3382,7 @@ verify_space(lispobj *start, size_t words)
 #endif
 		case SIMPLE_STRING_WIDETAG:
 		case SIMPLE_BIT_VECTOR_WIDETAG:
+		case SIMPLE_ARRAY_NIL_WIDETAG:
 		case SIMPLE_ARRAY_UNSIGNED_BYTE_2_WIDETAG:
 		case SIMPLE_ARRAY_UNSIGNED_BYTE_4_WIDETAG:
 		case SIMPLE_ARRAY_UNSIGNED_BYTE_8_WIDETAG: