X-Git-Url: http://repo.macrolet.net/gitweb/?a=blobdiff_plain;f=src%2Fruntime%2Fgc-internal.h;h=114f5142eda178b7cf64450b053749b81b37d3c6;hb=77d94d36bcfd3d5eea73ad51e6ee621a8938f995;hp=78aeaa08249c5e0d393253512036f85cf6e6d616;hpb=a608f5895479f67690a819a781cdb75641b13c61;p=sbcl.git diff --git a/src/runtime/gc-internal.h b/src/runtime/gc-internal.h index 78aeaa0..114f514 100644 --- a/src/runtime/gc-internal.h +++ b/src/runtime/gc-internal.h @@ -94,7 +94,7 @@ search_space(lispobj *start, size_t words, lispobj *pointer) /* If thing is an immediate then this is a cons. */ if (is_lisp_pointer(thing) || (fixnump(thing)) - || (widetag_of(thing) == BASE_CHAR_WIDETAG) + || (widetag_of(thing) == CHARACTER_WIDETAG) || (widetag_of(thing) == UNBOUND_MARKER_WIDETAG)) count = 2; else